From 48d4a26399959121f33d2bc3bfe51c7827b654fc Mon Sep 17 00:00:00 2001
From: tpearson <tpearson@283d02a7-25f6-0310-bc7c-ecb5cbfe19da>
Date: Tue, 14 Jun 2011 16:45:05 +0000
Subject: TQt4 port kdevelop This enables compilation under both Qt3 and Qt4

git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/kdevelop@1236710 283d02a7-25f6-0310-bc7c-ecb5cbfe19da
---
 languages/pascal/PascalStoreWalker.cpp | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

(limited to 'languages/pascal/PascalStoreWalker.cpp')

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);
-- 
cgit v1.2.1