Update to work with antlr 2.7.1

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@10746 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Adam Fedor 2001-08-20 21:08:03 +00:00
parent ee9c4af004
commit b2f1e88a6c
22 changed files with 87 additions and 133 deletions

View file

@ -4,12 +4,13 @@
* Terence Parr, MageLang Institute
* with John Lilley, Empathy Software
* and Manuel Guesdon, Software Builders
* ANTLR Version 2.5.0; 1996,1997,1998,1999
* ANTLR Version 2.7.1; 1996,1997,1998,1999,2000
*/
#include <GSWeb/GSWeb.h>
#include "gsantlr/ANTLRCommon.h"
#include "gsantlr/ANTLRException.h"
#include "GSWHTMLAttrLexer.h"
@ -49,12 +50,12 @@
-(ANTLRDefToken) nextToken
{
ANTLRDefToken _rettoken=nil;
ANTLRDefToken theRetToken=nil;
BOOL end=NO;
//LOGObjectFnStart();
for (;!end;)
{
ANTLRDefToken _rettoken;
ANTLRDefToken theRetToken;
ANTLRTokenType _ttype = ANTLRToken_INVALID_TYPE;
[self resetText];
NS_DURING // for error handling
@ -77,49 +78,49 @@
case ((unichar)('z')):
{
[self mIDENTWithCreateToken:YES];
_rettoken=_returnToken;
theRetToken=_returnToken;
break;
}
case ((unichar)('=')):
{
[self mASSIGNWithCreateToken:YES];
_rettoken=_returnToken;
theRetToken=_returnToken;
break;
}
case ((unichar)('\t')): case ((unichar)('\n')): case ((unichar)('\r')): case ((unichar)(' ')):
{
[self mWSWithCreateToken:YES];
_rettoken=_returnToken;
theRetToken=_returnToken;
break;
}
case ((unichar)('"')): case ((unichar)('\'')):
{
[self mSTRINGWithCreateToken:YES];
_rettoken=_returnToken;
theRetToken=_returnToken;
break;
}
case ((unichar)('.')):
{
[self mPOINTWithCreateToken:YES];
_rettoken=_returnToken;
theRetToken=_returnToken;
break;
}
case ((unichar)('#')):
{
[self mHEXNUMWithCreateToken:YES];
_rettoken=_returnToken;
theRetToken=_returnToken;
break;
}
default:
if ((([self LA:1] >= ((unichar)('0')) && [self LA:1] <= ((unichar)('9')))) && ([GSWHTMLAttrLexer___tokenSet_0 isMember:[self LA:2]]))
{
[self mPCINTWithCreateToken:YES];
_rettoken=_returnToken;
theRetToken=_returnToken;
}
else if ((([self LA:1] >= ((unichar)('0')) && [self LA:1] <= ((unichar)('9')))))
{
[self mINTWithCreateToken:YES];
_rettoken=_returnToken;
theRetToken=_returnToken;
}
else
{