2 import MCC.IR.ParseNode;
3 import MCC.IR.ParseNodeVector;
8 public static boolean errors;
9 public static boolean debug;
11 // debugMessage: writes debug production message only if debug = true
13 void debugMessage (String production) {
15 System.out.println("Applying production: " + production);
19 String unescape (String str) {
20 StringBuffer sb = new StringBuffer();
22 // Note that we skip the first and last characters (they're "'s)
23 for (i = 1; i < str.length() - 1; i++) {
24 if (str.charAt(i) == '\\') {
26 switch (str.charAt(i)) {
43 System.err.print("Error in string literal: ");
44 System.err.println(str.charAt(i));
45 System.err.println("Aborting...");
49 sb.append(str.charAt(i));
60 public String filename;
62 public void syntax_error (java_cup.runtime.Symbol current) {
64 CUP$TDLParser$actions.errors = true;
65 Symbol symbol = (Symbol) current;
66 report_error(filename+":"+(symbol.line+1)+": Syntax error at column "
67 + (LineCount.getColumn(symbol.left)+1) +": " + current.value, current);
72 public void report_fatal_error (String message, Object info) {
75 report_error(message, info);
76 CUP$TDLParser$actions.errors = true;
79 public int curPos () {
80 return cur_token.left;
83 public int curLine (int back) {
84 Stack st = new Stack();
87 for (i = 0; i < back; i++) {
91 java_cup.runtime.Symbol s;
92 s = (java_cup.runtime.Symbol) st.peek();
94 for (i = 0; i < back; i++) {
98 return LineCount.getLine(s.left);
103 // TERMINALS /////////////////////////////////////////////////////////////
108 terminal String DECIMAL;
109 terminal String CHAR;
110 terminal String STRING;
116 terminal OPENBRACKET;
117 terminal CLOSEBRACKET;
185 // NON-TERMINALS /////////////////////////////////////////////////////////
189 ------------------------------------------------------------------------*/
190 nonterminal ParseNode structures;
191 nonterminal ParseNode structure;
192 nonterminal ParseNode optsubtype;
193 nonterminal ParseNode labelsandfields;
194 nonterminal ParseNode label;
195 nonterminal ParseNode field;
196 nonterminal ParseNode optptr;
197 nonterminal ParseNode type;
198 nonterminal ParseNode primtype;
199 nonterminal ParseNode optindex;
200 nonterminal ParseNode expr;
201 nonterminal ParseNode simple_expr;
202 nonterminal ParseNode location;
203 nonterminal ParseNode operator;
204 nonterminal ParseNode literal;
208 precedence right EQ, NE;
209 precedence right LT, LE, GE, GT;
210 precedence left ADD, SUB;
211 precedence left MULT, DIV;
215 // PRODUCTION RULES /////////////////////////////////////////////////////
217 start with structures;
221 structures:structures structure:structure
223 debugMessage(PRODSTRING);
224 structures.addChild(structure);
228 | structure:structure
230 debugMessage(PRODSTRING);
231 ParseNode structures = new ParseNode("structures", parser.curLine(1));
232 structures.addChild(structure);
239 STRUCTURE ID:typename optsubtype:subtype OPENBRACE labelsandfields:lf CLOSEBRACE
241 debugMessage(PRODSTRING);
242 ParseNode structure = new ParseNode("structure", parser.curLine(6));
243 structure.addChild("name", parser.curLine(5)).addChild(typename);
244 if (subtype != null) {
245 structure.addChild(subtype);
247 structure.addChild(lf);
251 STRUCTURE ID:typename optsubtype:subtype OPENBRACE CLOSEBRACE
253 debugMessage(PRODSTRING);
254 ParseNode structure = new ParseNode("structure", parser.curLine(6));
255 structure.addChild("name", parser.curLine(5)).addChild(typename);
256 if (subtype != null) {
257 structure.addChild(subtype);
262 | ID:type MULT ID:name SEMICOLON
264 debugMessage(PRODSTRING);
265 ParseNode global = new ParseNode("global", parser.curLine(4));
266 global.addChild("ptr");
267 global.addChild("type").addChild(type);
268 global.addChild("name").addChild(name);
272 | primtype:type ID:name SEMICOLON
274 debugMessage(PRODSTRING);
275 ParseNode global = new ParseNode("global", parser.curLine(4));
276 global.addChild(type);
277 global.addChild("name").addChild(name);
286 debugMessage(PRODSTRING);
287 ParseNode subtype = new ParseNode("subtype", parser.curLine(3));
288 subtype.addChild(type);
296 debugMessage(PRODSTRING);
297 ParseNode subtype = new ParseNode("subclass", parser.curLine(3));
298 subtype.addChild(type);
304 debugMessage(PRODSTRING);
311 labelsandfields:lf label:label
313 debugMessage(PRODSTRING);
314 lf.getChild("labels").addChild(label);
318 | labelsandfields:lf field:field
320 debugMessage(PRODSTRING);
321 lf.getChild("fields").addChild(field);
327 debugMessage(PRODSTRING);
328 ParseNode lf = new ParseNode("lf");
329 lf.addChild("labels", parser.curLine(1)).addChild(label);
330 lf.addChild("fields", parser.curLine(1));
336 debugMessage(PRODSTRING);
337 ParseNode lf = new ParseNode("lf");
338 lf.addChild("fields", parser.curLine(1)).addChild(field);
339 lf.addChild("labels", parser.curLine(1));
346 LABEL ID:field optindex:index COLON type:type ID:name SEMICOLON
348 debugMessage(PRODSTRING);
349 ParseNode label = new ParseNode("label", parser.curLine(6));
350 label.addChild("name", parser.curLine(2)).addChild(name);
352 label.addChild(index);
354 label.addChild(type);
355 label.addChild("field", parser.curLine(5)).addChild(field);
362 OPENBRACKET expr:expr CLOSEBRACKET
364 debugMessage(PRODSTRING);
365 ParseNode index = new ParseNode("index", parser.curLine(2));
366 index.addChild(expr);
372 debugMessage(PRODSTRING);
379 RESERVED type:type optindex:index SEMICOLON
381 debugMessage(PRODSTRING);
382 ParseNode field = new ParseNode("field", parser.curLine(4));
383 field.addChild(type);
384 field.addChild("reserved");
386 field.addChild(index);
391 | type:type optptr:optptr ID:name optindex:index SEMICOLON
393 debugMessage(PRODSTRING);
394 ParseNode field = new ParseNode("field", parser.curLine(5));
395 field.addChild(type);
396 if (optptr != null) {
397 field.addChild(optptr);
399 field.addChild("name", parser.curLine(3)).addChild(name);
401 field.addChild(index);
411 debugMessage(PRODSTRING);
412 RESULT = new ParseNode("*", parser.curLine(1));
417 debugMessage(PRODSTRING);
423 /*** expression interface *********************************/
429 debugMessage(PRODSTRING);
430 ParseNode se = new ParseNode("simple_expr", parser.curLine(1));
431 se.addChild(location);
440 debugMessage(PRODSTRING);
441 ParseNode loc = new ParseNode("location", parser.curLine(1));
442 loc.addChild("var").addChild(var);
446 | simple_expr:dotexpr DOT ID:field
448 debugMessage(PRODSTRING);
449 ParseNode dot = (new ParseNode("location", parser.curLine(3))).addChild("dot");
450 dot.addChild(dotexpr);
451 dot.addChild("field", parser.curLine(1)).addChild(field);
452 RESULT = dot.getRoot();
455 | simple_expr:dotexpr DOT ID:field OPENBRACKET expr:index CLOSEBRACKET
457 debugMessage(PRODSTRING);
458 ParseNode dot = (new ParseNode("location", parser.curLine(6))).addChild("dot");
459 dot.addChild(dotexpr);
460 dot.addChild("field", parser.curLine(4)).addChild(field);
461 dot.addChild("index", parser.curLine(2)).addChild(index);
462 RESULT = dot.getRoot();
465 | CAST OPENPAREN ID:type COMMA simple_expr:expr CLOSEPAREN
467 debugMessage(PRODSTRING);
468 ParseNode cast = (new ParseNode("location", parser.curLine(6))).addChild("cast");
469 cast.addChild("type").addChild(type);
471 RESULT = cast.getRoot();
479 debugMessage(PRODSTRING);
480 ParseNode expr = new ParseNode("expr", parser.curLine(1));
485 | OPENPAREN expr:expr CLOSEPAREN
487 debugMessage(PRODSTRING);
493 debugMessage(PRODSTRING);
494 ParseNode expr = new ParseNode("expr", parser.curLine(4));
495 expr.addChild(literal);
499 | expr:expr1 operator:operator expr:expr2
501 debugMessage(PRODSTRING);
502 ParseNode op = (new ParseNode("expr", parser.curLine(3))).addChild("operator");
503 op.addChild("op").addChild(operator);
504 op.addChild("left", parser.curLine(3)).addChild(expr1);
505 op.addChild("right", parser.curLine(1)).addChild(expr2);
506 RESULT = op.getRoot();
510 /**** standard ***************************************************/
516 debugMessage(PRODSTRING);
517 RESULT = new ParseNode("add", parser.curLine(1));
522 debugMessage(PRODSTRING);
523 RESULT = new ParseNode("sub", parser.curLine(1));
528 debugMessage(PRODSTRING);
529 RESULT = new ParseNode("mult", parser.curLine(1));
534 debugMessage(PRODSTRING);
535 RESULT = new ParseNode("div", parser.curLine(1));
543 debugMessage(PRODSTRING);
544 RESULT = (new ParseNode("literal", parser.curLine(1))).addChild("boolean").addChild("true").getRoot();
549 debugMessage(PRODSTRING);
550 RESULT = (new ParseNode("literal", parser.curLine(1))).addChild("boolean").addChild("false").getRoot();
555 debugMessage(PRODSTRING);
556 RESULT = (new ParseNode("literal", parser.curLine(1))).addChild("decimal").addChild(dec).getRoot();
561 debugMessage(PRODSTRING);
562 RESULT = (new ParseNode("literal", parser.curLine(1))).addChild("decimal").addChild("-"+dec).getRoot();
567 debugMessage(PRODSTRING);
568 RESULT = (new ParseNode("literal", parser.curLine(1))).addChild("string").addChild(str).getRoot();
573 debugMessage(PRODSTRING);
574 RESULT = (new ParseNode("literal", parser.curLine(1))).addChild("char").addChild(chr).getRoot();
577 | LITERAL OPENPAREN ID:literal CLOSEPAREN
579 debugMessage(PRODSTRING);
580 RESULT = (new ParseNode("literal", parser.curLine(1))).addChild("token").addChild(literal).getRoot();
588 debugMessage(PRODSTRING);
589 ParseNode type = new ParseNode("type", parser.curLine(1));
590 type.addChild("bit");
596 debugMessage(PRODSTRING);
597 ParseNode type = new ParseNode("type", parser.curLine(1));
598 type.addChild("byte");
604 debugMessage(PRODSTRING);
605 ParseNode type = new ParseNode("type", parser.curLine(1));
606 type.addChild("short");
612 debugMessage(PRODSTRING);
613 ParseNode type = new ParseNode("type", parser.curLine(1));
614 type.addChild("int");
620 debugMessage(PRODSTRING);
621 ParseNode type = new ParseNode("type", parser.curLine(1));
622 type.addChild(typename);
631 debugMessage(PRODSTRING);
632 ParseNode type = new ParseNode("type", parser.curLine(1));
633 type.addChild("bit");
639 debugMessage(PRODSTRING);
640 ParseNode type = new ParseNode("type", parser.curLine(1));
641 type.addChild("byte");
647 debugMessage(PRODSTRING);
648 ParseNode type = new ParseNode("type", parser.curLine(1));
649 type.addChild("short");
655 debugMessage(PRODSTRING);
656 ParseNode type = new ParseNode("type", parser.curLine(1));
657 type.addChild("int");