diff options
author | Darrell Anderson <humanreadable@yahoo.com> | 2012-04-13 01:26:43 -0500 |
---|---|---|
committer | Darrell Anderson <humanreadable@yahoo.com> | 2012-04-13 01:26:43 -0500 |
commit | b5528c18eb8080cdf8aad4e0357e337b3d8a5f96 (patch) | |
tree | 41561db84b7b72f0643f1a59157cb8d676c626af /languages/pascal | |
parent | 7e28a2cd0e6663c45848f47fff28365466a5dc87 (diff) | |
download | tdevelop-b5528c18eb8080cdf8aad4e0357e337b3d8a5f96.tar.gz tdevelop-b5528c18eb8080cdf8aad4e0357e337b3d8a5f96.zip |
Fix inadvertent "TQ" changes.
Diffstat (limited to 'languages/pascal')
-rw-r--r-- | languages/pascal/PascalLexer.cpp | 6 | ||||
-rw-r--r-- | languages/pascal/PascalLexer.hpp | 2 | ||||
-rw-r--r-- | languages/pascal/PascalParser.cpp | 64 | ||||
-rw-r--r-- | languages/pascal/PascalStoreWalker.cpp | 22 | ||||
-rw-r--r-- | languages/pascal/PascalStoreWalkerTokenTypes.hpp | 4 | ||||
-rw-r--r-- | languages/pascal/PascalTokenTypes.hpp | 4 |
6 files changed, 51 insertions, 51 deletions
diff --git a/languages/pascal/PascalLexer.cpp b/languages/pascal/PascalLexer.cpp index 29475545..28f532f8 100644 --- a/languages/pascal/PascalLexer.cpp +++ b/languages/pascal/PascalLexer.cpp @@ -172,7 +172,7 @@ ANTLR_USE_NAMESPACE(antlr)RefToken PascalLexer::nextToken() } case 0x3d /* '=' */ : { - mETQUAL(true); + mEQUAL(true); theRetToken=_returnToken; break; } @@ -508,9 +508,9 @@ void PascalLexer::mCOLON(bool _createToken) { _saveIndex=0; } -void PascalLexer::mETQUAL(bool _createToken) { +void PascalLexer::mEQUAL(bool _createToken) { int _ttype; ANTLR_USE_NAMESPACE(antlr)RefToken _token; ANTLR_USE_NAMESPACE(std)string::size_type _begin = text.length(); - _ttype = ETQUAL; + _ttype = EQUAL; ANTLR_USE_NAMESPACE(std)string::size_type _saveIndex; match('=' /* charlit */ ); diff --git a/languages/pascal/PascalLexer.hpp b/languages/pascal/PascalLexer.hpp index c2232e65..99a14959 100644 --- a/languages/pascal/PascalLexer.hpp +++ b/languages/pascal/PascalLexer.hpp @@ -77,7 +77,7 @@ public: public: void mCOMMA(bool _createToken); public: void mSEMI(bool _createToken); public: void mCOLON(bool _createToken); - public: void mETQUAL(bool _createToken); + public: void mEQUAL(bool _createToken); public: void mNOT_EQUAL(bool _createToken); public: void mLTH(bool _createToken); public: void mLE(bool _createToken); diff --git a/languages/pascal/PascalParser.cpp b/languages/pascal/PascalParser.cpp index 80655b41..51d620ff 100644 --- a/languages/pascal/PascalParser.cpp +++ b/languages/pascal/PascalParser.cpp @@ -1193,7 +1193,7 @@ void PascalParser::constantDeclarationPart() { { // ( ... )+ int _cnt47=0; for (;;) { - if ((LA(1) == IDENT) && (LA(2) == ETQUAL)) { + if ((LA(1) == IDENT) && (LA(2) == EQUAL)) { constantDeclaration(); if (inputState->guessing==0) { astFactory->addASTChild(currentAST, ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST)); @@ -1581,7 +1581,7 @@ void PascalParser::constantDeclaration() { if (inputState->guessing==0) { astFactory->addASTChild(currentAST, ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST)); } - match(ETQUAL); + match(EQUAL); expression(); if (inputState->guessing==0) { astFactory->addASTChild(currentAST, ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST)); @@ -1615,7 +1615,7 @@ void PascalParser::typedConstantDeclaration() { if (inputState->guessing==0) { astFactory->addASTChild(currentAST, ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST)); } - match(ETQUAL); + match(EQUAL); typedConstant(); if (inputState->guessing==0) { astFactory->addASTChild(currentAST, ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST)); @@ -1644,7 +1644,7 @@ void PascalParser::stringConstantDeclaration() { if (inputState->guessing==0) { astFactory->addASTChild(currentAST, ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST)); } - match(ETQUAL); + match(EQUAL); string(); if (inputState->guessing==0) { astFactory->addASTChild(currentAST, ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST)); @@ -1697,7 +1697,7 @@ void PascalParser::typeDeclaration() { if (inputState->guessing==0) { astFactory->addASTChild(currentAST, ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST)); } - match(ETQUAL); + match(EQUAL); type(); if (inputState->guessing==0) { astFactory->addASTChild(currentAST, ANTLR_USE_NAMESPACE(antlr)RefAST(returnAST)); @@ -3234,7 +3234,7 @@ void PascalParser::expression() { } { switch ( LA(1)) { - case ETQUAL: + case EQUAL: case LE: case GE: case LTH: @@ -3783,7 +3783,7 @@ void PascalParser::subrangeTypeOrTypeIdentifier() { } case SEMI: case RPAREN: - case ETQUAL: + case EQUAL: case RBRACK: { break; @@ -3891,7 +3891,7 @@ void PascalParser::stringType() { } case SEMI: case RPAREN: - case ETQUAL: + case EQUAL: case RBRACK: { break; @@ -5033,7 +5033,7 @@ void PascalParser::proceduralTypePart1() { } case SEMI: case RPAREN: - case ETQUAL: + case EQUAL: case RBRACK: { break; @@ -6535,9 +6535,9 @@ void PascalParser::expressionSign() { expressionSign_AST = RefPascalAST(currentAST.root); break; } - case ETQUAL: + case EQUAL: { - match(ETQUAL); + match(EQUAL); expressionSign_AST = RefPascalAST(currentAST.root); break; } @@ -8571,7 +8571,7 @@ void PascalParser::operatorDefinition() { } break; } - case ETQUAL: + case EQUAL: case LE: case GE: case LTH: @@ -8707,9 +8707,9 @@ void PascalParser::comparisonOperatorDefinition() { try { // for error handling { switch ( LA(1)) { - case ETQUAL: + case EQUAL: { - match(ETQUAL); + match(EQUAL); break; } case LE: @@ -9283,7 +9283,7 @@ const char* PascalParser::tokenNames[] = { "\"label\"", "\"const\"", "\"resourcestring\"", - "ETQUAL", + "EQUAL", "\"type\"", "\"var\"", "COLON", @@ -9417,7 +9417,7 @@ const char* PascalParser::tokenNames[] = { "\"self\"", "METHOD", "ADDSUBOR", - "ASSIGNETQUAL", + "ASSIGNEQUAL", "SIGN", "FUNC", "NODE_NOT_EMIT", @@ -9450,7 +9450,7 @@ const unsigned long PascalParser::_tokenSet_3_data_[] = { 121634818UL, 177988UL, const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_3(_tokenSet_3_data_,8); const unsigned long PascalParser::_tokenSet_4_data_[] = { 994050050UL, 706736UL, 101056512UL, 4294963649UL, 833972167UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; // EOF DOT SEMI "end" COMMA "index" "name" LPAREN RPAREN "finalization" -// ETQUAL COLON "procedure" "function" "of" DOTDOT ASSIGN LBRACK RBRACK +// EQUAL COLON "procedure" "function" "of" DOTDOT ASSIGN LBRACK RBRACK // POINTER "constructor" "destructor" "class" "property" "read" "write" // "default" "nodefault" LE GE LTH GT NOT_EQUAL "in" "is" PLUS MINUS "or" // "xor" STAR SLASH "div" "mod" "and" "shl" "shr" AT PLUSEQ MINUSEQ STAREQ @@ -9515,7 +9515,7 @@ const unsigned long PascalParser::_tokenSet_20_data_[] = { 100663296UL, 177988UL const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_20(_tokenSet_20_data_,12); const unsigned long PascalParser::_tokenSet_21_data_[] = { 1061158914UL, 720868UL, 67239936UL, 4294840768UL, 825581575UL, 8UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; // EOF DOT SEMI "end" "exports" COMMA "index" "name" "begin" RPAREN "initialization" -// "finalization" "label" "const" "resourcestring" ETQUAL "type" "var" COLON +// "finalization" "label" "const" "resourcestring" EQUAL "type" "var" COLON // "procedure" "function" "of" DOTDOT RBRACK "constructor" "destructor" // "class" "property" LE GE LTH GT NOT_EQUAL "in" "is" PLUS MINUS "or" // "xor" STAR SLASH "div" "mod" "and" "shl" "shr" "then" "else" "do" "until" @@ -9525,7 +9525,7 @@ const unsigned long PascalParser::_tokenSet_22_data_[] = { 16777216UL, 0UL, 0UL, // SEMI const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_22(_tokenSet_22_data_,6); const unsigned long PascalParser::_tokenSet_23_data_[] = { 16777216UL, 2080UL, 67108864UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// SEMI RPAREN ETQUAL RBRACK +// SEMI RPAREN EQUAL RBRACK const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_23(_tokenSet_23_data_,8); const unsigned long PascalParser::_tokenSet_24_data_[] = { 0UL, 4UL, 536870920UL, 0UL, 206215168UL, 8UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; // "begin" NUM_INT "case" "goto" "if" "while" "repeat" "for" "with" "raise" @@ -9538,7 +9538,7 @@ const unsigned long PascalParser::_tokenSet_25_data_[] = { 121634818UL, 178116UL const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_25(_tokenSet_25_data_,12); const unsigned long PascalParser::_tokenSet_26_data_[] = { 16777216UL, 1818406UL, 67108864UL, 192UL, 0UL, 0UL, 0UL, 0UL }; // SEMI "implementation" "begin" RPAREN "label" "const" "resourcestring" -// ETQUAL "type" "var" "procedure" "forward" "function" "of" "external" +// EQUAL "type" "var" "procedure" "forward" "function" "of" "external" // RBRACK "constructor" "destructor" const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_26(_tokenSet_26_data_,8); const unsigned long PascalParser::_tokenSet_27_data_[] = { 117440514UL, 177988UL, 0UL, 192UL, 0UL, 0UL, 0UL, 0UL }; @@ -9579,22 +9579,22 @@ const unsigned long PascalParser::_tokenSet_36_data_[] = { 0UL, 16UL, 33554440UL // "chr" "nil" NUM_REAL IDENT const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_36(_tokenSet_36_data_,12); const unsigned long PascalParser::_tokenSet_37_data_[] = { 16777216UL, 2064UL, 100663304UL, 4294836224UL, 2147483775UL, 15UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// SEMI LPAREN ETQUAL NUM_INT LBRACK RBRACK LE GE LTH GT NOT_EQUAL "in" +// SEMI LPAREN EQUAL NUM_INT LBRACK RBRACK LE GE LTH GT NOT_EQUAL "in" // "is" PLUS MINUS "or" "xor" STAR SLASH "div" "mod" "and" "shl" "shr" // "not" "true" "false" AT STRING_LITERAL "chr" "nil" NUM_REAL IDENT const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_37(_tokenSet_37_data_,12); const unsigned long PascalParser::_tokenSet_38_data_[] = { 184549378UL, 182304UL, 67239936UL, 4544UL, 0UL, 0UL, 0UL, 0UL }; -// EOF SEMI "end" COMMA RPAREN ETQUAL COLON "procedure" "function" DOTDOT +// EOF SEMI "end" COMMA RPAREN EQUAL COLON "procedure" "function" DOTDOT // RBRACK "constructor" "destructor" "class" "property" const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_38(_tokenSet_38_data_,8); const unsigned long PascalParser::_tokenSet_39_data_[] = { 150994944UL, 32UL, 0UL, 0UL, 0UL, 0UL }; // SEMI COMMA RPAREN const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_39(_tokenSet_39_data_,6); const unsigned long PascalParser::_tokenSet_40_data_[] = { 150994944UL, 2080UL, 67108864UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// SEMI COMMA RPAREN ETQUAL RBRACK +// SEMI COMMA RPAREN EQUAL RBRACK const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_40(_tokenSet_40_data_,8); const unsigned long PascalParser::_tokenSet_41_data_[] = { 318767104UL, 165936UL, 67108864UL, 127424UL, 0UL, 0UL, 0UL, 0UL }; -// SEMI "end" "index" LPAREN RPAREN ETQUAL "procedure" "function" RBRACK +// SEMI "end" "index" LPAREN RPAREN EQUAL "procedure" "function" RBRACK // "constructor" "destructor" "class" "property" "read" "write" "default" // "nodefault" const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_41(_tokenSet_41_data_,8); @@ -9603,7 +9603,7 @@ const unsigned long PascalParser::_tokenSet_42_data_[] = { 0UL, 32UL, 0UL, 0UL, const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_42(_tokenSet_42_data_,6); const unsigned long PascalParser::_tokenSet_43_data_[] = { 792723458UL, 720868UL, 67239936UL, 4294963648UL, 825581575UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; // EOF DOT SEMI "end" "exports" COMMA "name" "begin" RPAREN "initialization" -// "finalization" "label" "const" "resourcestring" ETQUAL "type" "var" COLON +// "finalization" "label" "const" "resourcestring" EQUAL "type" "var" COLON // "procedure" "function" "of" DOTDOT RBRACK "constructor" "destructor" // "class" "property" "read" "write" "default" "nodefault" LE GE LTH GT // NOT_EQUAL "in" "is" PLUS MINUS "or" "xor" STAR SLASH "div" "mod" "and" @@ -9611,7 +9611,7 @@ const unsigned long PascalParser::_tokenSet_43_data_[] = { 792723458UL, 720868UL // "finally" const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_43(_tokenSet_43_data_,12); const unsigned long PascalParser::_tokenSet_44_data_[] = { 0UL, 2064UL, 100794376UL, 4294836224UL, 2147483775UL, 15UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// LPAREN ETQUAL NUM_INT DOTDOT LBRACK RBRACK LE GE LTH GT NOT_EQUAL "in" +// LPAREN EQUAL NUM_INT DOTDOT LBRACK RBRACK LE GE LTH GT NOT_EQUAL "in" // "is" PLUS MINUS "or" "xor" STAR SLASH "div" "mod" "and" "shl" "shr" // "not" "true" "false" AT STRING_LITERAL "chr" "nil" NUM_REAL IDENT const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_44(_tokenSet_44_data_,12); @@ -9660,23 +9660,23 @@ const unsigned long PascalParser::_tokenSet_57_data_[] = { 33554432UL, 163840UL, // "default" "nodefault" const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_57(_tokenSet_57_data_,8); const unsigned long PascalParser::_tokenSet_58_data_[] = { 188743680UL, 526496UL, 67239936UL, 16646144UL, 825581568UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// DOT SEMI "end" COMMA RPAREN "finalization" ETQUAL "of" DOTDOT RBRACK +// DOT SEMI "end" COMMA RPAREN "finalization" EQUAL "of" DOTDOT RBRACK // LE GE LTH GT NOT_EQUAL "in" "is" "then" "else" "do" "until" "to" "downto" // RBRACK2 "except" "finally" const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_58(_tokenSet_58_data_,12); const unsigned long PascalParser::_tokenSet_59_data_[] = { 188743680UL, 526496UL, 67239936UL, 268304384UL, 825581568UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// DOT SEMI "end" COMMA RPAREN "finalization" ETQUAL "of" DOTDOT RBRACK +// DOT SEMI "end" COMMA RPAREN "finalization" EQUAL "of" DOTDOT RBRACK // LE GE LTH GT NOT_EQUAL "in" "is" PLUS MINUS "or" "xor" "then" "else" // "do" "until" "to" "downto" RBRACK2 "except" "finally" const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_59(_tokenSet_59_data_,12); const unsigned long PascalParser::_tokenSet_60_data_[] = { 188743680UL, 526512UL, 67239936UL, 4294836224UL, 825581575UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// DOT SEMI "end" COMMA LPAREN RPAREN "finalization" ETQUAL "of" DOTDOT +// DOT SEMI "end" COMMA LPAREN RPAREN "finalization" EQUAL "of" DOTDOT // RBRACK LE GE LTH GT NOT_EQUAL "in" "is" PLUS MINUS "or" "xor" STAR SLASH // "div" "mod" "and" "shl" "shr" "then" "else" "do" "until" "to" "downto" // RBRACK2 "except" "finally" const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_60(_tokenSet_60_data_,12); const unsigned long PascalParser::_tokenSet_61_data_[] = { 188743680UL, 526496UL, 67239936UL, 4294836224UL, 825581575UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// DOT SEMI "end" COMMA RPAREN "finalization" ETQUAL "of" DOTDOT RBRACK +// DOT SEMI "end" COMMA RPAREN "finalization" EQUAL "of" DOTDOT RBRACK // LE GE LTH GT NOT_EQUAL "in" "is" PLUS MINUS "or" "xor" STAR SLASH "div" // "mod" "and" "shl" "shr" "then" "else" "do" "until" "to" "downto" RBRACK2 // "except" "finally" @@ -9727,14 +9727,14 @@ const unsigned long PascalParser::_tokenSet_74_data_[] = { 0UL, 0UL, 8UL, 0UL, 0 const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_74(_tokenSet_74_data_,12); const unsigned long PascalParser::_tokenSet_75_data_[] = { 1061158914UL, 720868UL, 67239936UL, 4294840768UL, 825581575UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; // EOF DOT SEMI "end" "exports" COMMA "index" "name" "begin" RPAREN "initialization" -// "finalization" "label" "const" "resourcestring" ETQUAL "type" "var" COLON +// "finalization" "label" "const" "resourcestring" EQUAL "type" "var" COLON // "procedure" "function" "of" DOTDOT RBRACK "constructor" "destructor" // "class" "property" LE GE LTH GT NOT_EQUAL "in" "is" PLUS MINUS "or" // "xor" STAR SLASH "div" "mod" "and" "shl" "shr" "then" "else" "do" "until" // "to" "downto" RBRACK2 "except" "finally" const ANTLR_USE_NAMESPACE(antlr)BitSet PascalParser::_tokenSet_75(_tokenSet_75_data_,12); const unsigned long PascalParser::_tokenSet_76_data_[] = { 188743682UL, 706720UL, 67239936UL, 4294840768UL, 825581575UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL, 0UL }; -// EOF DOT SEMI "end" COMMA RPAREN "finalization" ETQUAL COLON "procedure" +// EOF DOT SEMI "end" COMMA RPAREN "finalization" EQUAL COLON "procedure" // "function" "of" DOTDOT RBRACK "constructor" "destructor" "class" "property" // LE GE LTH GT NOT_EQUAL "in" "is" PLUS MINUS "or" "xor" STAR SLASH "div" // "mod" "and" "shl" "shr" "then" "else" "do" "until" "to" "downto" RBRACK2 diff --git a/languages/pascal/PascalStoreWalker.cpp b/languages/pascal/PascalStoreWalker.cpp index 0a72ccfc..96c69fe4 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() == ETQUAL)) { + if ((_t->getType() == EQUAL)) { 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),ETQUAL); + match(ANTLR_USE_NAMESPACE(antlr)RefAST(_t),EQUAL); _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 ETQUAL: + case EQUAL: { RefPascalAST __t132 = _t; RefPascalAST tmp85_AST_in = _t; - match(ANTLR_USE_NAMESPACE(antlr)RefAST(_t),ETQUAL); + match(ANTLR_USE_NAMESPACE(antlr)RefAST(_t),EQUAL); _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 ETQUAL: + case EQUAL: 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 ETQUAL: + case EQUAL: case NUM_INT: case LBRACK: case SET: @@ -2691,7 +2691,7 @@ void PascalStoreWalker::element(RefPascalAST _t) { } case FUNC_CALL: case DOT: - case ETQUAL: + case EQUAL: case NUM_INT: case LBRACK: case SET: @@ -3228,7 +3228,7 @@ const char* PascalStoreWalker::tokenNames[] = { "\"label\"", "\"const\"", "\"resourcestring\"", - "ETQUAL", + "EQUAL", "\"type\"", "\"var\"", "COLON", @@ -3362,7 +3362,7 @@ const char* PascalStoreWalker::tokenNames[] = { "\"self\"", "METHOD", "ADDSUBOR", - "ASSIGNETQUAL", + "ASSIGNEQUAL", "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 ETQUAL NUM_INT LBRACK "set" POINTER LE GE LTH GT NOT_EQUAL +// FUNC_CALL DOT EQUAL 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 ETQUAL NUM_INT DOTDOT LBRACK "set" POINTER LE GE LTH GT +// FUNC_CALL DOT EQUAL 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); diff --git a/languages/pascal/PascalStoreWalkerTokenTypes.hpp b/languages/pascal/PascalStoreWalkerTokenTypes.hpp index f86b1d42..cd9e0c81 100644 --- a/languages/pascal/PascalStoreWalkerTokenTypes.hpp +++ b/languages/pascal/PascalStoreWalkerTokenTypes.hpp @@ -51,7 +51,7 @@ struct CUSTOM_API PascalStoreWalkerTokenTypes { LABEL = 40, CONST = 41, RESOURCESTRING = 42, - ETQUAL = 43, + EQUAL = 43, TYPE = 44, VAR = 45, COLON = 46, @@ -185,7 +185,7 @@ struct CUSTOM_API PascalStoreWalkerTokenTypes { SELF = 174, TQT_METHOD = 175, ADDSUBOR = 176, - ASSIGNETQUAL = 177, + ASSIGNEQUAL = 177, SIGN = 178, FUNC = 179, NODE_NOT_EMIT = 180, diff --git a/languages/pascal/PascalTokenTypes.hpp b/languages/pascal/PascalTokenTypes.hpp index 3bc8950e..007269b0 100644 --- a/languages/pascal/PascalTokenTypes.hpp +++ b/languages/pascal/PascalTokenTypes.hpp @@ -54,7 +54,7 @@ struct CUSTOM_API PascalTokenTypes { LABEL = 40, CONST = 41, RESOURCESTRING = 42, - ETQUAL = 43, + EQUAL = 43, TYPE = 44, VAR = 45, COLON = 46, @@ -188,7 +188,7 @@ struct CUSTOM_API PascalTokenTypes { SELF = 174, TQT_METHOD = 175, ADDSUBOR = 176, - ASSIGNETQUAL = 177, + ASSIGNEQUAL = 177, SIGN = 178, FUNC = 179, NODE_NOT_EMIT = 180, |