From b5528c18eb8080cdf8aad4e0357e337b3d8a5f96 Mon Sep 17 00:00:00 2001
From: Darrell Anderson <humanreadable@yahoo.com>
Date: Fri, 13 Apr 2012 01:26:43 -0500
Subject: Fix inadvertent "TQ" changes.

---
 languages/pascal/PascalLexer.cpp | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

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

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