Subversion Repositories tendra.SVN

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 7u83 1
/*
2
    		 Crown Copyright (c) 1997, 1998
3
 
4
    This TenDRA(r) Computer Program is subject to Copyright
5
    owned by the United Kingdom Secretary of State for Defence
6
    acting through the Defence Evaluation and Research Agency
7
    (DERA).  It is made available to Recipients with a
8
    royalty-free licence for its use, reproduction, transfer
9
    to other parties and amendment for any purpose not excluding
10
    product development provided that any such use et cetera
11
    shall be deemed to be acceptance of the following conditions:-
12
 
13
        (1) Its Recipients shall ensure that this Notice is
14
        reproduced upon any copies or amended versions of it;
15
 
16
        (2) Any amended version of it shall be clearly marked to
17
        show both the nature of and the organisation responsible
18
        for the relevant amendment or amendments;
19
 
20
        (3) Its onward transfer from a recipient to another
21
        party shall be deemed to be that party's acceptance of
22
        these conditions;
23
 
24
        (4) DERA gives no warranty or assurance as to its
25
        quality or suitability for any purpose and DERA accepts
26
        no liability whatsoever in relation to any use to which
27
        it may be put.
28
*/
29
 
30
/*
31
    AUTOMATICALLY GENERATED FROM ALGEBRA c_class (VERSION 1.1)
32
    BY calculus (VERSION 1.2)
33
*/
34
 
35
#ifndef ID_OPS_H_INCLUDED
36
#define ID_OPS_H_INCLUDED
37
 
38
/* Operations for union IDENTIFIER */
39
 
40
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : unsigned : TAG_id #
41
#pragma interface TAG_id
42
 
43
 
44
/* Operations for component name of union IDENTIFIER */
45
 
46
#pragma token PROC ( EXP : IDENTIFIER : )\
47
    EXP : PTR ( HASHID ) : id_name #
48
#pragma interface id_name
49
 
50
/* Operations for component storage of union IDENTIFIER */
51
 
52
#pragma token PROC ( EXP : IDENTIFIER : )\
53
    EXP : PTR ( DECL_SPEC ) : id_storage #
54
#pragma interface id_storage
55
 
56
/* Operations for component parent of union IDENTIFIER */
57
 
58
#pragma token PROC ( EXP : IDENTIFIER : )\
59
    EXP : PTR ( NAMESPACE ) : id_parent #
60
#pragma interface id_parent
61
 
62
/* Operations for component loc of union IDENTIFIER */
63
 
64
#pragma token PROC ( EXP : IDENTIFIER : )\
65
    EXP : PTR ( LOCATION ) : id_loc #
66
#pragma interface id_loc
67
 
68
/* Operations for component alias of union IDENTIFIER */
69
 
70
#pragma token PROC ( EXP : IDENTIFIER : )\
71
    EXP : PTR ( IDENTIFIER ) : id_alias #
72
#pragma interface id_alias
73
 
74
/* Operations for component no of union IDENTIFIER */
75
 
76
#pragma token PROC ( EXP : IDENTIFIER : )\
77
    EXP : PTR ( ulong_type ) : id_no #
78
#pragma interface id_no
79
 
80
/* Operations for component dump of union IDENTIFIER */
81
 
82
#pragma token PROC ( EXP : IDENTIFIER : )\
83
    EXP : PTR ( ulong_type ) : id_dump #
84
#pragma interface id_dump
85
 
86
/* Operations for field dummy of union IDENTIFIER */
87
 
88
#pragma token EXP const : unsigned : id_dummy_tag #
89
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_dummy #
90
#pragma interface id_dummy_tag IS_id_dummy
91
 
92
#pragma token PROC (\
93
	EXP : HASHID :,\
94
	EXP : DECL_SPEC :,\
95
	EXP : NAMESPACE :,\
96
	EXP : LOCATION :,\
97
	EXP lvalue : IDENTIFIER :\
98
    ) STATEMENT MAKE_id_dummy #
99
#pragma interface MAKE_id_dummy
100
 
101
#pragma token PROC (\
102
	EXP lvalue : HASHID :,\
103
	EXP lvalue : DECL_SPEC :,\
104
	EXP lvalue : NAMESPACE :,\
105
	EXP lvalue : LOCATION :,\
106
	EXP lvalue : IDENTIFIER :,\
107
	EXP lvalue : ulong_type :,\
108
	EXP lvalue : ulong_type :,\
109
	EXP : IDENTIFIER :\
110
    ) STATEMENT DECONS_id_dummy #
111
#pragma interface DECONS_id_dummy
112
 
113
#pragma token PROC (\
114
	EXP : DESTROYER :,\
115
	EXP lvalue : HASHID :,\
116
	EXP lvalue : DECL_SPEC :,\
117
	EXP lvalue : NAMESPACE :,\
118
	EXP lvalue : LOCATION :,\
119
	EXP lvalue : IDENTIFIER :,\
120
	EXP lvalue : ulong_type :,\
121
	EXP lvalue : ulong_type :,\
122
	EXP : IDENTIFIER :\
123
    ) STATEMENT DESTROY_id_dummy #
124
#pragma interface DESTROY_id_dummy
125
 
126
 
127
/* Operations for field set keyword_etc of union IDENTIFIER */
128
 
129
#pragma token EXP const : unsigned : id_keyword_etc_tag #
130
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_keyword_etc #
131
#pragma interface id_keyword_etc_tag IS_id_keyword_etc
132
 
133
#pragma token PROC (\
134
	EXP : unsigned :,\
135
	EXP : HASHID :,\
136
	EXP : DECL_SPEC :,\
137
	EXP : NAMESPACE :,\
138
	EXP : LOCATION :,\
139
	EXP lvalue : IDENTIFIER :\
140
    ) STATEMENT MAKE_id_keyword_etc #
141
#pragma interface MAKE_id_keyword_etc
142
 
143
#pragma token PROC (\
144
	EXP : unsigned :,\
145
	EXP : IDENTIFIER :\
146
    ) STATEMENT MODIFY_id_keyword_etc #
147
#pragma interface MODIFY_id_keyword_etc
148
 
149
#pragma token PROC (\
150
	EXP lvalue : HASHID :,\
151
	EXP lvalue : DECL_SPEC :,\
152
	EXP lvalue : NAMESPACE :,\
153
	EXP lvalue : LOCATION :,\
154
	EXP lvalue : IDENTIFIER :,\
155
	EXP lvalue : ulong_type :,\
156
	EXP lvalue : ulong_type :,\
157
	EXP : IDENTIFIER :\
158
    ) STATEMENT DECONS_id_keyword_etc #
159
#pragma interface DECONS_id_keyword_etc
160
 
161
#pragma token PROC (\
162
	EXP : DESTROYER :,\
163
	EXP lvalue : HASHID :,\
164
	EXP lvalue : DECL_SPEC :,\
165
	EXP lvalue : NAMESPACE :,\
166
	EXP lvalue : LOCATION :,\
167
	EXP lvalue : IDENTIFIER :,\
168
	EXP lvalue : ulong_type :,\
169
	EXP lvalue : ulong_type :,\
170
	EXP : IDENTIFIER :\
171
    ) STATEMENT DESTROY_id_keyword_etc #
172
#pragma interface DESTROY_id_keyword_etc
173
 
174
 
175
/* Operations for field keyword of union IDENTIFIER */
176
 
177
#pragma token EXP const : unsigned : id_keyword_tag #
178
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_keyword #
179
#pragma interface id_keyword_tag IS_id_keyword
180
 
181
#pragma token PROC (\
182
	EXP : HASHID :,\
183
	EXP : DECL_SPEC :,\
184
	EXP : NAMESPACE :,\
185
	EXP : LOCATION :,\
186
	EXP lvalue : IDENTIFIER :\
187
    ) STATEMENT MAKE_id_keyword #
188
#pragma interface MAKE_id_keyword
189
 
190
#pragma token PROC (\
191
	EXP lvalue : HASHID :,\
192
	EXP lvalue : DECL_SPEC :,\
193
	EXP lvalue : NAMESPACE :,\
194
	EXP lvalue : LOCATION :,\
195
	EXP lvalue : IDENTIFIER :,\
196
	EXP lvalue : ulong_type :,\
197
	EXP lvalue : ulong_type :,\
198
	EXP : IDENTIFIER :\
199
    ) STATEMENT DECONS_id_keyword #
200
#pragma interface DECONS_id_keyword
201
 
202
#pragma token PROC (\
203
	EXP : DESTROYER :,\
204
	EXP lvalue : HASHID :,\
205
	EXP lvalue : DECL_SPEC :,\
206
	EXP lvalue : NAMESPACE :,\
207
	EXP lvalue : LOCATION :,\
208
	EXP lvalue : IDENTIFIER :,\
209
	EXP lvalue : ulong_type :,\
210
	EXP lvalue : ulong_type :,\
211
	EXP : IDENTIFIER :\
212
    ) STATEMENT DESTROY_id_keyword #
213
#pragma interface DESTROY_id_keyword
214
 
215
 
216
/* Operations for field iso_keyword of union IDENTIFIER */
217
 
218
#pragma token EXP const : unsigned : id_iso_keyword_tag #
219
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_iso_keyword #
220
#pragma interface id_iso_keyword_tag IS_id_iso_keyword
221
 
222
#pragma token PROC (\
223
	EXP : HASHID :,\
224
	EXP : DECL_SPEC :,\
225
	EXP : NAMESPACE :,\
226
	EXP : LOCATION :,\
227
	EXP lvalue : IDENTIFIER :\
228
    ) STATEMENT MAKE_id_iso_keyword #
229
#pragma interface MAKE_id_iso_keyword
230
 
231
#pragma token PROC (\
232
	EXP lvalue : HASHID :,\
233
	EXP lvalue : DECL_SPEC :,\
234
	EXP lvalue : NAMESPACE :,\
235
	EXP lvalue : LOCATION :,\
236
	EXP lvalue : IDENTIFIER :,\
237
	EXP lvalue : ulong_type :,\
238
	EXP lvalue : ulong_type :,\
239
	EXP : IDENTIFIER :\
240
    ) STATEMENT DECONS_id_iso_keyword #
241
#pragma interface DECONS_id_iso_keyword
242
 
243
#pragma token PROC (\
244
	EXP : DESTROYER :,\
245
	EXP lvalue : HASHID :,\
246
	EXP lvalue : DECL_SPEC :,\
247
	EXP lvalue : NAMESPACE :,\
248
	EXP lvalue : LOCATION :,\
249
	EXP lvalue : IDENTIFIER :,\
250
	EXP lvalue : ulong_type :,\
251
	EXP lvalue : ulong_type :,\
252
	EXP : IDENTIFIER :\
253
    ) STATEMENT DESTROY_id_iso_keyword #
254
#pragma interface DESTROY_id_iso_keyword
255
 
256
 
257
/* Operations for field reserved of union IDENTIFIER */
258
 
259
#pragma token EXP const : unsigned : id_reserved_tag #
260
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_reserved #
261
#pragma interface id_reserved_tag IS_id_reserved
262
 
263
#pragma token PROC (\
264
	EXP : HASHID :,\
265
	EXP : DECL_SPEC :,\
266
	EXP : NAMESPACE :,\
267
	EXP : LOCATION :,\
268
	EXP lvalue : IDENTIFIER :\
269
    ) STATEMENT MAKE_id_reserved #
270
#pragma interface MAKE_id_reserved
271
 
272
#pragma token PROC (\
273
	EXP lvalue : HASHID :,\
274
	EXP lvalue : DECL_SPEC :,\
275
	EXP lvalue : NAMESPACE :,\
276
	EXP lvalue : LOCATION :,\
277
	EXP lvalue : IDENTIFIER :,\
278
	EXP lvalue : ulong_type :,\
279
	EXP lvalue : ulong_type :,\
280
	EXP : IDENTIFIER :\
281
    ) STATEMENT DECONS_id_reserved #
282
#pragma interface DECONS_id_reserved
283
 
284
#pragma token PROC (\
285
	EXP : DESTROYER :,\
286
	EXP lvalue : HASHID :,\
287
	EXP lvalue : DECL_SPEC :,\
288
	EXP lvalue : NAMESPACE :,\
289
	EXP lvalue : LOCATION :,\
290
	EXP lvalue : IDENTIFIER :,\
291
	EXP lvalue : ulong_type :,\
292
	EXP lvalue : ulong_type :,\
293
	EXP : IDENTIFIER :\
294
    ) STATEMENT DESTROY_id_reserved #
295
#pragma interface DESTROY_id_reserved
296
 
297
 
298
/* Operations for field builtin of union IDENTIFIER */
299
 
300
#pragma token EXP const : unsigned : id_builtin_tag #
301
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_builtin #
302
#pragma interface id_builtin_tag IS_id_builtin
303
 
304
#pragma token PROC ( EXP : IDENTIFIER : )\
305
    EXP : PTR ( TYPE ) : id_builtin_ret #
306
#pragma interface id_builtin_ret
307
 
308
#pragma token PROC ( EXP : IDENTIFIER : )\
309
    EXP : PTR ( LIST ( TYPE ) ) : id_builtin_ptypes #
310
#pragma interface id_builtin_ptypes
311
 
312
#pragma token PROC (\
313
	EXP : HASHID :,\
314
	EXP : DECL_SPEC :,\
315
	EXP : NAMESPACE :,\
316
	EXP : LOCATION :,\
317
	EXP : TYPE :,\
318
	EXP : LIST ( TYPE ) :,\
319
	EXP lvalue : IDENTIFIER :\
320
    ) STATEMENT MAKE_id_builtin #
321
#pragma interface MAKE_id_builtin
322
 
323
#pragma token PROC (\
324
	EXP lvalue : HASHID :,\
325
	EXP lvalue : DECL_SPEC :,\
326
	EXP lvalue : NAMESPACE :,\
327
	EXP lvalue : LOCATION :,\
328
	EXP lvalue : IDENTIFIER :,\
329
	EXP lvalue : ulong_type :,\
330
	EXP lvalue : ulong_type :,\
331
	EXP lvalue : TYPE :,\
332
	EXP lvalue : LIST ( TYPE ) :,\
333
	EXP : IDENTIFIER :\
334
    ) STATEMENT DECONS_id_builtin #
335
#pragma interface DECONS_id_builtin
336
 
337
#pragma token PROC (\
338
	EXP : DESTROYER :,\
339
	EXP lvalue : HASHID :,\
340
	EXP lvalue : DECL_SPEC :,\
341
	EXP lvalue : NAMESPACE :,\
342
	EXP lvalue : LOCATION :,\
343
	EXP lvalue : IDENTIFIER :,\
344
	EXP lvalue : ulong_type :,\
345
	EXP lvalue : ulong_type :,\
346
	EXP lvalue : TYPE :,\
347
	EXP lvalue : LIST ( TYPE ) :,\
348
	EXP : IDENTIFIER :\
349
    ) STATEMENT DESTROY_id_builtin #
350
#pragma interface DESTROY_id_builtin
351
 
352
 
353
/* Operations for field obj_macro of union IDENTIFIER */
354
 
355
#pragma token EXP const : unsigned : id_obj_macro_tag #
356
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_obj_macro #
357
#pragma interface id_obj_macro_tag IS_id_obj_macro
358
 
359
#pragma token PROC ( EXP : IDENTIFIER : )\
360
    EXP : PTR ( PPTOKEN_P ) : id_obj_macro_defn #
361
#pragma interface id_obj_macro_defn
362
 
363
#pragma token PROC (\
364
	EXP : HASHID :,\
365
	EXP : DECL_SPEC :,\
366
	EXP : NAMESPACE :,\
367
	EXP : LOCATION :,\
368
	EXP : PPTOKEN_P :,\
369
	EXP lvalue : IDENTIFIER :\
370
    ) STATEMENT MAKE_id_obj_macro #
371
#pragma interface MAKE_id_obj_macro
372
 
373
#pragma token PROC (\
374
	EXP lvalue : HASHID :,\
375
	EXP lvalue : DECL_SPEC :,\
376
	EXP lvalue : NAMESPACE :,\
377
	EXP lvalue : LOCATION :,\
378
	EXP lvalue : IDENTIFIER :,\
379
	EXP lvalue : ulong_type :,\
380
	EXP lvalue : ulong_type :,\
381
	EXP lvalue : PPTOKEN_P :,\
382
	EXP : IDENTIFIER :\
383
    ) STATEMENT DECONS_id_obj_macro #
384
#pragma interface DECONS_id_obj_macro
385
 
386
#pragma token PROC (\
387
	EXP : DESTROYER :,\
388
	EXP lvalue : HASHID :,\
389
	EXP lvalue : DECL_SPEC :,\
390
	EXP lvalue : NAMESPACE :,\
391
	EXP lvalue : LOCATION :,\
392
	EXP lvalue : IDENTIFIER :,\
393
	EXP lvalue : ulong_type :,\
394
	EXP lvalue : ulong_type :,\
395
	EXP lvalue : PPTOKEN_P :,\
396
	EXP : IDENTIFIER :\
397
    ) STATEMENT DESTROY_id_obj_macro #
398
#pragma interface DESTROY_id_obj_macro
399
 
400
 
401
/* Operations for field func_macro of union IDENTIFIER */
402
 
403
#pragma token EXP const : unsigned : id_func_macro_tag #
404
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_func_macro #
405
#pragma interface id_func_macro_tag IS_id_func_macro
406
 
407
#pragma token PROC ( EXP : IDENTIFIER : )\
408
    EXP : PTR ( PPTOKEN_P ) : id_func_macro_defn #
409
#pragma interface id_func_macro_defn
410
 
411
#pragma token PROC ( EXP : IDENTIFIER : )\
412
    EXP : PTR ( LIST ( HASHID ) ) : id_func_macro_params #
413
#pragma interface id_func_macro_params
414
 
415
#pragma token PROC ( EXP : IDENTIFIER : )\
416
    EXP : PTR ( unsigned ) : id_func_macro_no_params #
417
#pragma interface id_func_macro_no_params
418
 
419
#pragma token PROC (\
420
	EXP : HASHID :,\
421
	EXP : DECL_SPEC :,\
422
	EXP : NAMESPACE :,\
423
	EXP : LOCATION :,\
424
	EXP : PPTOKEN_P :,\
425
	EXP : LIST ( HASHID ) :,\
426
	EXP : unsigned :,\
427
	EXP lvalue : IDENTIFIER :\
428
    ) STATEMENT MAKE_id_func_macro #
429
#pragma interface MAKE_id_func_macro
430
 
431
#pragma token PROC (\
432
	EXP lvalue : HASHID :,\
433
	EXP lvalue : DECL_SPEC :,\
434
	EXP lvalue : NAMESPACE :,\
435
	EXP lvalue : LOCATION :,\
436
	EXP lvalue : IDENTIFIER :,\
437
	EXP lvalue : ulong_type :,\
438
	EXP lvalue : ulong_type :,\
439
	EXP lvalue : PPTOKEN_P :,\
440
	EXP lvalue : LIST ( HASHID ) :,\
441
	EXP lvalue : unsigned :,\
442
	EXP : IDENTIFIER :\
443
    ) STATEMENT DECONS_id_func_macro #
444
#pragma interface DECONS_id_func_macro
445
 
446
#pragma token PROC (\
447
	EXP : DESTROYER :,\
448
	EXP lvalue : HASHID :,\
449
	EXP lvalue : DECL_SPEC :,\
450
	EXP lvalue : NAMESPACE :,\
451
	EXP lvalue : LOCATION :,\
452
	EXP lvalue : IDENTIFIER :,\
453
	EXP lvalue : ulong_type :,\
454
	EXP lvalue : ulong_type :,\
455
	EXP lvalue : PPTOKEN_P :,\
456
	EXP lvalue : LIST ( HASHID ) :,\
457
	EXP lvalue : unsigned :,\
458
	EXP : IDENTIFIER :\
459
    ) STATEMENT DESTROY_id_func_macro #
460
#pragma interface DESTROY_id_func_macro
461
 
462
 
463
/* Operations for field predicate of union IDENTIFIER */
464
 
465
#pragma token EXP const : unsigned : id_predicate_tag #
466
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_predicate #
467
#pragma interface id_predicate_tag IS_id_predicate
468
 
469
#pragma token PROC ( EXP : IDENTIFIER : )\
470
    EXP : PTR ( LIST ( PPTOKEN_P ) ) : id_predicate_values #
471
#pragma interface id_predicate_values
472
 
473
#pragma token PROC (\
474
	EXP : HASHID :,\
475
	EXP : DECL_SPEC :,\
476
	EXP : NAMESPACE :,\
477
	EXP : LOCATION :,\
478
	EXP lvalue : IDENTIFIER :\
479
    ) STATEMENT MAKE_id_predicate #
480
#pragma interface MAKE_id_predicate
481
 
482
#pragma token PROC (\
483
	EXP lvalue : HASHID :,\
484
	EXP lvalue : DECL_SPEC :,\
485
	EXP lvalue : NAMESPACE :,\
486
	EXP lvalue : LOCATION :,\
487
	EXP lvalue : IDENTIFIER :,\
488
	EXP lvalue : ulong_type :,\
489
	EXP lvalue : ulong_type :,\
490
	EXP lvalue : LIST ( PPTOKEN_P ) :,\
491
	EXP : IDENTIFIER :\
492
    ) STATEMENT DECONS_id_predicate #
493
#pragma interface DECONS_id_predicate
494
 
495
#pragma token PROC (\
496
	EXP : DESTROYER :,\
497
	EXP lvalue : HASHID :,\
498
	EXP lvalue : DECL_SPEC :,\
499
	EXP lvalue : NAMESPACE :,\
500
	EXP lvalue : LOCATION :,\
501
	EXP lvalue : IDENTIFIER :,\
502
	EXP lvalue : ulong_type :,\
503
	EXP lvalue : ulong_type :,\
504
	EXP lvalue : LIST ( PPTOKEN_P ) :,\
505
	EXP : IDENTIFIER :\
506
    ) STATEMENT DESTROY_id_predicate #
507
#pragma interface DESTROY_id_predicate
508
 
509
 
510
/* Operations for field set class_name_etc of union IDENTIFIER */
511
 
512
#pragma token EXP const : unsigned : id_class_name_etc_tag #
513
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_class_name_etc #
514
#pragma interface id_class_name_etc_tag IS_id_class_name_etc
515
 
516
#pragma token PROC ( EXP : IDENTIFIER : )\
517
    EXP : PTR ( TYPE ) : id_class_name_etc_defn #
518
#pragma interface id_class_name_etc_defn
519
 
520
#pragma token PROC ( EXP : IDENTIFIER : )\
521
    EXP : PTR ( BASE_TYPE ) : id_class_name_etc_rep #
522
#pragma interface id_class_name_etc_rep
523
 
524
#pragma token PROC (\
525
	EXP : unsigned :,\
526
	EXP : HASHID :,\
527
	EXP : DECL_SPEC :,\
528
	EXP : NAMESPACE :,\
529
	EXP : LOCATION :,\
530
	EXP : TYPE :,\
531
	EXP lvalue : IDENTIFIER :\
532
    ) STATEMENT MAKE_id_class_name_etc #
533
#pragma interface MAKE_id_class_name_etc
534
 
535
#pragma token PROC (\
536
	EXP : unsigned :,\
537
	EXP : IDENTIFIER :\
538
    ) STATEMENT MODIFY_id_class_name_etc #
539
#pragma interface MODIFY_id_class_name_etc
540
 
541
#pragma token PROC (\
542
	EXP lvalue : HASHID :,\
543
	EXP lvalue : DECL_SPEC :,\
544
	EXP lvalue : NAMESPACE :,\
545
	EXP lvalue : LOCATION :,\
546
	EXP lvalue : IDENTIFIER :,\
547
	EXP lvalue : ulong_type :,\
548
	EXP lvalue : ulong_type :,\
549
	EXP lvalue : TYPE :,\
550
	EXP lvalue : BASE_TYPE :,\
551
	EXP : IDENTIFIER :\
552
    ) STATEMENT DECONS_id_class_name_etc #
553
#pragma interface DECONS_id_class_name_etc
554
 
555
#pragma token PROC (\
556
	EXP : DESTROYER :,\
557
	EXP lvalue : HASHID :,\
558
	EXP lvalue : DECL_SPEC :,\
559
	EXP lvalue : NAMESPACE :,\
560
	EXP lvalue : LOCATION :,\
561
	EXP lvalue : IDENTIFIER :,\
562
	EXP lvalue : ulong_type :,\
563
	EXP lvalue : ulong_type :,\
564
	EXP lvalue : TYPE :,\
565
	EXP lvalue : BASE_TYPE :,\
566
	EXP : IDENTIFIER :\
567
    ) STATEMENT DESTROY_id_class_name_etc #
568
#pragma interface DESTROY_id_class_name_etc
569
 
570
 
571
/* Operations for field class_name of union IDENTIFIER */
572
 
573
#pragma token EXP const : unsigned : id_class_name_tag #
574
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_class_name #
575
#pragma interface id_class_name_tag IS_id_class_name
576
 
577
#pragma token PROC ( EXP : IDENTIFIER : )\
578
    EXP : PTR ( TYPE ) : id_class_name_defn #
579
#pragma interface id_class_name_defn
580
 
581
#pragma token PROC ( EXP : IDENTIFIER : )\
582
    EXP : PTR ( BASE_TYPE ) : id_class_name_rep #
583
#pragma interface id_class_name_rep
584
 
585
#pragma token PROC (\
586
	EXP : HASHID :,\
587
	EXP : DECL_SPEC :,\
588
	EXP : NAMESPACE :,\
589
	EXP : LOCATION :,\
590
	EXP : TYPE :,\
591
	EXP lvalue : IDENTIFIER :\
592
    ) STATEMENT MAKE_id_class_name #
593
#pragma interface MAKE_id_class_name
594
 
595
#pragma token PROC (\
596
	EXP lvalue : HASHID :,\
597
	EXP lvalue : DECL_SPEC :,\
598
	EXP lvalue : NAMESPACE :,\
599
	EXP lvalue : LOCATION :,\
600
	EXP lvalue : IDENTIFIER :,\
601
	EXP lvalue : ulong_type :,\
602
	EXP lvalue : ulong_type :,\
603
	EXP lvalue : TYPE :,\
604
	EXP lvalue : BASE_TYPE :,\
605
	EXP : IDENTIFIER :\
606
    ) STATEMENT DECONS_id_class_name #
607
#pragma interface DECONS_id_class_name
608
 
609
#pragma token PROC (\
610
	EXP : DESTROYER :,\
611
	EXP lvalue : HASHID :,\
612
	EXP lvalue : DECL_SPEC :,\
613
	EXP lvalue : NAMESPACE :,\
614
	EXP lvalue : LOCATION :,\
615
	EXP lvalue : IDENTIFIER :,\
616
	EXP lvalue : ulong_type :,\
617
	EXP lvalue : ulong_type :,\
618
	EXP lvalue : TYPE :,\
619
	EXP lvalue : BASE_TYPE :,\
620
	EXP : IDENTIFIER :\
621
    ) STATEMENT DESTROY_id_class_name #
622
#pragma interface DESTROY_id_class_name
623
 
624
 
625
/* Operations for field enum_name of union IDENTIFIER */
626
 
627
#pragma token EXP const : unsigned : id_enum_name_tag #
628
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_enum_name #
629
#pragma interface id_enum_name_tag IS_id_enum_name
630
 
631
#pragma token PROC ( EXP : IDENTIFIER : )\
632
    EXP : PTR ( TYPE ) : id_enum_name_defn #
633
#pragma interface id_enum_name_defn
634
 
635
#pragma token PROC ( EXP : IDENTIFIER : )\
636
    EXP : PTR ( BASE_TYPE ) : id_enum_name_rep #
637
#pragma interface id_enum_name_rep
638
 
639
#pragma token PROC (\
640
	EXP : HASHID :,\
641
	EXP : DECL_SPEC :,\
642
	EXP : NAMESPACE :,\
643
	EXP : LOCATION :,\
644
	EXP : TYPE :,\
645
	EXP lvalue : IDENTIFIER :\
646
    ) STATEMENT MAKE_id_enum_name #
647
#pragma interface MAKE_id_enum_name
648
 
649
#pragma token PROC (\
650
	EXP lvalue : HASHID :,\
651
	EXP lvalue : DECL_SPEC :,\
652
	EXP lvalue : NAMESPACE :,\
653
	EXP lvalue : LOCATION :,\
654
	EXP lvalue : IDENTIFIER :,\
655
	EXP lvalue : ulong_type :,\
656
	EXP lvalue : ulong_type :,\
657
	EXP lvalue : TYPE :,\
658
	EXP lvalue : BASE_TYPE :,\
659
	EXP : IDENTIFIER :\
660
    ) STATEMENT DECONS_id_enum_name #
661
#pragma interface DECONS_id_enum_name
662
 
663
#pragma token PROC (\
664
	EXP : DESTROYER :,\
665
	EXP lvalue : HASHID :,\
666
	EXP lvalue : DECL_SPEC :,\
667
	EXP lvalue : NAMESPACE :,\
668
	EXP lvalue : LOCATION :,\
669
	EXP lvalue : IDENTIFIER :,\
670
	EXP lvalue : ulong_type :,\
671
	EXP lvalue : ulong_type :,\
672
	EXP lvalue : TYPE :,\
673
	EXP lvalue : BASE_TYPE :,\
674
	EXP : IDENTIFIER :\
675
    ) STATEMENT DESTROY_id_enum_name #
676
#pragma interface DESTROY_id_enum_name
677
 
678
 
679
/* Operations for field class_alias of union IDENTIFIER */
680
 
681
#pragma token EXP const : unsigned : id_class_alias_tag #
682
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_class_alias #
683
#pragma interface id_class_alias_tag IS_id_class_alias
684
 
685
#pragma token PROC ( EXP : IDENTIFIER : )\
686
    EXP : PTR ( TYPE ) : id_class_alias_defn #
687
#pragma interface id_class_alias_defn
688
 
689
#pragma token PROC ( EXP : IDENTIFIER : )\
690
    EXP : PTR ( BASE_TYPE ) : id_class_alias_rep #
691
#pragma interface id_class_alias_rep
692
 
693
#pragma token PROC (\
694
	EXP : HASHID :,\
695
	EXP : DECL_SPEC :,\
696
	EXP : NAMESPACE :,\
697
	EXP : LOCATION :,\
698
	EXP : TYPE :,\
699
	EXP lvalue : IDENTIFIER :\
700
    ) STATEMENT MAKE_id_class_alias #
701
#pragma interface MAKE_id_class_alias
702
 
703
#pragma token PROC (\
704
	EXP lvalue : HASHID :,\
705
	EXP lvalue : DECL_SPEC :,\
706
	EXP lvalue : NAMESPACE :,\
707
	EXP lvalue : LOCATION :,\
708
	EXP lvalue : IDENTIFIER :,\
709
	EXP lvalue : ulong_type :,\
710
	EXP lvalue : ulong_type :,\
711
	EXP lvalue : TYPE :,\
712
	EXP lvalue : BASE_TYPE :,\
713
	EXP : IDENTIFIER :\
714
    ) STATEMENT DECONS_id_class_alias #
715
#pragma interface DECONS_id_class_alias
716
 
717
#pragma token PROC (\
718
	EXP : DESTROYER :,\
719
	EXP lvalue : HASHID :,\
720
	EXP lvalue : DECL_SPEC :,\
721
	EXP lvalue : NAMESPACE :,\
722
	EXP lvalue : LOCATION :,\
723
	EXP lvalue : IDENTIFIER :,\
724
	EXP lvalue : ulong_type :,\
725
	EXP lvalue : ulong_type :,\
726
	EXP lvalue : TYPE :,\
727
	EXP lvalue : BASE_TYPE :,\
728
	EXP : IDENTIFIER :\
729
    ) STATEMENT DESTROY_id_class_alias #
730
#pragma interface DESTROY_id_class_alias
731
 
732
 
733
/* Operations for field enum_alias of union IDENTIFIER */
734
 
735
#pragma token EXP const : unsigned : id_enum_alias_tag #
736
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_enum_alias #
737
#pragma interface id_enum_alias_tag IS_id_enum_alias
738
 
739
#pragma token PROC ( EXP : IDENTIFIER : )\
740
    EXP : PTR ( TYPE ) : id_enum_alias_defn #
741
#pragma interface id_enum_alias_defn
742
 
743
#pragma token PROC ( EXP : IDENTIFIER : )\
744
    EXP : PTR ( BASE_TYPE ) : id_enum_alias_rep #
745
#pragma interface id_enum_alias_rep
746
 
747
#pragma token PROC (\
748
	EXP : HASHID :,\
749
	EXP : DECL_SPEC :,\
750
	EXP : NAMESPACE :,\
751
	EXP : LOCATION :,\
752
	EXP : TYPE :,\
753
	EXP lvalue : IDENTIFIER :\
754
    ) STATEMENT MAKE_id_enum_alias #
755
#pragma interface MAKE_id_enum_alias
756
 
757
#pragma token PROC (\
758
	EXP lvalue : HASHID :,\
759
	EXP lvalue : DECL_SPEC :,\
760
	EXP lvalue : NAMESPACE :,\
761
	EXP lvalue : LOCATION :,\
762
	EXP lvalue : IDENTIFIER :,\
763
	EXP lvalue : ulong_type :,\
764
	EXP lvalue : ulong_type :,\
765
	EXP lvalue : TYPE :,\
766
	EXP lvalue : BASE_TYPE :,\
767
	EXP : IDENTIFIER :\
768
    ) STATEMENT DECONS_id_enum_alias #
769
#pragma interface DECONS_id_enum_alias
770
 
771
#pragma token PROC (\
772
	EXP : DESTROYER :,\
773
	EXP lvalue : HASHID :,\
774
	EXP lvalue : DECL_SPEC :,\
775
	EXP lvalue : NAMESPACE :,\
776
	EXP lvalue : LOCATION :,\
777
	EXP lvalue : IDENTIFIER :,\
778
	EXP lvalue : ulong_type :,\
779
	EXP lvalue : ulong_type :,\
780
	EXP lvalue : TYPE :,\
781
	EXP lvalue : BASE_TYPE :,\
782
	EXP : IDENTIFIER :\
783
    ) STATEMENT DESTROY_id_enum_alias #
784
#pragma interface DESTROY_id_enum_alias
785
 
786
 
787
/* Operations for field type_alias of union IDENTIFIER */
788
 
789
#pragma token EXP const : unsigned : id_type_alias_tag #
790
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_type_alias #
791
#pragma interface id_type_alias_tag IS_id_type_alias
792
 
793
#pragma token PROC ( EXP : IDENTIFIER : )\
794
    EXP : PTR ( TYPE ) : id_type_alias_defn #
795
#pragma interface id_type_alias_defn
796
 
797
#pragma token PROC ( EXP : IDENTIFIER : )\
798
    EXP : PTR ( BASE_TYPE ) : id_type_alias_rep #
799
#pragma interface id_type_alias_rep
800
 
801
#pragma token PROC (\
802
	EXP : HASHID :,\
803
	EXP : DECL_SPEC :,\
804
	EXP : NAMESPACE :,\
805
	EXP : LOCATION :,\
806
	EXP : TYPE :,\
807
	EXP lvalue : IDENTIFIER :\
808
    ) STATEMENT MAKE_id_type_alias #
809
#pragma interface MAKE_id_type_alias
810
 
811
#pragma token PROC (\
812
	EXP lvalue : HASHID :,\
813
	EXP lvalue : DECL_SPEC :,\
814
	EXP lvalue : NAMESPACE :,\
815
	EXP lvalue : LOCATION :,\
816
	EXP lvalue : IDENTIFIER :,\
817
	EXP lvalue : ulong_type :,\
818
	EXP lvalue : ulong_type :,\
819
	EXP lvalue : TYPE :,\
820
	EXP lvalue : BASE_TYPE :,\
821
	EXP : IDENTIFIER :\
822
    ) STATEMENT DECONS_id_type_alias #
823
#pragma interface DECONS_id_type_alias
824
 
825
#pragma token PROC (\
826
	EXP : DESTROYER :,\
827
	EXP lvalue : HASHID :,\
828
	EXP lvalue : DECL_SPEC :,\
829
	EXP lvalue : NAMESPACE :,\
830
	EXP lvalue : LOCATION :,\
831
	EXP lvalue : IDENTIFIER :,\
832
	EXP lvalue : ulong_type :,\
833
	EXP lvalue : ulong_type :,\
834
	EXP lvalue : TYPE :,\
835
	EXP lvalue : BASE_TYPE :,\
836
	EXP : IDENTIFIER :\
837
    ) STATEMENT DESTROY_id_type_alias #
838
#pragma interface DESTROY_id_type_alias
839
 
840
 
841
/* Operations for field set nspace_name_etc of union IDENTIFIER */
842
 
843
#pragma token EXP const : unsigned : id_nspace_name_etc_tag #
844
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_nspace_name_etc #
845
#pragma interface id_nspace_name_etc_tag IS_id_nspace_name_etc
846
 
847
#pragma token PROC ( EXP : IDENTIFIER : )\
848
    EXP : PTR ( NAMESPACE ) : id_nspace_name_etc_defn #
849
#pragma interface id_nspace_name_etc_defn
850
 
851
#pragma token PROC (\
852
	EXP : unsigned :,\
853
	EXP : HASHID :,\
854
	EXP : DECL_SPEC :,\
855
	EXP : NAMESPACE :,\
856
	EXP : LOCATION :,\
857
	EXP : NAMESPACE :,\
858
	EXP lvalue : IDENTIFIER :\
859
    ) STATEMENT MAKE_id_nspace_name_etc #
860
#pragma interface MAKE_id_nspace_name_etc
861
 
862
#pragma token PROC (\
863
	EXP : unsigned :,\
864
	EXP : IDENTIFIER :\
865
    ) STATEMENT MODIFY_id_nspace_name_etc #
866
#pragma interface MODIFY_id_nspace_name_etc
867
 
868
#pragma token PROC (\
869
	EXP lvalue : HASHID :,\
870
	EXP lvalue : DECL_SPEC :,\
871
	EXP lvalue : NAMESPACE :,\
872
	EXP lvalue : LOCATION :,\
873
	EXP lvalue : IDENTIFIER :,\
874
	EXP lvalue : ulong_type :,\
875
	EXP lvalue : ulong_type :,\
876
	EXP lvalue : NAMESPACE :,\
877
	EXP : IDENTIFIER :\
878
    ) STATEMENT DECONS_id_nspace_name_etc #
879
#pragma interface DECONS_id_nspace_name_etc
880
 
881
#pragma token PROC (\
882
	EXP : DESTROYER :,\
883
	EXP lvalue : HASHID :,\
884
	EXP lvalue : DECL_SPEC :,\
885
	EXP lvalue : NAMESPACE :,\
886
	EXP lvalue : LOCATION :,\
887
	EXP lvalue : IDENTIFIER :,\
888
	EXP lvalue : ulong_type :,\
889
	EXP lvalue : ulong_type :,\
890
	EXP lvalue : NAMESPACE :,\
891
	EXP : IDENTIFIER :\
892
    ) STATEMENT DESTROY_id_nspace_name_etc #
893
#pragma interface DESTROY_id_nspace_name_etc
894
 
895
 
896
/* Operations for field nspace_name of union IDENTIFIER */
897
 
898
#pragma token EXP const : unsigned : id_nspace_name_tag #
899
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_nspace_name #
900
#pragma interface id_nspace_name_tag IS_id_nspace_name
901
 
902
#pragma token PROC ( EXP : IDENTIFIER : )\
903
    EXP : PTR ( NAMESPACE ) : id_nspace_name_defn #
904
#pragma interface id_nspace_name_defn
905
 
906
#pragma token PROC (\
907
	EXP : HASHID :,\
908
	EXP : DECL_SPEC :,\
909
	EXP : NAMESPACE :,\
910
	EXP : LOCATION :,\
911
	EXP : NAMESPACE :,\
912
	EXP lvalue : IDENTIFIER :\
913
    ) STATEMENT MAKE_id_nspace_name #
914
#pragma interface MAKE_id_nspace_name
915
 
916
#pragma token PROC (\
917
	EXP lvalue : HASHID :,\
918
	EXP lvalue : DECL_SPEC :,\
919
	EXP lvalue : NAMESPACE :,\
920
	EXP lvalue : LOCATION :,\
921
	EXP lvalue : IDENTIFIER :,\
922
	EXP lvalue : ulong_type :,\
923
	EXP lvalue : ulong_type :,\
924
	EXP lvalue : NAMESPACE :,\
925
	EXP : IDENTIFIER :\
926
    ) STATEMENT DECONS_id_nspace_name #
927
#pragma interface DECONS_id_nspace_name
928
 
929
#pragma token PROC (\
930
	EXP : DESTROYER :,\
931
	EXP lvalue : HASHID :,\
932
	EXP lvalue : DECL_SPEC :,\
933
	EXP lvalue : NAMESPACE :,\
934
	EXP lvalue : LOCATION :,\
935
	EXP lvalue : IDENTIFIER :,\
936
	EXP lvalue : ulong_type :,\
937
	EXP lvalue : ulong_type :,\
938
	EXP lvalue : NAMESPACE :,\
939
	EXP : IDENTIFIER :\
940
    ) STATEMENT DESTROY_id_nspace_name #
941
#pragma interface DESTROY_id_nspace_name
942
 
943
 
944
/* Operations for field nspace_alias of union IDENTIFIER */
945
 
946
#pragma token EXP const : unsigned : id_nspace_alias_tag #
947
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_nspace_alias #
948
#pragma interface id_nspace_alias_tag IS_id_nspace_alias
949
 
950
#pragma token PROC ( EXP : IDENTIFIER : )\
951
    EXP : PTR ( NAMESPACE ) : id_nspace_alias_defn #
952
#pragma interface id_nspace_alias_defn
953
 
954
#pragma token PROC (\
955
	EXP : HASHID :,\
956
	EXP : DECL_SPEC :,\
957
	EXP : NAMESPACE :,\
958
	EXP : LOCATION :,\
959
	EXP : NAMESPACE :,\
960
	EXP lvalue : IDENTIFIER :\
961
    ) STATEMENT MAKE_id_nspace_alias #
962
#pragma interface MAKE_id_nspace_alias
963
 
964
#pragma token PROC (\
965
	EXP lvalue : HASHID :,\
966
	EXP lvalue : DECL_SPEC :,\
967
	EXP lvalue : NAMESPACE :,\
968
	EXP lvalue : LOCATION :,\
969
	EXP lvalue : IDENTIFIER :,\
970
	EXP lvalue : ulong_type :,\
971
	EXP lvalue : ulong_type :,\
972
	EXP lvalue : NAMESPACE :,\
973
	EXP : IDENTIFIER :\
974
    ) STATEMENT DECONS_id_nspace_alias #
975
#pragma interface DECONS_id_nspace_alias
976
 
977
#pragma token PROC (\
978
	EXP : DESTROYER :,\
979
	EXP lvalue : HASHID :,\
980
	EXP lvalue : DECL_SPEC :,\
981
	EXP lvalue : NAMESPACE :,\
982
	EXP lvalue : LOCATION :,\
983
	EXP lvalue : IDENTIFIER :,\
984
	EXP lvalue : ulong_type :,\
985
	EXP lvalue : ulong_type :,\
986
	EXP lvalue : NAMESPACE :,\
987
	EXP : IDENTIFIER :\
988
    ) STATEMENT DESTROY_id_nspace_alias #
989
#pragma interface DESTROY_id_nspace_alias
990
 
991
 
992
/* Operations for field set variable_etc of union IDENTIFIER */
993
 
994
#pragma token EXP const : unsigned : id_variable_etc_tag #
995
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_variable_etc #
996
#pragma interface id_variable_etc_tag IS_id_variable_etc
997
 
998
#pragma token PROC ( EXP : IDENTIFIER : )\
999
    EXP : PTR ( TYPE ) : id_variable_etc_type #
1000
#pragma interface id_variable_etc_type
1001
 
1002
#pragma token PROC ( EXP : IDENTIFIER : )\
1003
    EXP : PTR ( EXP ) : id_variable_etc_init #
1004
#pragma interface id_variable_etc_init
1005
 
1006
#pragma token PROC ( EXP : IDENTIFIER : )\
1007
    EXP : PTR ( EXP ) : id_variable_etc_term #
1008
#pragma interface id_variable_etc_term
1009
 
1010
#pragma token PROC (\
1011
	EXP : unsigned :,\
1012
	EXP : HASHID :,\
1013
	EXP : DECL_SPEC :,\
1014
	EXP : NAMESPACE :,\
1015
	EXP : LOCATION :,\
1016
	EXP : TYPE :,\
1017
	EXP lvalue : IDENTIFIER :\
1018
    ) STATEMENT MAKE_id_variable_etc #
1019
#pragma interface MAKE_id_variable_etc
1020
 
1021
#pragma token PROC (\
1022
	EXP : unsigned :,\
1023
	EXP : IDENTIFIER :\
1024
    ) STATEMENT MODIFY_id_variable_etc #
1025
#pragma interface MODIFY_id_variable_etc
1026
 
1027
#pragma token PROC (\
1028
	EXP lvalue : HASHID :,\
1029
	EXP lvalue : DECL_SPEC :,\
1030
	EXP lvalue : NAMESPACE :,\
1031
	EXP lvalue : LOCATION :,\
1032
	EXP lvalue : IDENTIFIER :,\
1033
	EXP lvalue : ulong_type :,\
1034
	EXP lvalue : ulong_type :,\
1035
	EXP lvalue : TYPE :,\
1036
	EXP lvalue : EXP :,\
1037
	EXP lvalue : EXP :,\
1038
	EXP : IDENTIFIER :\
1039
    ) STATEMENT DECONS_id_variable_etc #
1040
#pragma interface DECONS_id_variable_etc
1041
 
1042
#pragma token PROC (\
1043
	EXP : DESTROYER :,\
1044
	EXP lvalue : HASHID :,\
1045
	EXP lvalue : DECL_SPEC :,\
1046
	EXP lvalue : NAMESPACE :,\
1047
	EXP lvalue : LOCATION :,\
1048
	EXP lvalue : IDENTIFIER :,\
1049
	EXP lvalue : ulong_type :,\
1050
	EXP lvalue : ulong_type :,\
1051
	EXP lvalue : TYPE :,\
1052
	EXP lvalue : EXP :,\
1053
	EXP lvalue : EXP :,\
1054
	EXP : IDENTIFIER :\
1055
    ) STATEMENT DESTROY_id_variable_etc #
1056
#pragma interface DESTROY_id_variable_etc
1057
 
1058
 
1059
/* Operations for field variable of union IDENTIFIER */
1060
 
1061
#pragma token EXP const : unsigned : id_variable_tag #
1062
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_variable #
1063
#pragma interface id_variable_tag IS_id_variable
1064
 
1065
#pragma token PROC ( EXP : IDENTIFIER : )\
1066
    EXP : PTR ( TYPE ) : id_variable_type #
1067
#pragma interface id_variable_type
1068
 
1069
#pragma token PROC ( EXP : IDENTIFIER : )\
1070
    EXP : PTR ( EXP ) : id_variable_init #
1071
#pragma interface id_variable_init
1072
 
1073
#pragma token PROC ( EXP : IDENTIFIER : )\
1074
    EXP : PTR ( EXP ) : id_variable_term #
1075
#pragma interface id_variable_term
1076
 
1077
#pragma token PROC (\
1078
	EXP : HASHID :,\
1079
	EXP : DECL_SPEC :,\
1080
	EXP : NAMESPACE :,\
1081
	EXP : LOCATION :,\
1082
	EXP : TYPE :,\
1083
	EXP lvalue : IDENTIFIER :\
1084
    ) STATEMENT MAKE_id_variable #
1085
#pragma interface MAKE_id_variable
1086
 
1087
#pragma token PROC (\
1088
	EXP lvalue : HASHID :,\
1089
	EXP lvalue : DECL_SPEC :,\
1090
	EXP lvalue : NAMESPACE :,\
1091
	EXP lvalue : LOCATION :,\
1092
	EXP lvalue : IDENTIFIER :,\
1093
	EXP lvalue : ulong_type :,\
1094
	EXP lvalue : ulong_type :,\
1095
	EXP lvalue : TYPE :,\
1096
	EXP lvalue : EXP :,\
1097
	EXP lvalue : EXP :,\
1098
	EXP : IDENTIFIER :\
1099
    ) STATEMENT DECONS_id_variable #
1100
#pragma interface DECONS_id_variable
1101
 
1102
#pragma token PROC (\
1103
	EXP : DESTROYER :,\
1104
	EXP lvalue : HASHID :,\
1105
	EXP lvalue : DECL_SPEC :,\
1106
	EXP lvalue : NAMESPACE :,\
1107
	EXP lvalue : LOCATION :,\
1108
	EXP lvalue : IDENTIFIER :,\
1109
	EXP lvalue : ulong_type :,\
1110
	EXP lvalue : ulong_type :,\
1111
	EXP lvalue : TYPE :,\
1112
	EXP lvalue : EXP :,\
1113
	EXP lvalue : EXP :,\
1114
	EXP : IDENTIFIER :\
1115
    ) STATEMENT DESTROY_id_variable #
1116
#pragma interface DESTROY_id_variable
1117
 
1118
 
1119
/* Operations for field parameter of union IDENTIFIER */
1120
 
1121
#pragma token EXP const : unsigned : id_parameter_tag #
1122
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_parameter #
1123
#pragma interface id_parameter_tag IS_id_parameter
1124
 
1125
#pragma token PROC ( EXP : IDENTIFIER : )\
1126
    EXP : PTR ( TYPE ) : id_parameter_type #
1127
#pragma interface id_parameter_type
1128
 
1129
#pragma token PROC ( EXP : IDENTIFIER : )\
1130
    EXP : PTR ( EXP ) : id_parameter_init #
1131
#pragma interface id_parameter_init
1132
 
1133
#pragma token PROC ( EXP : IDENTIFIER : )\
1134
    EXP : PTR ( EXP ) : id_parameter_term #
1135
#pragma interface id_parameter_term
1136
 
1137
#pragma token PROC (\
1138
	EXP : HASHID :,\
1139
	EXP : DECL_SPEC :,\
1140
	EXP : NAMESPACE :,\
1141
	EXP : LOCATION :,\
1142
	EXP : TYPE :,\
1143
	EXP lvalue : IDENTIFIER :\
1144
    ) STATEMENT MAKE_id_parameter #
1145
#pragma interface MAKE_id_parameter
1146
 
1147
#pragma token PROC (\
1148
	EXP lvalue : HASHID :,\
1149
	EXP lvalue : DECL_SPEC :,\
1150
	EXP lvalue : NAMESPACE :,\
1151
	EXP lvalue : LOCATION :,\
1152
	EXP lvalue : IDENTIFIER :,\
1153
	EXP lvalue : ulong_type :,\
1154
	EXP lvalue : ulong_type :,\
1155
	EXP lvalue : TYPE :,\
1156
	EXP lvalue : EXP :,\
1157
	EXP lvalue : EXP :,\
1158
	EXP : IDENTIFIER :\
1159
    ) STATEMENT DECONS_id_parameter #
1160
#pragma interface DECONS_id_parameter
1161
 
1162
#pragma token PROC (\
1163
	EXP : DESTROYER :,\
1164
	EXP lvalue : HASHID :,\
1165
	EXP lvalue : DECL_SPEC :,\
1166
	EXP lvalue : NAMESPACE :,\
1167
	EXP lvalue : LOCATION :,\
1168
	EXP lvalue : IDENTIFIER :,\
1169
	EXP lvalue : ulong_type :,\
1170
	EXP lvalue : ulong_type :,\
1171
	EXP lvalue : TYPE :,\
1172
	EXP lvalue : EXP :,\
1173
	EXP lvalue : EXP :,\
1174
	EXP : IDENTIFIER :\
1175
    ) STATEMENT DESTROY_id_parameter #
1176
#pragma interface DESTROY_id_parameter
1177
 
1178
 
1179
/* Operations for field stat_member of union IDENTIFIER */
1180
 
1181
#pragma token EXP const : unsigned : id_stat_member_tag #
1182
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_stat_member #
1183
#pragma interface id_stat_member_tag IS_id_stat_member
1184
 
1185
#pragma token PROC ( EXP : IDENTIFIER : )\
1186
    EXP : PTR ( TYPE ) : id_stat_member_type #
1187
#pragma interface id_stat_member_type
1188
 
1189
#pragma token PROC ( EXP : IDENTIFIER : )\
1190
    EXP : PTR ( EXP ) : id_stat_member_init #
1191
#pragma interface id_stat_member_init
1192
 
1193
#pragma token PROC ( EXP : IDENTIFIER : )\
1194
    EXP : PTR ( EXP ) : id_stat_member_term #
1195
#pragma interface id_stat_member_term
1196
 
1197
#pragma token PROC (\
1198
	EXP : HASHID :,\
1199
	EXP : DECL_SPEC :,\
1200
	EXP : NAMESPACE :,\
1201
	EXP : LOCATION :,\
1202
	EXP : TYPE :,\
1203
	EXP lvalue : IDENTIFIER :\
1204
    ) STATEMENT MAKE_id_stat_member #
1205
#pragma interface MAKE_id_stat_member
1206
 
1207
#pragma token PROC (\
1208
	EXP lvalue : HASHID :,\
1209
	EXP lvalue : DECL_SPEC :,\
1210
	EXP lvalue : NAMESPACE :,\
1211
	EXP lvalue : LOCATION :,\
1212
	EXP lvalue : IDENTIFIER :,\
1213
	EXP lvalue : ulong_type :,\
1214
	EXP lvalue : ulong_type :,\
1215
	EXP lvalue : TYPE :,\
1216
	EXP lvalue : EXP :,\
1217
	EXP lvalue : EXP :,\
1218
	EXP : IDENTIFIER :\
1219
    ) STATEMENT DECONS_id_stat_member #
1220
#pragma interface DECONS_id_stat_member
1221
 
1222
#pragma token PROC (\
1223
	EXP : DESTROYER :,\
1224
	EXP lvalue : HASHID :,\
1225
	EXP lvalue : DECL_SPEC :,\
1226
	EXP lvalue : NAMESPACE :,\
1227
	EXP lvalue : LOCATION :,\
1228
	EXP lvalue : IDENTIFIER :,\
1229
	EXP lvalue : ulong_type :,\
1230
	EXP lvalue : ulong_type :,\
1231
	EXP lvalue : TYPE :,\
1232
	EXP lvalue : EXP :,\
1233
	EXP lvalue : EXP :,\
1234
	EXP : IDENTIFIER :\
1235
    ) STATEMENT DESTROY_id_stat_member #
1236
#pragma interface DESTROY_id_stat_member
1237
 
1238
 
1239
/* Operations for field weak_param of union IDENTIFIER */
1240
 
1241
#pragma token EXP const : unsigned : id_weak_param_tag #
1242
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_weak_param #
1243
#pragma interface id_weak_param_tag IS_id_weak_param
1244
 
1245
#pragma token PROC (\
1246
	EXP : HASHID :,\
1247
	EXP : DECL_SPEC :,\
1248
	EXP : NAMESPACE :,\
1249
	EXP : LOCATION :,\
1250
	EXP lvalue : IDENTIFIER :\
1251
    ) STATEMENT MAKE_id_weak_param #
1252
#pragma interface MAKE_id_weak_param
1253
 
1254
#pragma token PROC (\
1255
	EXP lvalue : HASHID :,\
1256
	EXP lvalue : DECL_SPEC :,\
1257
	EXP lvalue : NAMESPACE :,\
1258
	EXP lvalue : LOCATION :,\
1259
	EXP lvalue : IDENTIFIER :,\
1260
	EXP lvalue : ulong_type :,\
1261
	EXP lvalue : ulong_type :,\
1262
	EXP : IDENTIFIER :\
1263
    ) STATEMENT DECONS_id_weak_param #
1264
#pragma interface DECONS_id_weak_param
1265
 
1266
#pragma token PROC (\
1267
	EXP : DESTROYER :,\
1268
	EXP lvalue : HASHID :,\
1269
	EXP lvalue : DECL_SPEC :,\
1270
	EXP lvalue : NAMESPACE :,\
1271
	EXP lvalue : LOCATION :,\
1272
	EXP lvalue : IDENTIFIER :,\
1273
	EXP lvalue : ulong_type :,\
1274
	EXP lvalue : ulong_type :,\
1275
	EXP : IDENTIFIER :\
1276
    ) STATEMENT DESTROY_id_weak_param #
1277
#pragma interface DESTROY_id_weak_param
1278
 
1279
 
1280
/* Operations for field set function_etc of union IDENTIFIER */
1281
 
1282
#pragma token EXP const : unsigned : id_function_etc_tag #
1283
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_function_etc #
1284
#pragma interface id_function_etc_tag IS_id_function_etc
1285
 
1286
#pragma token PROC ( EXP : IDENTIFIER : )\
1287
    EXP : PTR ( TYPE ) : id_function_etc_type #
1288
#pragma interface id_function_etc_type
1289
 
1290
#pragma token PROC ( EXP : IDENTIFIER : )\
1291
    EXP : PTR ( IDENTIFIER ) : id_function_etc_over #
1292
#pragma interface id_function_etc_over
1293
 
1294
#pragma token PROC ( EXP : IDENTIFIER : )\
1295
    EXP : PTR ( TYPE ) : id_function_etc_form #
1296
#pragma interface id_function_etc_form
1297
 
1298
#pragma token PROC ( EXP : IDENTIFIER : )\
1299
    EXP : PTR ( LIST ( CLASS_TYPE ) ) : id_function_etc_chums #
1300
#pragma interface id_function_etc_chums
1301
 
1302
#pragma token PROC ( EXP : IDENTIFIER : )\
1303
    EXP : PTR ( EXP ) : id_function_etc_defn #
1304
#pragma interface id_function_etc_defn
1305
 
1306
#pragma token PROC (\
1307
	EXP : unsigned :,\
1308
	EXP : HASHID :,\
1309
	EXP : DECL_SPEC :,\
1310
	EXP : NAMESPACE :,\
1311
	EXP : LOCATION :,\
1312
	EXP : TYPE :,\
1313
	EXP : IDENTIFIER :,\
1314
	EXP lvalue : IDENTIFIER :\
1315
    ) STATEMENT MAKE_id_function_etc #
1316
#pragma interface MAKE_id_function_etc
1317
 
1318
#pragma token PROC (\
1319
	EXP : unsigned :,\
1320
	EXP : IDENTIFIER :\
1321
    ) STATEMENT MODIFY_id_function_etc #
1322
#pragma interface MODIFY_id_function_etc
1323
 
1324
#pragma token PROC (\
1325
	EXP lvalue : HASHID :,\
1326
	EXP lvalue : DECL_SPEC :,\
1327
	EXP lvalue : NAMESPACE :,\
1328
	EXP lvalue : LOCATION :,\
1329
	EXP lvalue : IDENTIFIER :,\
1330
	EXP lvalue : ulong_type :,\
1331
	EXP lvalue : ulong_type :,\
1332
	EXP lvalue : TYPE :,\
1333
	EXP lvalue : IDENTIFIER :,\
1334
	EXP lvalue : TYPE :,\
1335
	EXP lvalue : LIST ( CLASS_TYPE ) :,\
1336
	EXP lvalue : EXP :,\
1337
	EXP : IDENTIFIER :\
1338
    ) STATEMENT DECONS_id_function_etc #
1339
#pragma interface DECONS_id_function_etc
1340
 
1341
#pragma token PROC (\
1342
	EXP : DESTROYER :,\
1343
	EXP lvalue : HASHID :,\
1344
	EXP lvalue : DECL_SPEC :,\
1345
	EXP lvalue : NAMESPACE :,\
1346
	EXP lvalue : LOCATION :,\
1347
	EXP lvalue : IDENTIFIER :,\
1348
	EXP lvalue : ulong_type :,\
1349
	EXP lvalue : ulong_type :,\
1350
	EXP lvalue : TYPE :,\
1351
	EXP lvalue : IDENTIFIER :,\
1352
	EXP lvalue : TYPE :,\
1353
	EXP lvalue : LIST ( CLASS_TYPE ) :,\
1354
	EXP lvalue : EXP :,\
1355
	EXP : IDENTIFIER :\
1356
    ) STATEMENT DESTROY_id_function_etc #
1357
#pragma interface DESTROY_id_function_etc
1358
 
1359
 
1360
/* Operations for field function of union IDENTIFIER */
1361
 
1362
#pragma token EXP const : unsigned : id_function_tag #
1363
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_function #
1364
#pragma interface id_function_tag IS_id_function
1365
 
1366
#pragma token PROC ( EXP : IDENTIFIER : )\
1367
    EXP : PTR ( TYPE ) : id_function_type #
1368
#pragma interface id_function_type
1369
 
1370
#pragma token PROC ( EXP : IDENTIFIER : )\
1371
    EXP : PTR ( IDENTIFIER ) : id_function_over #
1372
#pragma interface id_function_over
1373
 
1374
#pragma token PROC ( EXP : IDENTIFIER : )\
1375
    EXP : PTR ( TYPE ) : id_function_form #
1376
#pragma interface id_function_form
1377
 
1378
#pragma token PROC ( EXP : IDENTIFIER : )\
1379
    EXP : PTR ( LIST ( CLASS_TYPE ) ) : id_function_chums #
1380
#pragma interface id_function_chums
1381
 
1382
#pragma token PROC ( EXP : IDENTIFIER : )\
1383
    EXP : PTR ( EXP ) : id_function_defn #
1384
#pragma interface id_function_defn
1385
 
1386
#pragma token PROC (\
1387
	EXP : HASHID :,\
1388
	EXP : DECL_SPEC :,\
1389
	EXP : NAMESPACE :,\
1390
	EXP : LOCATION :,\
1391
	EXP : TYPE :,\
1392
	EXP : IDENTIFIER :,\
1393
	EXP lvalue : IDENTIFIER :\
1394
    ) STATEMENT MAKE_id_function #
1395
#pragma interface MAKE_id_function
1396
 
1397
#pragma token PROC (\
1398
	EXP lvalue : HASHID :,\
1399
	EXP lvalue : DECL_SPEC :,\
1400
	EXP lvalue : NAMESPACE :,\
1401
	EXP lvalue : LOCATION :,\
1402
	EXP lvalue : IDENTIFIER :,\
1403
	EXP lvalue : ulong_type :,\
1404
	EXP lvalue : ulong_type :,\
1405
	EXP lvalue : TYPE :,\
1406
	EXP lvalue : IDENTIFIER :,\
1407
	EXP lvalue : TYPE :,\
1408
	EXP lvalue : LIST ( CLASS_TYPE ) :,\
1409
	EXP lvalue : EXP :,\
1410
	EXP : IDENTIFIER :\
1411
    ) STATEMENT DECONS_id_function #
1412
#pragma interface DECONS_id_function
1413
 
1414
#pragma token PROC (\
1415
	EXP : DESTROYER :,\
1416
	EXP lvalue : HASHID :,\
1417
	EXP lvalue : DECL_SPEC :,\
1418
	EXP lvalue : NAMESPACE :,\
1419
	EXP lvalue : LOCATION :,\
1420
	EXP lvalue : IDENTIFIER :,\
1421
	EXP lvalue : ulong_type :,\
1422
	EXP lvalue : ulong_type :,\
1423
	EXP lvalue : TYPE :,\
1424
	EXP lvalue : IDENTIFIER :,\
1425
	EXP lvalue : TYPE :,\
1426
	EXP lvalue : LIST ( CLASS_TYPE ) :,\
1427
	EXP lvalue : EXP :,\
1428
	EXP : IDENTIFIER :\
1429
    ) STATEMENT DESTROY_id_function #
1430
#pragma interface DESTROY_id_function
1431
 
1432
 
1433
/* Operations for field mem_func of union IDENTIFIER */
1434
 
1435
#pragma token EXP const : unsigned : id_mem_func_tag #
1436
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_mem_func #
1437
#pragma interface id_mem_func_tag IS_id_mem_func
1438
 
1439
#pragma token PROC ( EXP : IDENTIFIER : )\
1440
    EXP : PTR ( TYPE ) : id_mem_func_type #
1441
#pragma interface id_mem_func_type
1442
 
1443
#pragma token PROC ( EXP : IDENTIFIER : )\
1444
    EXP : PTR ( IDENTIFIER ) : id_mem_func_over #
1445
#pragma interface id_mem_func_over
1446
 
1447
#pragma token PROC ( EXP : IDENTIFIER : )\
1448
    EXP : PTR ( TYPE ) : id_mem_func_form #
1449
#pragma interface id_mem_func_form
1450
 
1451
#pragma token PROC ( EXP : IDENTIFIER : )\
1452
    EXP : PTR ( LIST ( CLASS_TYPE ) ) : id_mem_func_chums #
1453
#pragma interface id_mem_func_chums
1454
 
1455
#pragma token PROC ( EXP : IDENTIFIER : )\
1456
    EXP : PTR ( EXP ) : id_mem_func_defn #
1457
#pragma interface id_mem_func_defn
1458
 
1459
#pragma token PROC (\
1460
	EXP : HASHID :,\
1461
	EXP : DECL_SPEC :,\
1462
	EXP : NAMESPACE :,\
1463
	EXP : LOCATION :,\
1464
	EXP : TYPE :,\
1465
	EXP : IDENTIFIER :,\
1466
	EXP lvalue : IDENTIFIER :\
1467
    ) STATEMENT MAKE_id_mem_func #
1468
#pragma interface MAKE_id_mem_func
1469
 
1470
#pragma token PROC (\
1471
	EXP lvalue : HASHID :,\
1472
	EXP lvalue : DECL_SPEC :,\
1473
	EXP lvalue : NAMESPACE :,\
1474
	EXP lvalue : LOCATION :,\
1475
	EXP lvalue : IDENTIFIER :,\
1476
	EXP lvalue : ulong_type :,\
1477
	EXP lvalue : ulong_type :,\
1478
	EXP lvalue : TYPE :,\
1479
	EXP lvalue : IDENTIFIER :,\
1480
	EXP lvalue : TYPE :,\
1481
	EXP lvalue : LIST ( CLASS_TYPE ) :,\
1482
	EXP lvalue : EXP :,\
1483
	EXP : IDENTIFIER :\
1484
    ) STATEMENT DECONS_id_mem_func #
1485
#pragma interface DECONS_id_mem_func
1486
 
1487
#pragma token PROC (\
1488
	EXP : DESTROYER :,\
1489
	EXP lvalue : HASHID :,\
1490
	EXP lvalue : DECL_SPEC :,\
1491
	EXP lvalue : NAMESPACE :,\
1492
	EXP lvalue : LOCATION :,\
1493
	EXP lvalue : IDENTIFIER :,\
1494
	EXP lvalue : ulong_type :,\
1495
	EXP lvalue : ulong_type :,\
1496
	EXP lvalue : TYPE :,\
1497
	EXP lvalue : IDENTIFIER :,\
1498
	EXP lvalue : TYPE :,\
1499
	EXP lvalue : LIST ( CLASS_TYPE ) :,\
1500
	EXP lvalue : EXP :,\
1501
	EXP : IDENTIFIER :\
1502
    ) STATEMENT DESTROY_id_mem_func #
1503
#pragma interface DESTROY_id_mem_func
1504
 
1505
 
1506
/* Operations for field stat_mem_func of union IDENTIFIER */
1507
 
1508
#pragma token EXP const : unsigned : id_stat_mem_func_tag #
1509
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_stat_mem_func #
1510
#pragma interface id_stat_mem_func_tag IS_id_stat_mem_func
1511
 
1512
#pragma token PROC ( EXP : IDENTIFIER : )\
1513
    EXP : PTR ( TYPE ) : id_stat_mem_func_type #
1514
#pragma interface id_stat_mem_func_type
1515
 
1516
#pragma token PROC ( EXP : IDENTIFIER : )\
1517
    EXP : PTR ( IDENTIFIER ) : id_stat_mem_func_over #
1518
#pragma interface id_stat_mem_func_over
1519
 
1520
#pragma token PROC ( EXP : IDENTIFIER : )\
1521
    EXP : PTR ( TYPE ) : id_stat_mem_func_form #
1522
#pragma interface id_stat_mem_func_form
1523
 
1524
#pragma token PROC ( EXP : IDENTIFIER : )\
1525
    EXP : PTR ( LIST ( CLASS_TYPE ) ) : id_stat_mem_func_chums #
1526
#pragma interface id_stat_mem_func_chums
1527
 
1528
#pragma token PROC ( EXP : IDENTIFIER : )\
1529
    EXP : PTR ( EXP ) : id_stat_mem_func_defn #
1530
#pragma interface id_stat_mem_func_defn
1531
 
1532
#pragma token PROC (\
1533
	EXP : HASHID :,\
1534
	EXP : DECL_SPEC :,\
1535
	EXP : NAMESPACE :,\
1536
	EXP : LOCATION :,\
1537
	EXP : TYPE :,\
1538
	EXP : IDENTIFIER :,\
1539
	EXP lvalue : IDENTIFIER :\
1540
    ) STATEMENT MAKE_id_stat_mem_func #
1541
#pragma interface MAKE_id_stat_mem_func
1542
 
1543
#pragma token PROC (\
1544
	EXP lvalue : HASHID :,\
1545
	EXP lvalue : DECL_SPEC :,\
1546
	EXP lvalue : NAMESPACE :,\
1547
	EXP lvalue : LOCATION :,\
1548
	EXP lvalue : IDENTIFIER :,\
1549
	EXP lvalue : ulong_type :,\
1550
	EXP lvalue : ulong_type :,\
1551
	EXP lvalue : TYPE :,\
1552
	EXP lvalue : IDENTIFIER :,\
1553
	EXP lvalue : TYPE :,\
1554
	EXP lvalue : LIST ( CLASS_TYPE ) :,\
1555
	EXP lvalue : EXP :,\
1556
	EXP : IDENTIFIER :\
1557
    ) STATEMENT DECONS_id_stat_mem_func #
1558
#pragma interface DECONS_id_stat_mem_func
1559
 
1560
#pragma token PROC (\
1561
	EXP : DESTROYER :,\
1562
	EXP lvalue : HASHID :,\
1563
	EXP lvalue : DECL_SPEC :,\
1564
	EXP lvalue : NAMESPACE :,\
1565
	EXP lvalue : LOCATION :,\
1566
	EXP lvalue : IDENTIFIER :,\
1567
	EXP lvalue : ulong_type :,\
1568
	EXP lvalue : ulong_type :,\
1569
	EXP lvalue : TYPE :,\
1570
	EXP lvalue : IDENTIFIER :,\
1571
	EXP lvalue : TYPE :,\
1572
	EXP lvalue : LIST ( CLASS_TYPE ) :,\
1573
	EXP lvalue : EXP :,\
1574
	EXP : IDENTIFIER :\
1575
    ) STATEMENT DESTROY_id_stat_mem_func #
1576
#pragma interface DESTROY_id_stat_mem_func
1577
 
1578
 
1579
/* Operations for field member of union IDENTIFIER */
1580
 
1581
#pragma token EXP const : unsigned : id_member_tag #
1582
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_member #
1583
#pragma interface id_member_tag IS_id_member
1584
 
1585
#pragma token PROC ( EXP : IDENTIFIER : )\
1586
    EXP : PTR ( TYPE ) : id_member_type #
1587
#pragma interface id_member_type
1588
 
1589
#pragma token PROC ( EXP : IDENTIFIER : )\
1590
    EXP : PTR ( OFFSET ) : id_member_off #
1591
#pragma interface id_member_off
1592
 
1593
#pragma token PROC ( EXP : IDENTIFIER : )\
1594
    EXP : PTR ( GRAPH ) : id_member_base #
1595
#pragma interface id_member_base
1596
 
1597
#pragma token PROC (\
1598
	EXP : HASHID :,\
1599
	EXP : DECL_SPEC :,\
1600
	EXP : NAMESPACE :,\
1601
	EXP : LOCATION :,\
1602
	EXP : TYPE :,\
1603
	EXP lvalue : IDENTIFIER :\
1604
    ) STATEMENT MAKE_id_member #
1605
#pragma interface MAKE_id_member
1606
 
1607
#pragma token PROC (\
1608
	EXP lvalue : HASHID :,\
1609
	EXP lvalue : DECL_SPEC :,\
1610
	EXP lvalue : NAMESPACE :,\
1611
	EXP lvalue : LOCATION :,\
1612
	EXP lvalue : IDENTIFIER :,\
1613
	EXP lvalue : ulong_type :,\
1614
	EXP lvalue : ulong_type :,\
1615
	EXP lvalue : TYPE :,\
1616
	EXP lvalue : OFFSET :,\
1617
	EXP lvalue : GRAPH :,\
1618
	EXP : IDENTIFIER :\
1619
    ) STATEMENT DECONS_id_member #
1620
#pragma interface DECONS_id_member
1621
 
1622
#pragma token PROC (\
1623
	EXP : DESTROYER :,\
1624
	EXP lvalue : HASHID :,\
1625
	EXP lvalue : DECL_SPEC :,\
1626
	EXP lvalue : NAMESPACE :,\
1627
	EXP lvalue : LOCATION :,\
1628
	EXP lvalue : IDENTIFIER :,\
1629
	EXP lvalue : ulong_type :,\
1630
	EXP lvalue : ulong_type :,\
1631
	EXP lvalue : TYPE :,\
1632
	EXP lvalue : OFFSET :,\
1633
	EXP lvalue : GRAPH :,\
1634
	EXP : IDENTIFIER :\
1635
    ) STATEMENT DESTROY_id_member #
1636
#pragma interface DESTROY_id_member
1637
 
1638
 
1639
/* Operations for field enumerator of union IDENTIFIER */
1640
 
1641
#pragma token EXP const : unsigned : id_enumerator_tag #
1642
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_enumerator #
1643
#pragma interface id_enumerator_tag IS_id_enumerator
1644
 
1645
#pragma token PROC ( EXP : IDENTIFIER : )\
1646
    EXP : PTR ( TYPE ) : id_enumerator_etype #
1647
#pragma interface id_enumerator_etype
1648
 
1649
#pragma token PROC ( EXP : IDENTIFIER : )\
1650
    EXP : PTR ( EXP ) : id_enumerator_value #
1651
#pragma interface id_enumerator_value
1652
 
1653
#pragma token PROC (\
1654
	EXP : HASHID :,\
1655
	EXP : DECL_SPEC :,\
1656
	EXP : NAMESPACE :,\
1657
	EXP : LOCATION :,\
1658
	EXP : TYPE :,\
1659
	EXP : EXP :,\
1660
	EXP lvalue : IDENTIFIER :\
1661
    ) STATEMENT MAKE_id_enumerator #
1662
#pragma interface MAKE_id_enumerator
1663
 
1664
#pragma token PROC (\
1665
	EXP lvalue : HASHID :,\
1666
	EXP lvalue : DECL_SPEC :,\
1667
	EXP lvalue : NAMESPACE :,\
1668
	EXP lvalue : LOCATION :,\
1669
	EXP lvalue : IDENTIFIER :,\
1670
	EXP lvalue : ulong_type :,\
1671
	EXP lvalue : ulong_type :,\
1672
	EXP lvalue : TYPE :,\
1673
	EXP lvalue : EXP :,\
1674
	EXP : IDENTIFIER :\
1675
    ) STATEMENT DECONS_id_enumerator #
1676
#pragma interface DECONS_id_enumerator
1677
 
1678
#pragma token PROC (\
1679
	EXP : DESTROYER :,\
1680
	EXP lvalue : HASHID :,\
1681
	EXP lvalue : DECL_SPEC :,\
1682
	EXP lvalue : NAMESPACE :,\
1683
	EXP lvalue : LOCATION :,\
1684
	EXP lvalue : IDENTIFIER :,\
1685
	EXP lvalue : ulong_type :,\
1686
	EXP lvalue : ulong_type :,\
1687
	EXP lvalue : TYPE :,\
1688
	EXP lvalue : EXP :,\
1689
	EXP : IDENTIFIER :\
1690
    ) STATEMENT DESTROY_id_enumerator #
1691
#pragma interface DESTROY_id_enumerator
1692
 
1693
 
1694
/* Operations for field label of union IDENTIFIER */
1695
 
1696
#pragma token EXP const : unsigned : id_label_tag #
1697
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_label #
1698
#pragma interface id_label_tag IS_id_label
1699
 
1700
#pragma token PROC ( EXP : IDENTIFIER : )\
1701
    EXP : PTR ( int ) : id_label_op #
1702
#pragma interface id_label_op
1703
 
1704
#pragma token PROC ( EXP : IDENTIFIER : )\
1705
    EXP : PTR ( EXP ) : id_label_stmt #
1706
#pragma interface id_label_stmt
1707
 
1708
#pragma token PROC ( EXP : IDENTIFIER : )\
1709
    EXP : PTR ( EXP ) : id_label_gotos #
1710
#pragma interface id_label_gotos
1711
 
1712
#pragma token PROC ( EXP : IDENTIFIER : )\
1713
    EXP : PTR ( LIST ( VARIABLE ) ) : id_label_vars #
1714
#pragma interface id_label_vars
1715
 
1716
#pragma token PROC (\
1717
	EXP : HASHID :,\
1718
	EXP : DECL_SPEC :,\
1719
	EXP : NAMESPACE :,\
1720
	EXP : LOCATION :,\
1721
	EXP : int :,\
1722
	EXP lvalue : IDENTIFIER :\
1723
    ) STATEMENT MAKE_id_label #
1724
#pragma interface MAKE_id_label
1725
 
1726
#pragma token PROC (\
1727
	EXP lvalue : HASHID :,\
1728
	EXP lvalue : DECL_SPEC :,\
1729
	EXP lvalue : NAMESPACE :,\
1730
	EXP lvalue : LOCATION :,\
1731
	EXP lvalue : IDENTIFIER :,\
1732
	EXP lvalue : ulong_type :,\
1733
	EXP lvalue : ulong_type :,\
1734
	EXP lvalue : int :,\
1735
	EXP lvalue : EXP :,\
1736
	EXP lvalue : EXP :,\
1737
	EXP lvalue : LIST ( VARIABLE ) :,\
1738
	EXP : IDENTIFIER :\
1739
    ) STATEMENT DECONS_id_label #
1740
#pragma interface DECONS_id_label
1741
 
1742
#pragma token PROC (\
1743
	EXP : DESTROYER :,\
1744
	EXP lvalue : HASHID :,\
1745
	EXP lvalue : DECL_SPEC :,\
1746
	EXP lvalue : NAMESPACE :,\
1747
	EXP lvalue : LOCATION :,\
1748
	EXP lvalue : IDENTIFIER :,\
1749
	EXP lvalue : ulong_type :,\
1750
	EXP lvalue : ulong_type :,\
1751
	EXP lvalue : int :,\
1752
	EXP lvalue : EXP :,\
1753
	EXP lvalue : EXP :,\
1754
	EXP lvalue : LIST ( VARIABLE ) :,\
1755
	EXP : IDENTIFIER :\
1756
    ) STATEMENT DESTROY_id_label #
1757
#pragma interface DESTROY_id_label
1758
 
1759
 
1760
/* Operations for field token of union IDENTIFIER */
1761
 
1762
#pragma token EXP const : unsigned : id_token_tag #
1763
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_token #
1764
#pragma interface id_token_tag IS_id_token
1765
 
1766
#pragma token PROC ( EXP : IDENTIFIER : )\
1767
    EXP : PTR ( TOKEN ) : id_token_sort #
1768
#pragma interface id_token_sort
1769
 
1770
#pragma token PROC ( EXP : IDENTIFIER : )\
1771
    EXP : PTR ( IDENTIFIER ) : id_token_alt #
1772
#pragma interface id_token_alt
1773
 
1774
#pragma token PROC (\
1775
	EXP : HASHID :,\
1776
	EXP : DECL_SPEC :,\
1777
	EXP : NAMESPACE :,\
1778
	EXP : LOCATION :,\
1779
	EXP : TOKEN :,\
1780
	EXP : IDENTIFIER :,\
1781
	EXP lvalue : IDENTIFIER :\
1782
    ) STATEMENT MAKE_id_token #
1783
#pragma interface MAKE_id_token
1784
 
1785
#pragma token PROC (\
1786
	EXP lvalue : HASHID :,\
1787
	EXP lvalue : DECL_SPEC :,\
1788
	EXP lvalue : NAMESPACE :,\
1789
	EXP lvalue : LOCATION :,\
1790
	EXP lvalue : IDENTIFIER :,\
1791
	EXP lvalue : ulong_type :,\
1792
	EXP lvalue : ulong_type :,\
1793
	EXP lvalue : TOKEN :,\
1794
	EXP lvalue : IDENTIFIER :,\
1795
	EXP : IDENTIFIER :\
1796
    ) STATEMENT DECONS_id_token #
1797
#pragma interface DECONS_id_token
1798
 
1799
#pragma token PROC (\
1800
	EXP : DESTROYER :,\
1801
	EXP lvalue : HASHID :,\
1802
	EXP lvalue : DECL_SPEC :,\
1803
	EXP lvalue : NAMESPACE :,\
1804
	EXP lvalue : LOCATION :,\
1805
	EXP lvalue : IDENTIFIER :,\
1806
	EXP lvalue : ulong_type :,\
1807
	EXP lvalue : ulong_type :,\
1808
	EXP lvalue : TOKEN :,\
1809
	EXP lvalue : IDENTIFIER :,\
1810
	EXP : IDENTIFIER :\
1811
    ) STATEMENT DESTROY_id_token #
1812
#pragma interface DESTROY_id_token
1813
 
1814
 
1815
/* Operations for field ambig of union IDENTIFIER */
1816
 
1817
#pragma token EXP const : unsigned : id_ambig_tag #
1818
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_ambig #
1819
#pragma interface id_ambig_tag IS_id_ambig
1820
 
1821
#pragma token PROC ( EXP : IDENTIFIER : )\
1822
    EXP : PTR ( LIST ( IDENTIFIER ) ) : id_ambig_ids #
1823
#pragma interface id_ambig_ids
1824
 
1825
#pragma token PROC ( EXP : IDENTIFIER : )\
1826
    EXP : PTR ( int ) : id_ambig_over #
1827
#pragma interface id_ambig_over
1828
 
1829
#pragma token PROC (\
1830
	EXP : HASHID :,\
1831
	EXP : DECL_SPEC :,\
1832
	EXP : NAMESPACE :,\
1833
	EXP : LOCATION :,\
1834
	EXP : LIST ( IDENTIFIER ) :,\
1835
	EXP : int :,\
1836
	EXP lvalue : IDENTIFIER :\
1837
    ) STATEMENT MAKE_id_ambig #
1838
#pragma interface MAKE_id_ambig
1839
 
1840
#pragma token PROC (\
1841
	EXP lvalue : HASHID :,\
1842
	EXP lvalue : DECL_SPEC :,\
1843
	EXP lvalue : NAMESPACE :,\
1844
	EXP lvalue : LOCATION :,\
1845
	EXP lvalue : IDENTIFIER :,\
1846
	EXP lvalue : ulong_type :,\
1847
	EXP lvalue : ulong_type :,\
1848
	EXP lvalue : LIST ( IDENTIFIER ) :,\
1849
	EXP lvalue : int :,\
1850
	EXP : IDENTIFIER :\
1851
    ) STATEMENT DECONS_id_ambig #
1852
#pragma interface DECONS_id_ambig
1853
 
1854
#pragma token PROC (\
1855
	EXP : DESTROYER :,\
1856
	EXP lvalue : HASHID :,\
1857
	EXP lvalue : DECL_SPEC :,\
1858
	EXP lvalue : NAMESPACE :,\
1859
	EXP lvalue : LOCATION :,\
1860
	EXP lvalue : IDENTIFIER :,\
1861
	EXP lvalue : ulong_type :,\
1862
	EXP lvalue : ulong_type :,\
1863
	EXP lvalue : LIST ( IDENTIFIER ) :,\
1864
	EXP lvalue : int :,\
1865
	EXP : IDENTIFIER :\
1866
    ) STATEMENT DESTROY_id_ambig #
1867
#pragma interface DESTROY_id_ambig
1868
 
1869
 
1870
/* Operations for field undef of union IDENTIFIER */
1871
 
1872
#pragma token EXP const : unsigned : id_undef_tag #
1873
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_undef #
1874
#pragma interface id_undef_tag IS_id_undef
1875
 
1876
#pragma token PROC ( EXP : IDENTIFIER : )\
1877
    EXP : PTR ( TYPE ) : id_undef_form #
1878
#pragma interface id_undef_form
1879
 
1880
#pragma token PROC (\
1881
	EXP : HASHID :,\
1882
	EXP : DECL_SPEC :,\
1883
	EXP : NAMESPACE :,\
1884
	EXP : LOCATION :,\
1885
	EXP lvalue : IDENTIFIER :\
1886
    ) STATEMENT MAKE_id_undef #
1887
#pragma interface MAKE_id_undef
1888
 
1889
#pragma token PROC (\
1890
	EXP lvalue : HASHID :,\
1891
	EXP lvalue : DECL_SPEC :,\
1892
	EXP lvalue : NAMESPACE :,\
1893
	EXP lvalue : LOCATION :,\
1894
	EXP lvalue : IDENTIFIER :,\
1895
	EXP lvalue : ulong_type :,\
1896
	EXP lvalue : ulong_type :,\
1897
	EXP lvalue : TYPE :,\
1898
	EXP : IDENTIFIER :\
1899
    ) STATEMENT DECONS_id_undef #
1900
#pragma interface DECONS_id_undef
1901
 
1902
#pragma token PROC (\
1903
	EXP : DESTROYER :,\
1904
	EXP lvalue : HASHID :,\
1905
	EXP lvalue : DECL_SPEC :,\
1906
	EXP lvalue : NAMESPACE :,\
1907
	EXP lvalue : LOCATION :,\
1908
	EXP lvalue : IDENTIFIER :,\
1909
	EXP lvalue : ulong_type :,\
1910
	EXP lvalue : ulong_type :,\
1911
	EXP lvalue : TYPE :,\
1912
	EXP : IDENTIFIER :\
1913
    ) STATEMENT DESTROY_id_undef #
1914
#pragma interface DESTROY_id_undef
1915
 
1916
 
1917
/* Operations for field pending of union IDENTIFIER */
1918
 
1919
#pragma token EXP const : unsigned : id_pending_tag #
1920
#pragma token PROC ( EXP : IDENTIFIER : ) EXP : int : IS_id_pending #
1921
#pragma interface id_pending_tag IS_id_pending
1922
 
1923
#pragma token PROC ( EXP : IDENTIFIER : )\
1924
    EXP : PTR ( unsigned ) : id_pending_itag #
1925
#pragma interface id_pending_itag
1926
 
1927
#pragma token PROC ( EXP : IDENTIFIER : )\
1928
    EXP : PTR ( TYPE ) : id_pending_type #
1929
#pragma interface id_pending_type
1930
 
1931
#pragma token PROC (\
1932
	EXP : HASHID :,\
1933
	EXP : DECL_SPEC :,\
1934
	EXP : NAMESPACE :,\
1935
	EXP : LOCATION :,\
1936
	EXP : unsigned :,\
1937
	EXP : TYPE :,\
1938
	EXP lvalue : IDENTIFIER :\
1939
    ) STATEMENT MAKE_id_pending #
1940
#pragma interface MAKE_id_pending
1941
 
1942
#pragma token PROC (\
1943
	EXP lvalue : HASHID :,\
1944
	EXP lvalue : DECL_SPEC :,\
1945
	EXP lvalue : NAMESPACE :,\
1946
	EXP lvalue : LOCATION :,\
1947
	EXP lvalue : IDENTIFIER :,\
1948
	EXP lvalue : ulong_type :,\
1949
	EXP lvalue : ulong_type :,\
1950
	EXP lvalue : unsigned :,\
1951
	EXP lvalue : TYPE :,\
1952
	EXP : IDENTIFIER :\
1953
    ) STATEMENT DECONS_id_pending #
1954
#pragma interface DECONS_id_pending
1955
 
1956
#pragma token PROC (\
1957
	EXP : DESTROYER :,\
1958
	EXP lvalue : HASHID :,\
1959
	EXP lvalue : DECL_SPEC :,\
1960
	EXP lvalue : NAMESPACE :,\
1961
	EXP lvalue : LOCATION :,\
1962
	EXP lvalue : IDENTIFIER :,\
1963
	EXP lvalue : ulong_type :,\
1964
	EXP lvalue : ulong_type :,\
1965
	EXP lvalue : unsigned :,\
1966
	EXP lvalue : TYPE :,\
1967
	EXP : IDENTIFIER :\
1968
    ) STATEMENT DESTROY_id_pending #
1969
#pragma interface DESTROY_id_pending
1970
 
1971
 
1972
#endif