WebSVN – tendra.SVN – Diff – /branches/tendra5/src/utilities/lexi/syntax.c



/*
 * Automatically generated from the files:
 *	syntax.sid
 * and
 *	syntax.act
 * by:
 *	sid
 */
 
/* BEGINNING OF HEADER */

 
 
 
/* BEGINNING OF FUNCTION DECLARATIONS */
 
static void ZRstring_Hplus(SID_STRING *);
static void ZRchars(SID_CHARS *);
static void ZRargs(int *);
static void ZRtrigraph_Hdefn(void);
static void ZR60(SID_STRING *, int *);
extern void read_lex(void);
static void ZR68(void);
static void ZRcommand_Hlist(void);
static void ZRkeyword_Hdefn(void);
static void ZRif_Hcommand(void);
static void ZRcommand(void);
static void ZRtoken_Hdefn(void);
 
/* BEGINNING OF STATIC VARIABLES */
 
 
/* BEGINNING OF FUNCTION DEFINITIONS */
 
static void
ZRstring_Hplus(SID_STRING *ZOs)
 
{
    SID_STRING ZIs;
 
    if ((CURRENT_TERMINAL) == 23) {
	return;

  ZL0:;
    *ZOs = ZIs;
}
 
static void
 
ZRchars(SID_CHARS *ZOc)
{
    SID_CHARS ZIc;
 
    if ((CURRENT_TERMINAL) == 23) {
	return;

  ZL0:;
    *ZOc = ZIc;
}
 
static void
 
ZRargs(int *ZOa)
{
    int ZIa;
 
    switch (CURRENT_TERMINAL) {
      case 13:

  ZL0:;
    *ZOa = ZIa;
}
 
static void
ZRtrigraph_Hdefn(void)
{
    if ((CURRENT_TERMINAL) == 23) {
	return;
    }
    {

    SAVE_LEXER (23);
    return;
}
 
static void
 
ZR60(SID_STRING *ZOi, int *ZOa)
{
    SID_STRING ZIi;
    int ZIa;
 
    switch (CURRENT_TERMINAL) {

    *ZOi = ZIi;
    *ZOa = ZIa;
}
 
void
read_lex(void)
{
    if ((CURRENT_TERMINAL) == 23) {
	return;
    }
    {

    SAVE_LEXER (23);
    return;
}
 
static void
ZR68(void)
{
    switch (CURRENT_TERMINAL) {
      case 0:
	{
	    SID_STRING ZIi;

    SAVE_LEXER (23);
    return;
}
 
static void
ZRcommand_Hlist(void)
{
  ZL2_command_Hlist:;
    switch (CURRENT_TERMINAL) {
      case 6: case 7: case 8: case 9: case 11:
      case 15: case 21:

	}
    }
}
 
static void
ZRkeyword_Hdefn(void)
{
    if ((CURRENT_TERMINAL) == 23) {
	return;
    }
    {

    SAVE_LEXER (23);
    return;
}
 
static void
ZRif_Hcommand(void)
{
    if ((CURRENT_TERMINAL) == 23) {
	return;
    }
    {

    SAVE_LEXER (23);
    return;
}
 
static void
ZRcommand(void)
{
    switch (CURRENT_TERMINAL) {
      case 6:
	{
	    ADVANCE_LEXER;

    SAVE_LEXER (23);
    return;
}
 
static void
ZRtoken_Hdefn(void)
{
    if ((CURRENT_TERMINAL) == 23) {
	return;
    }
    {

Rev 5	Rev 6
Line 1...	Line 1...
1	`/*`	1	`/*`
2	`* Automatically generated from the files:`	2	`* Automatically generated from the files:`
3	`* /u/g/release/Source/src/utilities/lexi/syntax.sid`	3	`* syntax.sid`
4	`* and`	4	`* and`
5	`* /u/g/release/Source/src/utilities/lexi/syntax.act`	5	`* syntax.act`
6	`* by:`	6	`* by:`
7	`* sid`	7	`* sid`
8	`*/`	8	`*/`
9		9
10	`/* BEGINNING OF HEADER */`	10	`/* BEGINNING OF HEADER */`
Line 91...	Line 91...
91		91
92		92
93		93
94	`/* BEGINNING OF FUNCTION DECLARATIONS */`	94	`/* BEGINNING OF FUNCTION DECLARATIONS */`
95		95
96	`static void ZRstring_Hplus PROTO_S ((SID_STRING *));`	96	`static void ZRstring_Hplus(SID_STRING *);`
97	`static void ZRchars PROTO_S ((SID_CHARS *));`	97	`static void ZRchars(SID_CHARS *);`
98	`static void ZRargs PROTO_S ((int *));`	98	`static void ZRargs(int *);`
99	`static void ZRtrigraph_Hdefn PROTO_S ((void));`	99	`static void ZRtrigraph_Hdefn(void);`
100	`static void ZR60 PROTO_S ((SID_STRING , int ));`	100	`static void ZR60(SID_STRING , int );`
101	`extern void read_lex PROTO_S ((void));`	101	`extern void read_lex(void);`
102	`static void ZR68 PROTO_S ((void));`	102	`static void ZR68(void);`
103	`static void ZRcommand_Hlist PROTO_S ((void));`	103	`static void ZRcommand_Hlist(void);`
104	`static void ZRkeyword_Hdefn PROTO_S ((void));`	104	`static void ZRkeyword_Hdefn(void);`
105	`static void ZRif_Hcommand PROTO_S ((void));`	105	`static void ZRif_Hcommand(void);`
106	`static void ZRcommand PROTO_S ((void));`	106	`static void ZRcommand(void);`
107	`static void ZRtoken_Hdefn PROTO_S ((void));`	107	`static void ZRtoken_Hdefn(void);`
108		108
109	`/* BEGINNING OF STATIC VARIABLES */`	109	`/* BEGINNING OF STATIC VARIABLES */`
110		110
111		111
112	`/* BEGINNING OF FUNCTION DEFINITIONS */`	112	`/* BEGINNING OF FUNCTION DEFINITIONS */`
113		113
114	`static void`	114	`static void`
115	`ZRstring_Hplus PROTO_N ((ZOs))`	115	`ZRstring_Hplus(SID_STRING *ZOs)`
116	`PROTO_T (SID_STRING *ZOs)`	-
117	`{`	116	`{`
118	`SID_STRING ZIs;`	117	`SID_STRING ZIs;`
119		118
120	`if ((CURRENT_TERMINAL) == 23) {`	119	`if ((CURRENT_TERMINAL) == 23) {`
121	`return;`	120	`return;`
Line 195...	Line 194...
195	`ZL0:;`	194	`ZL0:;`
196	`*ZOs = ZIs;`	195	`*ZOs = ZIs;`
197	`}`	196	`}`
198		197
199	`static void`	198	`static void`
200	`ZRchars PROTO_N ((ZOc))`	-
201	`PROTO_T (SID_CHARS *ZOc)`	199	`ZRchars(SID_CHARS *ZOc)`
202	`{`	200	`{`
203	`SID_CHARS ZIc;`	201	`SID_CHARS ZIc;`
204		202
205	`if ((CURRENT_TERMINAL) == 23) {`	203	`if ((CURRENT_TERMINAL) == 23) {`
206	`return;`	204	`return;`
Line 225...	Line 223...
225	`ZL0:;`	223	`ZL0:;`
226	`*ZOc = ZIc;`	224	`*ZOc = ZIc;`
227	`}`	225	`}`
228		226
229	`static void`	227	`static void`
230	`ZRargs PROTO_N ((ZOa))`	-
231	`PROTO_T (int *ZOa)`	228	`ZRargs(int *ZOa)`
232	`{`	229	`{`
233	`int ZIa;`	230	`int ZIa;`
234		231
235	`switch (CURRENT_TERMINAL) {`	232	`switch (CURRENT_TERMINAL) {`
236	`case 13:`	233	`case 13:`
Line 265...	Line 262...
265	`ZL0:;`	262	`ZL0:;`
266	`*ZOa = ZIa;`	263	`*ZOa = ZIa;`
267	`}`	264	`}`
268		265
269	`static void`	266	`static void`
270	`ZRtrigraph_Hdefn PROTO_Z ()`	267	`ZRtrigraph_Hdefn(void)`
271	`{`	268	`{`
272	`if ((CURRENT_TERMINAL) == 23) {`	269	`if ((CURRENT_TERMINAL) == 23) {`
273	`return;`	270	`return;`
274	`}`	271	`}`
275	`{`	272	`{`
Line 313...	Line 310...
313	`SAVE_LEXER (23);`	310	`SAVE_LEXER (23);`
314	`return;`	311	`return;`
315	`}`	312	`}`
316		313
317	`static void`	314	`static void`
318	`ZR60 PROTO_N ((ZOi, ZOa))`	-
319	`PROTO_T (SID_STRING ZOi X int ZOa)`	315	`ZR60(SID_STRING ZOi, int ZOa)`
320	`{`	316	`{`
321	`SID_STRING ZIi;`	317	`SID_STRING ZIi;`
322	`int ZIa;`	318	`int ZIa;`
323		319
324	`switch (CURRENT_TERMINAL) {`	320	`switch (CURRENT_TERMINAL) {`
Line 382...	Line 378...
382	`*ZOi = ZIi;`	378	`*ZOi = ZIi;`
383	`*ZOa = ZIa;`	379	`*ZOa = ZIa;`
384	`}`	380	`}`
385		381
386	`void`	382	`void`
387	`read_lex PROTO_Z ()`	383	`read_lex(void)`
388	`{`	384	`{`
389	`if ((CURRENT_TERMINAL) == 23) {`	385	`if ((CURRENT_TERMINAL) == 23) {`
390	`return;`	386	`return;`
391	`}`	387	`}`
392	`{`	388	`{`
Line 421...	Line 417...
421	`SAVE_LEXER (23);`	417	`SAVE_LEXER (23);`
422	`return;`	418	`return;`
423	`}`	419	`}`
424		420
425	`static void`	421	`static void`
426	`ZR68 PROTO_Z ()`	422	`ZR68(void)`
427	`{`	423	`{`
428	`switch (CURRENT_TERMINAL) {`	424	`switch (CURRENT_TERMINAL) {`
429	`case 0:`	425	`case 0:`
430	`{`	426	`{`
431	`SID_STRING ZIi;`	427	`SID_STRING ZIi;`
Line 504...	Line 500...
504	`SAVE_LEXER (23);`	500	`SAVE_LEXER (23);`
505	`return;`	501	`return;`
506	`}`	502	`}`
507		503
508	`static void`	504	`static void`
509	`ZRcommand_Hlist PROTO_Z ()`	505	`ZRcommand_Hlist(void)`
510	`{`	506	`{`
511	`ZL2_command_Hlist:;`	507	`ZL2_command_Hlist:;`
512	`switch (CURRENT_TERMINAL) {`	508	`switch (CURRENT_TERMINAL) {`
513	`case 6: case 7: case 8: case 9: case 11:`	509	`case 6: case 7: case 8: case 9: case 11:`
514	`case 15: case 21:`	510	`case 15: case 21:`
Line 536...	Line 532...
536	`}`	532	`}`
537	`}`	533	`}`
538	`}`	534	`}`
539		535
540	`static void`	536	`static void`
541	`ZRkeyword_Hdefn PROTO_Z ()`	537	`ZRkeyword_Hdefn(void)`
542	`{`	538	`{`
543	`if ((CURRENT_TERMINAL) == 23) {`	539	`if ((CURRENT_TERMINAL) == 23) {`
544	`return;`	540	`return;`
545	`}`	541	`}`
546	`{`	542	`{`
Line 592...	Line 588...
592	`SAVE_LEXER (23);`	588	`SAVE_LEXER (23);`
593	`return;`	589	`return;`
594	`}`	590	`}`
595		591
596	`static void`	592	`static void`
597	`ZRif_Hcommand PROTO_Z ()`	593	`ZRif_Hcommand(void)`
598	`{`	594	`{`
599	`if ((CURRENT_TERMINAL) == 23) {`	595	`if ((CURRENT_TERMINAL) == 23) {`
600	`return;`	596	`return;`
601	`}`	597	`}`
602	`{`	598	`{`
Line 697...	Line 693...
697	`SAVE_LEXER (23);`	693	`SAVE_LEXER (23);`
698	`return;`	694	`return;`
699	`}`	695	`}`
700		696
701	`static void`	697	`static void`
702	`ZRcommand PROTO_Z ()`	698	`ZRcommand(void)`
703	`{`	699	`{`
704	`switch (CURRENT_TERMINAL) {`	700	`switch (CURRENT_TERMINAL) {`
705	`case 6:`	701	`case 6:`
706	`{`	702	`{`
707	`ADVANCE_LEXER;`	703	`ADVANCE_LEXER;`
Line 797...	Line 793...
797	`SAVE_LEXER (23);`	793	`SAVE_LEXER (23);`
798	`return;`	794	`return;`
799	`}`	795	`}`
800		796
801	`static void`	797	`static void`
802	`ZRtoken_Hdefn PROTO_Z ()`	798	`ZRtoken_Hdefn(void)`
803	`{`	799	`{`
804	`if ((CURRENT_TERMINAL) == 23) {`	800	`if ((CURRENT_TERMINAL) == 23) {`
805	`return;`	801	`return;`
806	`}`	802	`}`
807	`{`	803	`{`

Subversion Repositories tendra.SVN

(root)/branches/tendra5/src/utilities/lexi/syntax.c @ 6 – Rev 5 → 6