开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 编译器/解释器 > 查看源码
antlr.h
资源名称：pccts133.zip　[点击查看]
上传用户：itx_2006
上传日期：2007-01-06
资源大小：493k
文件大小：21k
源码类别：

编译器/解释器

开发平台：

Others

antlr.h：源码内容
  1. /* antlr.h
  2.  *
  3.  * SOFTWARE RIGHTS
  4.  *
  5.  * We reserve no LEGAL rights to the Purdue Compiler Construction Tool
  6.  * Set (PCCTS) -- PCCTS is in the public domain.  An individual or
  7.  * company may do whatever they wish with source code distributed with
  8.  * PCCTS or the code generated by PCCTS, including the incorporation of
  9.  * PCCTS, or its output, into commerical software.
  10.  *
  11.  * We encourage users to develop software with PCCTS.  However, we do ask
  12.  * that credit is given to us for developing PCCTS.  By "credit",
  13.  * we mean that if you incorporate our source code into one of your
  14.  * programs (commercial product, research project, or otherwise) that you
  15.  * acknowledge this fact somewhere in the documentation, research report,
  16.  * etc...  If you like PCCTS and have developed a nice tool with the
  17.  * output, please mention that you developed it using PCCTS.  In
  18.  * addition, we ask that this header remain intact in our source code.
  19.  * As long as these guidelines are kept, we expect to continue enhancing
  20.  * this system and expect to make other tools available as they are
  21.  * completed.
  22.  *
  23.  * ANTLR 1.33
  24.  * Terence Parr
  25.  * Parr Research Corporation
  26.  * with Purdue University and AHPCRC, University of Minnesota
  27.  * 1989-1998
  28.  */
  30. #ifndef ANTLR_H
  31. #define ANTLR_H
  33. #include "pcctscfg.h"
  35. #include PCCTS_STDIO_H
  37. /*
  38.  * Define all of the stack setup and manipulation of $i, #i variables.
  39.  *
  40.  * Notes:
  41.  * The type 'Attrib' must be defined before entry into this .h file.
  42.  */
  44. #ifdef __USE_PROTOS
  45. #include PCCTS_STDLIB_H
  46. #else
  47. #ifdef VAXC
  48. #include <stdlib.h>
  49. #else
  50. #include <malloc.h>
  51. #endif
  52. #endif
  53. #include PCCTS_STRING_H
  55. typedef int ANTLRTokenType;
  56. typedef unsigned char SetWordType;
  58. typedef char ANTLRChar;
  60. /* G u e s s  S t u f f */
  62. #ifdef ZZCAN_GUESS
  63. #ifndef ZZINF_LOOK
  64. #define ZZINF_LOOK
  65. #endif
  66. #endif
  68. #ifdef ZZCAN_GUESS
  69. typedef struct _zzjmp_buf {
  70. jmp_buf state;
  71. } zzjmp_buf;
  72. #endif
  75. /* can make this a power of 2 for more efficient lookup */
  76. #ifndef ZZLEXBUFSIZE
  77. #define ZZLEXBUFSIZE 2000
  78. #endif
  80. #define zzOvfChk
  81.             if ( zzasp <= 0 )                                           
  82.             {                                                           
  83.                 fprintf(stderr, zzStackOvfMsg, __FILE__, __LINE__);
  84.                 exit(PCCTS_EXIT_FAILURE);                                               
  85.             }
  87. #ifndef ZZA_STACKSIZE
  88. #define ZZA_STACKSIZE 400
  89. #endif
  90. #ifndef ZZAST_STACKSIZE
  91. #define ZZAST_STACKSIZE 400
  92. #endif
  94. #ifndef zzfailed_pred
  95. #ifdef ZZCAN_GUESS
  96. #define zzfailed_pred(_p) 
  97.   if (zzguessing) { 
  98.     zzGUESS_FAIL; 
  99.   } else { 
  100.     fprintf(stderr, "semantic error; failed predicate: '%s'n",_p); 
  101.   }
  102. #else
  103. #define zzfailed_pred(_p)
  104. fprintf(stderr, "semantic error; failed predicate: '%s'n",_p)
  105. #endif
  106. #endif
  108. #ifdef LL_K
  109. #define LOOKAHEAD
  110. int zztokenLA[LL_K];
  111. char zztextLA[LL_K][ZZLEXBUFSIZE];
  112. int zzlap = 0, zzlabase=0; /* labase only used for DEMAND_LOOK */
  113. #else
  114. #define LOOKAHEAD
  115. int zztoken;
  116. #endif
  118. #ifndef zzcr_ast
  119. #define zzcr_ast(ast,attr,tok,text)
  120. #endif
  122. #ifdef DEMAND_LOOK
  123. #define DemandLookData  int zzdirty=1;
  124. #else
  125. #define DemandLookData
  126. #endif
  128. #ifndef zzUSER_GUESS_HOOK
  129. #define zzUSER_GUESS_HOOK(seqFrozen,zzrv)
  130. #endif
  132. #ifndef zzUSER_GUESS_DONE_HOOK
  133. #define zzUSER_GUESS_DONE_HOOK(seqFrozen)
  134. #endif
  136. /* S t a t e  S t u f f */
  138. #ifdef ZZCAN_GUESS
  139. #define zzGUESS_BLOCK zzantlr_state zzst; int zzrv; int zzGuessSeqFrozen;
  141. /* MR10 change zzGUESS: do zzGUESS_DONE when zzrv==1 after longjmp as in C++ mode */
  143. #define zzGUESS zzsave_antlr_state(&zzst); 
  144. zzguessing = 1; 
  145.                             zzGuessSeqFrozen=++zzGuessSeq; 
  146. zzrv = setjmp(zzguess_start.state); 
  147.                             zzUSER_GUESS_HOOK(zzGuessSeqFrozen,zzrv) 
  148.                             if (zzrv) zzGUESS_DONE;
  149. #ifdef zzTRACE_RULES
  150. #define zzGUESS_FAIL { zzTraceGuessFail(); longjmp(zzguess_start.state, 1); }
  151. #else
  152. #define zzGUESS_FAIL longjmp(zzguess_start.state, 1)
  153. #endif
  155. /* MR10 change zzGUESS_DONE: zzrv=1 to simulate longjmp() return value as in C++ mode */
  157. #define zzGUESS_DONE { zzrestore_antlr_state(&zzst); zzrv=1; zzUSER_GUESS_DONE_HOOK(zzGuessSeqFrozen) }
  158. #define zzNON_GUESS_MODE if ( !zzguessing )
  159. #define zzGuessData                                     
  160.             zzjmp_buf zzguess_start;                    
  161.             int zzguessing;
  162. #else
  163. #define zzGUESS_BLOCK
  164. #define zzGUESS
  165. #define zzGUESS_FAIL
  166. #define zzGUESS_DONE
  167. #define zzNON_GUESS_MODE
  168. #define zzGuessData
  169. #endif
  171. typedef struct _zzantlr_state {
  172. #ifdef ZZCAN_GUESS
  173. zzjmp_buf guess_start;
  174. int guessing;
  175. #endif
  176. int asp;
  177. int ast_sp;
  178. #ifdef ZZINF_LOOK
  179. int inf_lap; /* not sure we need to save this one */
  180. int inf_labase;
  181. int inf_last;
  183. /* MR6  Gunnar Rxnning (gunnar@candleweb.no)                                */
  184. /* MR6   Additional state needs to be saved/restored                       */
  185. /* MR6    Matching changes in err.h                                         */
  187. int *inf_tokens;                                      /* MR6 */
  188. char **inf_text;                                      /* MR6 */
  189. char *inf_text_buffer;                              /* MR6 */
  190. int *inf_line;                                      /* MR6 */
  191. #endif
  192. #ifdef DEMAND_LOOK
  193. int dirty;
  194. #endif
  196. #ifdef LL_K
  197. int tokenLA[LL_K];
  198. char textLA[LL_K][ZZLEXBUFSIZE];
  199. int lap;
  200. int labase;
  201. #else
  202. int token;
  203. char text[ZZLEXBUFSIZE];
  204. #endif
  205. #ifdef zzTRACE_RULES
  206.             int     traceOptionValue;       /* MR10 */
  207.             int     traceGuessOptionValue;  /* MR10 */
  208.             char    *traceCurrentRuleName;  /* MR10 */
  209.             int     traceDepth;             /* MR10 */
  210. #endif
  212. } zzantlr_state;
  214. #ifdef zzTRACE_RULES
  215. extern int  zzTraceOptionValueDefault;
  216. extern int  zzTraceOptionValue;
  217. extern int  zzTraceGuessOptionValue;
  218. extern char *zzTraceCurrentRuleName;
  219. extern int  zzTraceDepth;
  220. #endif
  222. extern int zzGuessSeq;                      /* MR10 */
  223. extern int zzSyntaxErrCount;                /* MR11 */
  224. extern int zzLexErrCount;                   /* MR11 */
  226.                  /* I n f i n i t e  L o o k a h e a d */
  229. #ifdef ZZINF_LOOK
  230. #define InfLookData
  231. int *zzinf_tokens;
  232. char **zzinf_text;
  233. char *zzinf_text_buffer;
  234. int *zzinf_line;        
  235. int zzinf_labase;
  236. int zzinf_last;
  237. #else
  238. #define InfLookData
  239. #endif
  241. #ifdef ZZINF_LOOK
  243. #ifndef ZZINF_DEF_TEXT_BUFFER_SIZE
  244. #define ZZINF_DEF_TEXT_BUFFER_SIZE     20000
  245. #endif
  246. #ifndef ZZINF_DEF_TOKEN_BUFFER_SIZE
  247. #define ZZINF_DEF_TOKEN_BUFFER_SIZE     2000
  248. #endif
  249. /* WARNING!!!!!!
  250.  * ZZINF_BUFFER_TEXT_CHUNK_SIZE must be > sizeof(text) largest possible token.
  251.  */
  252. #ifndef ZZINF_BUFFER_TEXT_CHUNK_SIZE
  253. #define ZZINF_BUFFER_TEXT_CHUNK_SIZE 5000
  254. #endif
  255. #ifndef ZZINF_BUFFER_TOKEN_CHUNK_SIZE
  256. #define ZZINF_BUFFER_TOKEN_CHUNK_SIZE 1000
  257. #endif
  259. #if ZZLEXBUFSIZE > ZZINF_BUFFER_TEXT_CHUNK_SIZE
  260. #define ZZINF_BUFFER_TEXT_CHUNK_SIZE ZZLEXBUFSIZE+5
  261. #endif
  263. /* make inf_look user-access macros */
  264. #ifdef LL_K
  265. #define ZZINF_LA_VALID(i) (((zzinf_labase+i-1)-LL_K+1) <= zzinf_last)
  266. #define ZZINF_LA(i) zzinf_tokens[(zzinf_labase+i-1)-LL_K+1]
  267. #define ZZINF_LATEXT(i) zzinf_text[(zzinf_labase+i-1)-LL_K+1]
  268. /* MR6 In 1.33 vanilla the #define ZZINF_LINE(i) is was commented out */
  269. #define ZZINF_LINE(i)       zzinf_line[(zzinf_labase+i-1)-LL_K+1]
  270. #else
  271. #define ZZINF_LA_VALID(i) (((zzinf_labase+i-1)) <= zzinf_last)
  272. #define ZZINF_LA(i) zzinf_tokens[(zzinf_labase+i-1)]
  273. #define ZZINF_LATEXT(i) zzinf_text[(zzinf_labase+i-1)]
  274. #endif
  276. #define inf_zzgettok _inf_zzgettok()
  277. extern void _inf_zzgettok();
  279. #endif /* ZZINF_LOOK */
  282. #ifdef LL_K
  284. #ifdef __USE_PROTOS
  285. #define ANTLR_INFO
  286. Attrib zzempty_attr() {static Attrib a; return a;}    
  287. Attrib zzconstr_attr(int _tok, char *_text)    
  288. {Attrib a; zzcr_attr((&a),_tok,_text); return a;}    
  289. int zzasp=ZZA_STACKSIZE;    
  290. char zzStackOvfMsg[]="fatal: attrib/AST stack overflow %s(%d)!n"; 
  291. Attrib zzaStack[ZZA_STACKSIZE]; DemandLookData    
  292. InfLookData                                                        
  293.     zzGuessData
  294. #else
  295. #define ANTLR_INFO
  296. Attrib zzempty_attr() {static Attrib a; return a;}     
  297. Attrib zzconstr_attr(_tok, _text) int _tok; char *_text;            
  298. {Attrib a; zzcr_attr((&a),_tok,_text); return a;}     
  299. int zzasp=ZZA_STACKSIZE;     
  300. char zzStackOvfMsg[]="fatal: attrib/AST stack overflow %s(%d)!n";  
  301. Attrib zzaStack[ZZA_STACKSIZE]; DemandLookData     
  302. InfLookData                                                         
  303.     zzGuessData
  304. #endif
  306. #else
  308. #ifdef __USE_PROTOS
  309. #define ANTLR_INFO
  310. Attrib zzempty_attr() {static Attrib a; return a;}
  311. Attrib zzconstr_attr(int _tok, char *_text)
  312. {Attrib a; zzcr_attr((&a),_tok,_text); return a;}
  313. int zzasp=ZZA_STACKSIZE;
  314. char zzStackOvfMsg[]="fatal: attrib/AST stack overflow %s(%d)!n";      
  315. Attrib zzaStack[ZZA_STACKSIZE]; DemandLookData
  316. InfLookData                                                             
  317.     zzGuessData
  318. #else
  319. #define ANTLR_INFO
  320. Attrib zzempty_attr() {static Attrib a; return a;}
  321. Attrib zzconstr_attr(_tok, _text) int _tok; char *_text;                
  322. {Attrib a; zzcr_attr((&a),_tok,_text); return a;}
  323. int zzasp=ZZA_STACKSIZE;
  324. char zzStackOvfMsg[]="fatal: attrib/AST stack overflow %s(%d)!n";      
  325. Attrib zzaStack[ZZA_STACKSIZE]; DemandLookData
  326. InfLookData                                                             
  327.     zzGuessData
  328. #endif
  330. #endif /* LL_k */
  333. #ifdef ZZINF_LOOK
  335. #ifdef LL_K
  336. #ifdef DEMAND_LOOK
  337. #define zzPrimeLookAhead  {zzdirty=LL_K; zzlap = zzlabase = 0;}
  338. #else
  339. #define zzPrimeLookAhead  {zzlap = zzlabase = 0; zzfill_inf_look();
  340.   {int _i;  for(_i=1;_i<=LL_K; _i++)
  341. {zzCONSUME;} zzlap = zzlabase = 0;}}
  342. #endif
  344. #else /* LL_K */
  346. #ifdef DEMAND_LOOK
  347. #define zzPrimeLookAhead  zzfill_inf_look(); zzdirty=1
  348. #else
  349. #define zzPrimeLookAhead  zzfill_inf_look(); inf_zzgettok
  351. #endif
  352. #endif /* LL_K */
  354. #else /* ZZINF_LOOK */
  356. #ifdef LL_K
  357. #ifdef DEMAND_LOOK
  358. #define zzPrimeLookAhead  {zzdirty=LL_K; zzlap = zzlabase = 0;}
  359. #else
  360. #define zzPrimeLookAhead  {int _i; zzlap = 0; for(_i=1;_i<=LL_K; _i++)
  361. {zzCONSUME;} zzlap = 0;}
  362. #endif
  364. #else
  366. #ifdef DEMAND_LOOK
  367. #define zzPrimeLookAhead  zzdirty=1
  368. #else
  369. #define zzPrimeLookAhead  zzgettok()
  370. #endif
  371. #endif /* LL_K */
  373. #endif /* ZZINF_LOOK */
  376. #ifdef LL_K
  377. #define zzenterANTLRs(s)                            
  378.         zzlextext = &(zztextLA[0][0]); zzrdstr( s ); zzPrimeLookAhead;
  379. #define zzenterANTLRf(f)
  380. zzlextext = &(zztextLA[0][0]); zzrdfunc( f ); zzPrimeLookAhead;
  381. #define zzenterANTLR(f)
  382. zzlextext = &(zztextLA[0][0]); zzrdstream( f ); zzPrimeLookAhead;
  383. #ifdef ZZINF_LOOK
  384. #define zzleaveANTLR(f) free(zzinf_text_buffer); free(zzinf_text); free(zzinf_tokens); free(zzinf_line);
  385. #define zzleaveANTLRf(f)     free(zzinf_text_buffer); free(zzinf_text); free(zzinf_tokens); free(zzinf_line);
  386. #define zzleaveANTLRs(f) free(zzinf_text_buffer); free(zzinf_text); free(zzinf_tokens); free(zzinf_line);
  387. #else
  388. #define zzleaveANTLR(f)
  389. #define zzleaveANTLRf(f)
  390. #define zzleaveANTLRs(f)
  391. #endif
  393. #else
  395. #define zzenterANTLRs(s)                            
  396.         {static char zztoktext[ZZLEXBUFSIZE];   
  397.         zzlextext = zztoktext; zzrdstr( s ); zzPrimeLookAhead;}
  398. #define zzenterANTLRf(f)
  399. {static char zztoktext[ZZLEXBUFSIZE];
  400. zzlextext = zztoktext; zzrdfunc( f ); zzPrimeLookAhead;}
  401. #define zzenterANTLR(f)
  402. {static char zztoktext[ZZLEXBUFSIZE];
  403. zzlextext = zztoktext; zzrdstream( f ); zzPrimeLookAhead;}
  404. #ifdef ZZINF_LOOK
  405. #define zzleaveANTLR(f) free(zzinf_text_buffer); free(zzinf_text); free(zzinf_tokens); free(zzinf_line);
  406. #define zzleaveANTLRf(f)     free(zzinf_text_buffer); free(zzinf_text); free(zzinf_tokens); free(zzinf_line);
  407. #define zzleaveANTLRs(f) free(zzinf_text_buffer); free(zzinf_text); free(zzinf_tokens); free(zzinf_line);
  408. #else
  409. #define zzleaveANTLR(f)
  410. #define zzleaveANTLRf(f)
  411. #define zzleaveANTLRs(f)
  412. #endif
  414. #endif
  416. #define ANTLR(st, f) zzbufsize = ZZLEXBUFSIZE;
  417. zzenterANTLR(f);
  418. st; ++zzasp;
  419. zzleaveANTLR(f);
  421. #define ANTLRm(st, f, _m) zzbufsize = ZZLEXBUFSIZE;
  422. zzmode(_m);
  423. zzenterANTLR(f);
  424. st; ++zzasp;
  425. zzleaveANTLR(f);
  427. #define ANTLRf(st, f) zzbufsize = ZZLEXBUFSIZE;
  428. zzenterANTLRf(f);
  429. st; ++zzasp;
  430. zzleaveANTLRf(f);
  432. #define ANTLRs(st, s)   zzbufsize = ZZLEXBUFSIZE;
  433.                         zzenterANTLRs(s);           
  434.                         st; ++zzasp;
  435.                         zzleaveANTLRs(s);
  437. #ifdef LL_K
  438. #define zztext (&(zztextLA[zzlap][0]))
  439. #else
  440. #define zztext zzlextext
  441. #endif
  444. /* A r g u m e n t  A c c e s s */
  446. #define zzaCur (zzaStack[zzasp])
  447. #define zzaRet (*zzaRetPtr)
  448. #define zzaArg(v,n) zzaStack[v-n]
  449. #define zzMakeAttr { zzNON_GUESS_MODE {zzOvfChk; --zzasp; zzcr_attr(&(zzaStack[zzasp]),LA(1),LATEXT(1));}}
  450. #ifdef zzdef0
  451. #define zzMake0 { zzOvfChk; --zzasp; zzdef0(&(zzaStack[zzasp]));}
  452. #else
  453. #define zzMake0 { zzOvfChk; --zzasp;}
  454. #endif
  455. #define zzaPush(_v) { zzOvfChk; zzaStack[--zzasp] = _v;}
  456. #ifndef zzd_attr
  457. #define zzREL(t) zzasp=(t); /* Restore state of stack */
  458. #else
  459. #define zzREL(t) for (; zzasp<(t); zzasp++)
  460. { zzd_attr(&(zzaStack[zzasp])); }
  461. #endif
  464. #define zzsetmatch(_es)
  465. if ( !_zzsetmatch(_es, &zzBadText, &zzMissText, &zzMissTok, &zzBadTok, &zzMissSet) ) goto fail;
  467. #ifdef ZZCAN_GUESS
  468. #define zzsetmatch_wsig(_es, handler)
  469. if ( !_zzsetmatch_wsig(_es) ) if (zzguessing) { zzGUESS_FAIL; } else {_signal=MismatchedToken; goto handler;}
  470. #else
  471. #define zzsetmatch_wsig(_es, handler)
  472. if ( !_zzsetmatch_wsig(_es) ) {_signal=MismatchedToken; goto handler;}
  473. #endif
  475. #ifdef __USE_PROTOS
  476. extern int _zzsetmatch(SetWordType *, char **, char **, int *, int *, SetWordType **);
  477. extern int _zzsetmatch_wsig(SetWordType *);
  478. #else
  479. extern int _zzsetmatch();
  480. extern int _zzsetmatch_wsig();
  481. #endif
  483. #define zzmatch(_t)
  484. if ( !_zzmatch(_t, &zzBadText, &zzMissText, &zzMissTok, &zzBadTok, &zzMissSet) ) goto fail;
  486. #ifdef ZZCAN_GUESS
  487. #define zzmatch_wsig(_t,handler)
  488. if ( !_zzmatch_wsig(_t) ) if (zzguessing) { zzGUESS_FAIL; } else {_signal=MismatchedToken; goto handler;}
  489. #else
  490. #define zzmatch_wsig(_t,handler)
  491. if ( !_zzmatch_wsig(_t) ) {_signal=MismatchedToken; goto handler;}
  492. #endif
  494. #ifdef __USE_PROTOS
  495. extern int _zzmatch(int, char **, char **, int *, int *, SetWordType **);
  496. extern int _zzmatch_wsig(int);
  497. #else
  498. extern int _zzmatch();
  499. extern int _zzmatch_wsig();
  500. #endif
  502. #define zzmatch_wdfltsig(_t,_f)
  503. if ( !_zzmatch_wdfltsig(_t,_f) ) _signal=MismatchedToken;
  504. #define zzsetmatch_wdfltsig(tw,tt,wf)
  505. if ( !_zzsetmatch_wdfltsig(tw,tt,wf) ) _signal=MismatchedToken;
  507. #ifdef __USE_PROTOS
  508. extern int _zzmatch_wdfltsig(int, SetWordType *);
  509. extern int _zzsetmatch_wdfltsig(SetWordType *tokensWanted,
  510. int tokenTypeOfSet,
  511. SetWordType *whatFollows);
  512. #else
  513. extern int _zzmatch_wdfltsig();
  514. extern int _zzsetmatch_wdfltsig();
  515. #endif
  517. #ifdef GENAST
  518. #define zzRULE Attrib *zzaRetPtr = &(zzaStack[zzasp-1]);
  519. SetWordType *zzMissSet=NULL; int zzMissTok=0;
  520. int zzBadTok=0; char *zzBadText="";
  521. int zzErrk=1,zzpf=0;
  522.                     zzTRACEdata 
  523. char *zzMissText=""; zzASTVars
  524. #else
  525. #define zzRULE Attrib *zzaRetPtr = &(zzaStack[zzasp-1]);
  526. int zzBadTok=0; char *zzBadText="";
  527. int zzErrk=1,zzpf=0;
  528.                     zzTRACEdata 
  529. SetWordType *zzMissSet=NULL; int zzMissTok=0; char *zzMissText=""
  530. #endif
  532. #ifdef GENAST
  533. #define zzBLOCK(i) int i = zzasp - 1; int zztsp = zzast_sp
  534. #define zzEXIT(i) zzREL(i); zzastREL; zzNON_GUESS_MODE { zzastPush(*_root); }
  535. #define zzLOOP(i) zzREL(i); zzastREL
  536. #else
  537. #define zzBLOCK(i) int i = zzasp - 1
  538. #define zzEXIT(i) zzREL(i)
  539. #define zzLOOP(i) zzREL(i)
  540. #endif
  542. #ifdef LL_K
  544. #ifdef DEMAND_LOOK
  545. #define LOOK(_k) {int i,stop=_k-(LL_K-zzdirty); for (i=1; i<=stop; i++)
  546. zzCONSUME;}
  547. #define zzCONSUME {zzgettok(); zzdirty--;
  548. zzlap = (zzlap+1)&(LL_K-1);
  549. zzlextext = &(zztextLA[zzlap][0]);}
  550. #else
  551. #ifdef ZZINF_LOOK
  552. #define zzCONSUME {inf_zzgettok; 
  553. zzlap = (zzlap+1)&(LL_K-1);
  554. zzlextext = &(zztextLA[zzlap][0]);
  555. }
  556. #else
  557. #define zzCONSUME {zzgettok(); 
  558. zzlap = (zzlap+1)&(LL_K-1);
  559. zzlextext = &(zztextLA[zzlap][0]);}
  560. #endif /* ZZINF_LOOK */
  561. #endif /* DEMAND_LOOK */
  563. #else /* LL_K */
  565. #ifdef DEMAND_LOOK
  566. #define LOOK(_k) if ( zzdirty) zzCONSUME;
  567. #ifdef ZZINF_LOOK
  568. #define zzCONSUME inf_zzgettok; zzdirty=0;
  569. #else
  570. #define zzCONSUME zzgettok(); zzdirty=0;
  571. #endif /* ZZINF_LOOK */
  573. #else  /* DEMAND_LOOK */
  575. #ifdef ZZINF_LOOK
  576. #define zzCONSUME inf_zzgettok
  577. #else
  578. #define zzCONSUME zzgettok();
  579. #endif
  581. #endif /* DEMAND_LOOK */
  583. #endif /* LL_K */
  585. #ifdef LL_K
  586. #define NLA zztokenLA[zzlap&(LL_K-1)] /* --> next LA */
  587. #define NLATEXT zztextLA[zzlap&(LL_K-1)] /* --> next text of LA */
  588. #ifdef DEMAND_LOOK
  589. #define LA(i)       zztokenLA[(zzlabase+(i)-1)&(LL_K-1)]
  590. #define LATEXT(i)   (&(zztextLA[(zzlabase+(i)-1)&(LL_K-1)][0]))
  591. #else
  592. #define LA(i)       zztokenLA[(zzlap+(i)-1)&(LL_K-1)]
  593. #define LATEXT(i)   (&(zztextLA[(zzlap+(i)-1)&(LL_K-1)][0]))
  594. #endif
  595. #else
  596. #define NLA zztoken
  597. #define NLATEXT zztext
  598. #define LA(i)       zztoken
  599. #define LATEXT(i)   zztext
  600. #endif
  603.            /* S t a n d a r d  S i g n a l s */
  605. #define NoSignal 0
  606. #define MismatchedToken 1
  607. #define NoViableAlt 2
  608. #define NoSemViableAlt 3
  610. /* MR7  Allow more control over signalling                                  */
  611. /*        by adding "Unwind" and "zzsetSignal"                              */
  613. #define Unwind              4
  614. #define zzsetSignal(newValue) *_retsignal=_signal=(newValue)
  615. #define zzsuppressSignal *_retsignal=_signal=0
  616. #define zzexportSignal    *_retsignal=_signal
  618.            /* F u n c t i o n  T r a c i n g */
  620. #ifndef zzTRACE_RULES
  621. #define zzTRACEdata
  622. #else
  623. #ifndef zzTRACEdata
  624. #define zzTRACEdata     ANTLRChar *zzTracePrevRuleName;
  625. #endif
  626. #endif
  628. #ifndef zzTRACEIN
  629. #define zzTRACEIN(r) zzTracePrevRuleName=zzTraceCurrentRuleName;zzTraceIn(r);
  630. #endif
  631. #ifndef zzTRACEOUT
  632. #define zzTRACEOUT(r) zzTraceOut(r);zzTraceCurrentRuleName=zzTracePrevRuleName;
  633. #endif
  635. #ifdef ZZWCHAR_T
  636. #define zzchar_t wchar_t
  637. #else
  638. #define zzchar_t char
  639. #endif
  641. /* E x t e r n  D e f s */
  643. #ifdef __USE_PROTOS
  644. extern Attrib zzempty_attr();
  645. extern Attrib zzconstr_attr(int, char *);
  646. extern void zzsyn(char *, int, char *, SetWordType *, int, int, char *);
  647. extern int zzset_el(unsigned, SetWordType *);
  648. extern int zzset_deg(SetWordType *);
  649. extern void zzedecode(SetWordType *);
  650. extern void zzFAIL(int k, ...);
  651. extern void zzresynch(SetWordType *, SetWordType);
  652. extern void zzsave_antlr_state(zzantlr_state *);
  653. extern void zzrestore_antlr_state(zzantlr_state *);
  654. extern void zzfill_inf_look(void);
  655. extern void zzconsumeUntil(SetWordType *st);                         /* MR7 */
  656. extern void zzconsumeUntilToken(int t);                              /* MR7 */
  657. extern void zzTraceIn(char * ruleName);                              /* MR10 */
  658. extern void zzTraceOut(char * ruleName);                             /* MR10 */
  659. extern int  zzTraceOption(int delta);                                /* MR10 */
  660. extern int  zzTraceGuessOption(int delta);                           /* MR10 */
  661. extern void zzTraceReset();                                          /* MR10 */
  662. extern void zzTraceGuessFail();                                      /* MR10 */
  663. #ifdef EXCEPTION_HANDLING
  664. extern void zzdflthandlers(int, int *);
  665. #endif
  666. #else
  667. extern Attrib zzempty_attr();
  668. extern Attrib zzconstr_attr();
  669. extern void zzsyn();
  670. extern int zzset_el();
  671. extern int zzset_deg();
  672. extern void zzedecode();
  673. extern void zzFAIL();
  674. extern void zzresynch();
  675. extern void zzsave_antlr_state();
  676. extern void zzrestore_antlr_state();
  677. extern void zzfill_inf_look();
  678. extern void zzconsumeUntil();                                        /* MR7 */
  679. extern void zzconsumeUntilToken();                                   /* MR7 */
  680. extern void zzTraceIn();                                             /* MR10 */
  681. extern void zzTraceOut();                                            /* MR10 */
  682. extern int  zzTraceOption();                                         /* MR10 */
  683. extern int  zzTraceGuessOption();                                    /* MR10 */
  684. extern void zzTraceReset();                                          /* MR10 */
  685. extern void zzTraceGuessFail();                                      /* MR10 */
  686. #ifdef EXCEPTION_HANDLING
  687. extern void zzdflthandlers();
  688. #endif
  689. #endif
  691. /* G l o b a l  V a r i a b l e s */
  693. /* Define a parser; user should do a "#parser myname" in their grammar file */
  694. /*extern struct pccts_parser zzparser;*/
  696. extern char *zztokens[];
  697. #ifdef LL_K
  698. extern int zztokenLA[];
  699. extern char zztextLA[][ZZLEXBUFSIZE];
  700. extern int zzlap;
  701. extern int zzlabase;
  702. #else
  703. extern int zztoken;
  704. #endif
  706. extern char zzStackOvfMsg[];
  707. extern int zzasp;
  708. extern Attrib zzaStack[];
  709. #ifdef ZZINF_LOOK
  710. extern int *zzinf_tokens;
  711. extern char **zzinf_text;
  712. extern char *zzinf_text_buffer;
  713. extern int *zzinf_line;
  714. extern int zzinf_labase;
  715. extern int zzinf_last;
  716. #endif
  717. #ifdef DEMAND_LOOK
  718. extern int zzdirty;
  719. #endif
  720. #ifdef ZZCAN_GUESS
  721. extern int zzguessing;
  722. extern zzjmp_buf zzguess_start;
  723. #endif
  725. /* Define global veriables that refer to values exported by the scanner.
  726.  * These declarations duplicate those in dlgdef.h, but are needed
  727.  * if ANTLR is not to generate a .dlg file (-gx); PS, this is a hack.
  728.  */
  729. extern zzchar_t *zzlextext;     /* text of most recently matched token */
  730. extern int      zzbufsize;      /* how long zzlextext is */
  732. #endif