diff options
Diffstat (limited to 'languages/pascal/PascalStoreWalker.cpp')
| -rw-r--r-- | languages/pascal/PascalStoreWalker.cpp | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/languages/pascal/PascalStoreWalker.cpp b/languages/pascal/PascalStoreWalker.cpp index 96c69fe4..0a72ccfc 100644 --- a/languages/pascal/PascalStoreWalker.cpp +++ b/languages/pascal/PascalStoreWalker.cpp @@ -252,7 +252,7 @@ void PascalStoreWalker::constantDefinitionPart(RefPascalAST _t) { for (;;) { if (_t == RefPascalAST(ANTLR_USE_NAMESPACE(antlr)nullAST) ) _t = ASTNULL; - if ((_t->getType() == EQUAL)) { + if ((_t->getType() == ETQUAL)) { constantDefinition(_t); _t = _retTree; } @@ -421,7 +421,7 @@ void PascalStoreWalker::constantDefinition(RefPascalAST _t) { try { // for error handling RefPascalAST __t21 = _t; RefPascalAST tmp15_AST_in = _t; - match(ANTLR_USE_NAMESPACE(antlr)RefAST(_t),EQUAL); + match(ANTLR_USE_NAMESPACE(antlr)RefAST(_t),ETQUAL); _t = _t->getFirstChild(); RefPascalAST tmp16_AST_in = _t; match(ANTLR_USE_NAMESPACE(antlr)RefAST(_t),IDENT); @@ -2129,11 +2129,11 @@ void PascalStoreWalker::expression(RefPascalAST _t) { if (_t == RefPascalAST(ANTLR_USE_NAMESPACE(antlr)nullAST) ) _t = ASTNULL; switch ( _t->getType()) { - case EQUAL: + case ETQUAL: { RefPascalAST __t132 = _t; RefPascalAST tmp85_AST_in = _t; - match(ANTLR_USE_NAMESPACE(antlr)RefAST(_t),EQUAL); + match(ANTLR_USE_NAMESPACE(antlr)RefAST(_t),ETQUAL); _t = _t->getFirstChild(); expression(_t); _t = _retTree; @@ -2241,7 +2241,7 @@ void PascalStoreWalker::expression(RefPascalAST _t) { switch ( _t->getType()) { case FUNC_CALL: case DOT: - case EQUAL: + case ETQUAL: case NUM_INT: case LBRACK: case SET: @@ -2301,7 +2301,7 @@ void PascalStoreWalker::expression(RefPascalAST _t) { switch ( _t->getType()) { case FUNC_CALL: case DOT: - case EQUAL: + case ETQUAL: case NUM_INT: case LBRACK: case SET: @@ -2691,7 +2691,7 @@ void PascalStoreWalker::element(RefPascalAST _t) { } case FUNC_CALL: case DOT: - case EQUAL: + case ETQUAL: case NUM_INT: case LBRACK: case SET: @@ -3228,7 +3228,7 @@ const char* PascalStoreWalker::tokenNames[] = { "\"label\"", "\"const\"", "\"resourcestring\"", - "EQUAL", + "ETQUAL", "\"type\"", "\"var\"", "COLON", @@ -3362,7 +3362,7 @@ const char* PascalStoreWalker::tokenNames[] = { "\"self\"", "METHOD", "ADDSUBOR", - "ASSIGNEQUAL", + "ASSIGNETQUAL", "SIGN", "FUNC", "NODE_NOT_EMIT", @@ -3389,12 +3389,12 @@ const unsigned long PascalStoreWalker::_tokenSet_2_data_[] = { 0UL, 0UL, 8UL, 50 // NUM_INT PLUS MINUS STRING_LITERAL "chr" NUM_REAL IDENT const ANTLR_USE_NAMESPACE(antlr)BitSet PascalStoreWalker::_tokenSet_2(_tokenSet_2_data_,12); const unsigned long PascalStoreWalker::_tokenSet_3_data_[] = { 4194432UL, 2048UL, 1107296264UL, 4152229889UL, 2155872329UL, 15UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// FUNC_CALL DOT EQUAL NUM_INT LBRACK "set" POINTER LE GE LTH GT NOT_EQUAL +// FUNC_CALL DOT ETQUAL NUM_INT LBRACK "set" POINTER LE GE LTH GT NOT_EQUAL // "in" PLUS MINUS "or" STAR SLASH "div" "mod" "and" "not" AT LBRACK2 STRING_LITERAL // "chr" "nil" NUM_REAL IDENT const ANTLR_USE_NAMESPACE(antlr)BitSet PascalStoreWalker::_tokenSet_3(_tokenSet_3_data_,12); const unsigned long PascalStoreWalker::_tokenSet_4_data_[] = { 4194432UL, 2048UL, 1107427336UL, 4152229889UL, 2155872329UL, 15UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// FUNC_CALL DOT EQUAL NUM_INT DOTDOT LBRACK "set" POINTER LE GE LTH GT +// FUNC_CALL DOT ETQUAL NUM_INT DOTDOT LBRACK "set" POINTER LE GE LTH GT // NOT_EQUAL "in" PLUS MINUS "or" STAR SLASH "div" "mod" "and" "not" AT // LBRACK2 STRING_LITERAL "chr" "nil" NUM_REAL IDENT const ANTLR_USE_NAMESPACE(antlr)BitSet PascalStoreWalker::_tokenSet_4(_tokenSet_4_data_,12); |