summaryrefslogtreecommitdiffstats
path: root/languages/pascal
diff options
context:
space:
mode:
authorDarrell Anderson <humanreadable@yahoo.com>2012-04-13 01:26:43 -0500
committerDarrell Anderson <humanreadable@yahoo.com>2012-04-13 01:26:43 -0500
commitb5528c18eb8080cdf8aad4e0357e337b3d8a5f96 (patch)
tree41561db84b7b72f0643f1a59157cb8d676c626af /languages/pascal
parent7e28a2cd0e6663c45848f47fff28365466a5dc87 (diff)
downloadtdevelop-b5528c18eb8080cdf8aad4e0357e337b3d8a5f96.tar.gz
tdevelop-b5528c18eb8080cdf8aad4e0357e337b3d8a5f96.zip
Fix inadvertent "TQ" changes.
Diffstat (limited to 'languages/pascal')
-rw-r--r--languages/pascal/PascalLexer.cpp6
-rw-r--r--languages/pascal/PascalLexer.hpp2
-rw-r--r--languages/pascal/PascalParser.cpp64
-rw-r--r--languages/pascal/PascalStoreWalker.cpp22
-rw-r--r--languages/pascal/PascalStoreWalkerTokenTypes.hpp4
-rw-r--r--languages/pascal/PascalTokenTypes.hpp4
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,