Subversion Repositories tendra.SVN

Rev

Rev 5 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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/producers/cpp/syntax/syntax.sid
3
 *	syntax.sid
4
 * and
4
 * and
5
 *	/u/g/release/Source/src/producers/cpp/syntax/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 129... Line 129...
129
#endif
129
#endif
130
 
130
 
131
 
131
 
132
 
132
 
133
void
133
void
134
ZR1232 PROTO_N ((ZI1230, ZO1231))
-
 
135
  PROTO_T (EXP ZI1230 X EXP *ZO1231)
134
ZR1232(EXP ZI1230, EXP *ZO1231)
136
{
135
{
137
    EXP ZI1231;
136
    EXP ZI1231;
138
 
137
 
139
  ZL2_1232:;
138
  ZL2_1232:;
140
    switch (CURRENT_TERMINAL) {
139
    switch (CURRENT_TERMINAL) {
Line 210... Line 209...
210
  ZL0:;
209
  ZL0:;
211
    *ZO1231 = ZI1231;
210
    *ZO1231 = ZI1231;
212
}
211
}
213
 
212
 
214
void
213
void
215
ZR899 PROTO_N ((ZO689))
-
 
216
  PROTO_T (DECL_SPEC *ZO689)
214
ZR899(DECL_SPEC *ZO689)
217
{
215
{
218
    DECL_SPEC ZI689;
216
    DECL_SPEC ZI689;
219
 
217
 
220
    switch (CURRENT_TERMINAL) {
218
    switch (CURRENT_TERMINAL) {
221
      case 133:
219
      case 133:
Line 262... Line 260...
262
  ZL0:;
260
  ZL0:;
263
    *ZO689 = ZI689;
261
    *ZO689 = ZI689;
264
}
262
}
265
 
263
 
266
void
264
void
267
ZR661 PROTO_N ((ZO431))
-
 
268
  PROTO_T (EXP *ZO431)
265
ZR661(EXP *ZO431)
269
{
266
{
270
    EXP ZI431;
267
    EXP ZI431;
271
 
268
 
272
    if ((CURRENT_TERMINAL) == 354) {
269
    if ((CURRENT_TERMINAL) == 354) {
273
	return;
270
	return;
Line 2843... Line 2840...
2843
  ZL0:;
2840
  ZL0:;
2844
    *ZO431 = ZI431;
2841
    *ZO431 = ZI431;
2845
}
2842
}
2846
 
2843
 
2847
void
2844
void
2848
ZR1236 PROTO_N ((ZI1234, ZO1235))
-
 
2849
  PROTO_T (EXP ZI1234 X EXP *ZO1235)
2845
ZR1236(EXP ZI1234, EXP *ZO1235)
2850
{
2846
{
2851
    EXP ZI1235;
2847
    EXP ZI1235;
2852
 
2848
 
2853
  ZL2_1236:;
2849
  ZL2_1236:;
2854
    switch (CURRENT_TERMINAL) {
2850
    switch (CURRENT_TERMINAL) {
Line 2915... Line 2911...
2915
  ZL0:;
2911
  ZL0:;
2916
    *ZO1235 = ZI1235;
2912
    *ZO1235 = ZI1235;
2917
}
2913
}
2918
 
2914
 
2919
void
2915
void
2920
ZR954 PROTO_N ((ZO1138))
-
 
2921
  PROTO_T (TYPE *ZO1138)
2916
ZR954(TYPE *ZO1138)
2922
{
2917
{
2923
    TYPE ZI1138;
2918
    TYPE ZI1138;
2924
 
2919
 
2925
    switch (CURRENT_TERMINAL) {
2920
    switch (CURRENT_TERMINAL) {
2926
      case 65:
2921
      case 65:
Line 3037... Line 3032...
3037
  ZL0:;
3032
  ZL0:;
3038
    *ZO1138 = ZI1138;
3033
    *ZO1138 = ZI1138;
3039
}
3034
}
3040
 
3035
 
3041
void
3036
void
3042
ZR1365 PROTO_N ((ZI689, ZI497, ZI480, ZI670, ZI720, ZI1364, ZO459))
-
 
3043
  PROTO_T (DECL_SPEC *ZI689 X TYPE *ZI497 X BASE_TYPE *ZI480 X ACCESS_LIST *ZI670 X int *ZI720 X IDENTIFIER *ZI1364 X IDENTIFIER *ZO459)
3037
ZR1365(DECL_SPEC *ZI689, TYPE *ZI497, BASE_TYPE *ZI480, ACCESS_LIST *ZI670, int *ZI720, IDENTIFIER *ZI1364, IDENTIFIER *ZO459)
3044
{
3038
{
3045
    IDENTIFIER ZI459;
3039
    IDENTIFIER ZI459;
3046
 
3040
 
3047
    switch (CURRENT_TERMINAL) {
3041
    switch (CURRENT_TERMINAL) {
3048
      case 41:
3042
      case 41:
Line 3211... Line 3205...
3211
  ZL0:;
3205
  ZL0:;
3212
    *ZO459 = ZI459;
3206
    *ZO459 = ZI459;
3213
}
3207
}
3214
 
3208
 
3215
void
3209
void
3216
ZR770 PROTO_N ((ZI493))
-
 
3217
  PROTO_T (EXP ZI493)
3210
ZR770(EXP ZI493)
3218
{
3211
{
3219
  ZL2_770:;
3212
  ZL2_770:;
3220
    switch (CURRENT_TERMINAL) {
3213
    switch (CURRENT_TERMINAL) {
3221
      case 128:
3214
      case 128:
3222
	{
3215
	{
Line 3239... Line 3232...
3239
    SAVE_LEXER (354);
3232
    SAVE_LEXER (354);
3240
    return;
3233
    return;
3241
}
3234
}
3242
 
3235
 
3243
void
3236
void
3244
ZR738 PROTO_N ((ZO431))
-
 
3245
  PROTO_T (EXP *ZO431)
3237
ZR738(EXP *ZO431)
3246
{
3238
{
3247
    EXP ZI431;
3239
    EXP ZI431;
3248
 
3240
 
3249
    switch (CURRENT_TERMINAL) {
3241
    switch (CURRENT_TERMINAL) {
3250
      case 101:
3242
      case 101:
Line 3545... Line 3537...
3545
  ZL0:;
3537
  ZL0:;
3546
    *ZO431 = ZI431;
3538
    *ZO431 = ZI431;
3547
}
3539
}
3548
 
3540
 
3549
void
3541
void
3550
ZR1240 PROTO_N ((ZI1238, ZO1239))
-
 
3551
  PROTO_T (EXP ZI1238 X EXP *ZO1239)
3542
ZR1240(EXP ZI1238, EXP *ZO1239)
3552
{
3543
{
3553
    EXP ZI1239;
3544
    EXP ZI1239;
3554
 
3545
 
3555
  ZL2_1240:;
3546
  ZL2_1240:;
3556
    switch (CURRENT_TERMINAL) {
3547
    switch (CURRENT_TERMINAL) {
Line 3724... Line 3715...
3724
  ZL0:;
3715
  ZL0:;
3725
    *ZO1239 = ZI1239;
3716
    *ZO1239 = ZI1239;
3726
}
3717
}
3727
 
3718
 
3728
void
3719
void
3729
ZR639 PROTO_Z ()
3720
ZR639(void)
3730
{
3721
{
3731
    switch (CURRENT_TERMINAL) {
3722
    switch (CURRENT_TERMINAL) {
3732
      case 45:
3723
      case 45:
3733
	{
3724
	{
3734
	    ADVANCE_LEXER;
3725
	    ADVANCE_LEXER;
Line 3819... Line 3810...
3819
    SAVE_LEXER (354);
3810
    SAVE_LEXER (354);
3820
    return;
3811
    return;
3821
}
3812
}
3822
 
3813
 
3823
void
3814
void
3824
ZR1368 PROTO_N ((ZI689, ZI497, ZI480, ZI670, ZI720, ZI1367, ZO459))
-
 
3825
  PROTO_T (DECL_SPEC *ZI689 X TYPE *ZI497 X BASE_TYPE *ZI480 X ACCESS_LIST *ZI670 X int *ZI720 X IDENTIFIER *ZI1367 X IDENTIFIER *ZO459)
3815
ZR1368(DECL_SPEC *ZI689, TYPE *ZI497, BASE_TYPE *ZI480, ACCESS_LIST *ZI670, int *ZI720, IDENTIFIER *ZI1367, IDENTIFIER *ZO459)
3826
{
3816
{
3827
    IDENTIFIER ZI459;
3817
    IDENTIFIER ZI459;
3828
 
3818
 
3829
    switch (CURRENT_TERMINAL) {
3819
    switch (CURRENT_TERMINAL) {
3830
      default:
3820
      default:
Line 3998... Line 3988...
3998
  ZL0:;
3988
  ZL0:;
3999
    *ZO459 = ZI459;
3989
    *ZO459 = ZI459;
4000
}
3990
}
4001
 
3991
 
4002
void
3992
void
4003
ZR669 PROTO_N ((ZO431))
-
 
4004
  PROTO_T (EXP *ZO431)
3993
ZR669(EXP *ZO431)
4005
{
3994
{
4006
    EXP ZI431;
3995
    EXP ZI431;
4007
 
3996
 
4008
    switch (CURRENT_TERMINAL) {
3997
    switch (CURRENT_TERMINAL) {
4009
      case 345:
3998
      case 345:
Line 4130... Line 4119...
4130
  ZL0:;
4119
  ZL0:;
4131
    *ZO431 = ZI431;
4120
    *ZO431 = ZI431;
4132
}
4121
}
4133
 
4122
 
4134
void
4123
void
4135
ZR1077 PROTO_N ((ZO431))
-
 
4136
  PROTO_T (EXP *ZO431)
4124
ZR1077(EXP *ZO431)
4137
{
4125
{
4138
    EXP ZI431;
4126
    EXP ZI431;
4139
 
4127
 
4140
    switch (CURRENT_TERMINAL) {
4128
    switch (CURRENT_TERMINAL) {
4141
      case 139:
4129
      case 139:
Line 4179... Line 4167...
4179
  ZL0:;
4167
  ZL0:;
4180
    *ZO431 = ZI431;
4168
    *ZO431 = ZI431;
4181
}
4169
}
4182
 
4170
 
4183
void
4171
void
4184
ZR1125 PROTO_N ((ZI456, ZI574, ZO493, ZO414))
-
 
4185
  PROTO_T (OFFSET ZI456 X TYPE ZI574 X OFFSET *ZO493 X TYPE *ZO414)
4172
ZR1125(OFFSET ZI456, TYPE ZI574, OFFSET *ZO493, TYPE *ZO414)
4186
{
4173
{
4187
    OFFSET ZI493;
4174
    OFFSET ZI493;
4188
    TYPE ZI414;
4175
    TYPE ZI414;
4189
 
4176
 
4190
    if ((CURRENT_TERMINAL) == 354) {
4177
    if ((CURRENT_TERMINAL) == 354) {
Line 4225... Line 4212...
4225
    *ZO493 = ZI493;
4212
    *ZO493 = ZI493;
4226
    *ZO414 = ZI414;
4213
    *ZO414 = ZI414;
4227
}
4214
}
4228
 
4215
 
4229
void
4216
void
4230
ZR508 PROTO_N ((ZO419))
-
 
4231
  PROTO_T (IDENTIFIER *ZO419)
4217
ZR508(IDENTIFIER *ZO419)
4232
{
4218
{
4233
    IDENTIFIER ZI419;
4219
    IDENTIFIER ZI419;
4234
 
4220
 
4235
    switch (CURRENT_TERMINAL) {
4221
    switch (CURRENT_TERMINAL) {
4236
      case 7:
4222
      case 7:
Line 4304... Line 4290...
4304
  ZL0:;
4290
  ZL0:;
4305
    *ZO419 = ZI419;
4291
    *ZO419 = ZI419;
4306
}
4292
}
4307
 
4293
 
4308
void
4294
void
4309
ZR762 PROTO_N ((ZI493))
-
 
4310
  PROTO_T (EXP ZI493)
4295
ZR762(EXP ZI493)
4311
{
4296
{
4312
    if ((CURRENT_TERMINAL) == 354) {
4297
    if ((CURRENT_TERMINAL) == 354) {
4313
	return;
4298
	return;
4314
    }
4299
    }
4315
    {
4300
    {
Line 4437... Line 4422...
4437
    SAVE_LEXER (354);
4422
    SAVE_LEXER (354);
4438
    return;
4423
    return;
4439
}
4424
}
4440
 
4425
 
4441
void
4426
void
4442
ZR1030 PROTO_Z ()
4427
ZR1030(void)
4443
{
4428
{
4444
    switch (CURRENT_TERMINAL) {
4429
    switch (CURRENT_TERMINAL) {
4445
      case 30:
4430
      case 30:
4446
	{
4431
	{
4447
	    ADVANCE_LEXER;
4432
	    ADVANCE_LEXER;
Line 4506... Line 4491...
4506
    SAVE_LEXER (354);
4491
    SAVE_LEXER (354);
4507
    return;
4492
    return;
4508
}
4493
}
4509
 
4494
 
4510
void
4495
void
4511
ZR601 PROTO_N ((ZO1235))
-
 
4512
  PROTO_T (EXP *ZO1235)
4496
ZR601(EXP *ZO1235)
4513
{
4497
{
4514
    EXP ZI1235;
4498
    EXP ZI1235;
4515
 
4499
 
4516
    if ((CURRENT_TERMINAL) == 354) {
4500
    if ((CURRENT_TERMINAL) == 354) {
4517
	return;
4501
	return;
Line 4533... Line 4517...
4533
  ZL0:;
4517
  ZL0:;
4534
    *ZO1235 = ZI1235;
4518
    *ZO1235 = ZI1235;
4535
}
4519
}
4536
 
4520
 
4537
void
4521
void
4538
ZR1371 PROTO_N ((ZO1159, ZO1160))
-
 
4539
  PROTO_T (TYPE *ZO1159 X IDENTIFIER *ZO1160)
4522
ZR1371(TYPE *ZO1159, IDENTIFIER *ZO1160)
4540
{
4523
{
4541
    TYPE ZI1159;
4524
    TYPE ZI1159;
4542
    IDENTIFIER ZI1160;
4525
    IDENTIFIER ZI1160;
4543
 
4526
 
4544
    if ((CURRENT_TERMINAL) == 354) {
4527
    if ((CURRENT_TERMINAL) == 354) {
Line 4896... Line 4879...
4896
    *ZO1159 = ZI1159;
4879
    *ZO1159 = ZI1159;
4897
    *ZO1160 = ZI1160;
4880
    *ZO1160 = ZI1160;
4898
}
4881
}
4899
 
4882
 
4900
void
4883
void
4901
ZR475 PROTO_N ((ZI425, ZO414))
-
 
4902
  PROTO_T (NAMESPACE ZI425 X int *ZO414)
4884
ZR475(NAMESPACE ZI425, int *ZO414)
4903
{
4885
{
4904
    int ZI414;
4886
    int ZI414;
4905
 
4887
 
4906
    switch (CURRENT_TERMINAL) {
4888
    switch (CURRENT_TERMINAL) {
4907
      default:
4889
      default:
Line 4928... Line 4910...
4928
    }
4910
    }
4929
    *ZO414 = ZI414;
4911
    *ZO414 = ZI414;
4930
}
4912
}
4931
 
4913
 
4932
void
4914
void
4933
ZR827 PROTO_N ((ZO493))
-
 
4934
  PROTO_T (DECL_SPEC *ZO493)
4915
ZR827(DECL_SPEC *ZO493)
4935
{
4916
{
4936
    DECL_SPEC ZI493;
4917
    DECL_SPEC ZI493;
4937
 
4918
 
4938
    switch (CURRENT_TERMINAL) {
4919
    switch (CURRENT_TERMINAL) {
4939
      case 142:
4920
      case 142:
Line 4972... Line 4953...
4972
  ZL0:;
4953
  ZL0:;
4973
    *ZO493 = ZI493;
4954
    *ZO493 = ZI493;
4974
}
4955
}
4975
 
4956
 
4976
void
4957
void
4977
ZR1052 PROTO_Z ()
4958
ZR1052(void)
4978
{
4959
{
4979
    if ((CURRENT_TERMINAL) == 354) {
4960
    if ((CURRENT_TERMINAL) == 354) {
4980
	return;
4961
	return;
4981
    }
4962
    }
4982
    {
4963
    {
Line 4995... Line 4976...
4995
    }
4976
    }
4996
    return;
4977
    return;
4997
  ZL1:;
4978
  ZL1:;
4998
    SAVE_LEXER (354);
4979
    SAVE_LEXER (354);
4999
    return;
4980
    return;
-
 
4981
}
-
 
4982
 
-
 
4983
void
-
 
4984
ZR869(IDENTIFIER *ZO419)
-
 
4985
{
-
 
4986
    IDENTIFIER ZI419;
-
 
4987
 
-
 
4988
    switch (CURRENT_TERMINAL) {
-
 
4989
      case 1: case 2: case 3: case 4: case 7:
-
 
4990
      case 8: case 9: case 83:
-
 
4991
	{
-
 
4992
	    NAMESPACE ZI425;
-
 
4993
	    IDENTIFIER ZI820;
-
 
4994
 
-
 
4995
	    ZR428 (&ZI425);
-
 
4996
	    ZR508 (&ZI820);
-
 
4997
	    if ((CURRENT_TERMINAL) == 354) {
-
 
4998
		RESTORE_LEXER;
-
 
4999
		goto ZL1;
-
 
5000
	    }
-
 
5001
	    {
-
 
5002
 
-
 
5003
    (ZI419) = check_id ( (ZI425), (ZI820), 0 ) ;
-
 
5004
    last_namespace = (ZI425) ;
-
 
5005
	    }
-
 
5006
	}
-
 
5007
	break;
-
 
5008
      default:
-
 
5009
	{
-
 
5010
	    {
-
 
5011
 
-
 
5012
    HASHID nm = lookup_anon () ;
-
 
5013
    (ZI419) = DEREF_id ( hashid_id ( nm ) ) ;
-
 
5014
    crt_id_qualifier = qual_none ;
-
 
5015
    qual_namespace = NULL_nspace ;
-
 
5016
	    }
-
 
5017
	}
-
 
5018
	break;
-
 
5019
      case 354:
-
 
5020
	return;
-
 
5021
    }
-
 
5022
    goto ZL0;
-
 
5023
  ZL1:;
-
 
5024
    SAVE_LEXER (354);
-
 
5025
    return;
-
 
5026
  ZL0:;
-
 
5027
    *ZO419 = ZI419;
5000
}
5028
}
5001
 
5029
 
5002
/* END OF FILE */
5030
/* END OF FILE */