Subversion Repositories tendra.SVN

Rev

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

Rev 2 Rev 7
Line 35... Line 35...
35
#ifndef NSPACE_OPS_H_INCLUDED
35
#ifndef NSPACE_OPS_H_INCLUDED
36
#define NSPACE_OPS_H_INCLUDED
36
#define NSPACE_OPS_H_INCLUDED
37
 
37
 
38
/* Operations for union NAMESPACE */
38
/* Operations for union NAMESPACE */
39
 
39
 
40
#pragma token PROC ( EXP : NAMESPACE : ) EXP : unsigned : TAG_nspace #
40
#pragma token PROC(EXP : NAMESPACE :) EXP : unsigned : TAG_nspace #
41
#pragma interface TAG_nspace
41
#pragma interface TAG_nspace
42
 
42
 
43
 
43
 
44
/* Operations for component name of union NAMESPACE */
44
/* Operations for component name of union NAMESPACE */
45
 
45
 
46
#pragma token PROC ( EXP : NAMESPACE : )\
46
#pragma token PROC(EXP : NAMESPACE :)\
47
    EXP : PTR ( IDENTIFIER ) : nspace_name #
47
    EXP : PTR(IDENTIFIER) : nspace_name #
48
#pragma interface nspace_name
48
#pragma interface nspace_name
49
 
49
 
50
/* Operations for component last of union NAMESPACE */
50
/* Operations for component last of union NAMESPACE */
51
 
51
 
52
#pragma token PROC ( EXP : NAMESPACE : )\
52
#pragma token PROC(EXP : NAMESPACE :)\
53
    EXP : PTR ( MEMBER ) : nspace_last #
53
    EXP : PTR(MEMBER) : nspace_last #
54
#pragma interface nspace_last
54
#pragma interface nspace_last
55
 
55
 
56
/* Operations for component prev of union NAMESPACE */
56
/* Operations for component prev of union NAMESPACE */
57
 
57
 
58
#pragma token PROC ( EXP : NAMESPACE : )\
58
#pragma token PROC(EXP : NAMESPACE :)\
59
    EXP : PTR ( MEMBER ) : nspace_prev #
59
    EXP : PTR(MEMBER) : nspace_prev #
60
#pragma interface nspace_prev
60
#pragma interface nspace_prev
61
 
61
 
62
/* Operations for component parent of union NAMESPACE */
62
/* Operations for component parent of union NAMESPACE */
63
 
63
 
64
#pragma token PROC ( EXP : NAMESPACE : )\
64
#pragma token PROC(EXP : NAMESPACE :)\
65
    EXP : PTR ( NAMESPACE ) : nspace_parent #
65
    EXP : PTR(NAMESPACE) : nspace_parent #
66
#pragma interface nspace_parent
66
#pragma interface nspace_parent
67
 
67
 
68
/* Operations for component use of union NAMESPACE */
68
/* Operations for component use of union NAMESPACE */
69
 
69
 
70
#pragma token PROC ( EXP : NAMESPACE : )\
70
#pragma token PROC(EXP : NAMESPACE :)\
71
    EXP : PTR ( LIST ( NAMESPACE ) ) : nspace_use #
71
    EXP : PTR(LIST(NAMESPACE)) : nspace_use #
72
#pragma interface nspace_use
72
#pragma interface nspace_use
73
 
73
 
74
/* Operations for component join of union NAMESPACE */
74
/* Operations for component join of union NAMESPACE */
75
 
75
 
76
#pragma token PROC ( EXP : NAMESPACE : )\
76
#pragma token PROC(EXP : NAMESPACE :)\
77
    EXP : PTR ( LIST ( NAMESPACE ) ) : nspace_join #
77
    EXP : PTR(LIST(NAMESPACE)) : nspace_join #
78
#pragma interface nspace_join
78
#pragma interface nspace_join
79
 
79
 
80
/* Operations for component set of union NAMESPACE */
80
/* Operations for component set of union NAMESPACE */
81
 
81
 
82
#pragma token PROC ( EXP : NAMESPACE : )\
82
#pragma token PROC(EXP : NAMESPACE :)\
83
    EXP : PTR ( STACK ( IDENTIFIER ) ) : nspace_set #
83
    EXP : PTR(STACK(IDENTIFIER)) : nspace_set #
84
#pragma interface nspace_set
84
#pragma interface nspace_set
85
 
85
 
86
/* Operations for component dump of union NAMESPACE */
86
/* Operations for component dump of union NAMESPACE */
87
 
87
 
88
#pragma token PROC ( EXP : NAMESPACE : )\
88
#pragma token PROC(EXP : NAMESPACE :)\
89
    EXP : PTR ( ulong_type ) : nspace_dump #
89
    EXP : PTR(ulong_type) : nspace_dump #
90
#pragma interface nspace_dump
90
#pragma interface nspace_dump
91
 
91
 
92
/* Operations for field set block_etc of union NAMESPACE */
92
/* Operations for field set block_etc of union NAMESPACE */
93
 
93
 
94
#pragma token EXP const : unsigned : nspace_block_etc_tag #
94
#pragma token EXP const : unsigned : nspace_block_etc_tag #
95
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_block_etc #
95
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_block_etc #
96
#pragma interface nspace_block_etc_tag IS_nspace_block_etc
96
#pragma interface nspace_block_etc_tag IS_nspace_block_etc
97
 
97
 
98
#pragma token PROC (\
98
#pragma token PROC(\
99
	EXP : unsigned :,\
99
	EXP : unsigned :,\
100
	EXP : IDENTIFIER :,\
100
	EXP : IDENTIFIER :,\
101
	EXP : NAMESPACE :,\
101
	EXP : NAMESPACE :,\
102
	EXP lvalue : NAMESPACE :\
102
	EXP lvalue : NAMESPACE :\
103
    ) STATEMENT MAKE_nspace_block_etc #
103
    ) STATEMENT MAKE_nspace_block_etc #
104
#pragma interface MAKE_nspace_block_etc
104
#pragma interface MAKE_nspace_block_etc
105
 
105
 
106
#pragma token PROC (\
106
#pragma token PROC(\
107
	EXP : unsigned :,\
107
	EXP : unsigned :,\
108
	EXP : NAMESPACE :\
108
	EXP : NAMESPACE :\
109
    ) STATEMENT MODIFY_nspace_block_etc #
109
    ) STATEMENT MODIFY_nspace_block_etc #
110
#pragma interface MODIFY_nspace_block_etc
110
#pragma interface MODIFY_nspace_block_etc
111
 
111
 
112
#pragma token PROC (\
112
#pragma token PROC(\
113
	EXP lvalue : IDENTIFIER :,\
113
	EXP lvalue : IDENTIFIER :,\
114
	EXP lvalue : MEMBER :,\
114
	EXP lvalue : MEMBER :,\
115
	EXP lvalue : MEMBER :,\
115
	EXP lvalue : MEMBER :,\
116
	EXP lvalue : NAMESPACE :,\
116
	EXP lvalue : NAMESPACE :,\
117
	EXP lvalue : LIST ( NAMESPACE ) :,\
117
	EXP lvalue : LIST(NAMESPACE) :,\
118
	EXP lvalue : LIST ( NAMESPACE ) :,\
118
	EXP lvalue : LIST(NAMESPACE) :,\
119
	EXP lvalue : STACK ( IDENTIFIER ) :,\
119
	EXP lvalue : STACK(IDENTIFIER) :,\
120
	EXP lvalue : ulong_type :,\
120
	EXP lvalue : ulong_type :,\
121
	EXP : NAMESPACE :\
121
	EXP : NAMESPACE :\
122
    ) STATEMENT DECONS_nspace_block_etc #
122
    ) STATEMENT DECONS_nspace_block_etc #
123
#pragma interface DECONS_nspace_block_etc
123
#pragma interface DECONS_nspace_block_etc
124
 
124
 
125
#pragma token PROC (\
125
#pragma token PROC(\
126
	EXP : DESTROYER :,\
126
	EXP : DESTROYER :,\
127
	EXP lvalue : IDENTIFIER :,\
127
	EXP lvalue : IDENTIFIER :,\
128
	EXP lvalue : MEMBER :,\
128
	EXP lvalue : MEMBER :,\
129
	EXP lvalue : MEMBER :,\
129
	EXP lvalue : MEMBER :,\
130
	EXP lvalue : NAMESPACE :,\
130
	EXP lvalue : NAMESPACE :,\
131
	EXP lvalue : LIST ( NAMESPACE ) :,\
131
	EXP lvalue : LIST(NAMESPACE) :,\
132
	EXP lvalue : LIST ( NAMESPACE ) :,\
132
	EXP lvalue : LIST(NAMESPACE) :,\
133
	EXP lvalue : STACK ( IDENTIFIER ) :,\
133
	EXP lvalue : STACK(IDENTIFIER) :,\
134
	EXP lvalue : ulong_type :,\
134
	EXP lvalue : ulong_type :,\
135
	EXP : NAMESPACE :\
135
	EXP : NAMESPACE :\
136
    ) STATEMENT DESTROY_nspace_block_etc #
136
    ) STATEMENT DESTROY_nspace_block_etc #
137
#pragma interface DESTROY_nspace_block_etc
137
#pragma interface DESTROY_nspace_block_etc
138
 
138
 
139
 
139
 
140
/* Operations for field block of union NAMESPACE */
140
/* Operations for field block of union NAMESPACE */
141
 
141
 
142
#pragma token EXP const : unsigned : nspace_block_tag #
142
#pragma token EXP const : unsigned : nspace_block_tag #
143
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_block #
143
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_block #
144
#pragma interface nspace_block_tag IS_nspace_block
144
#pragma interface nspace_block_tag IS_nspace_block
145
 
145
 
146
#pragma token PROC (\
146
#pragma token PROC(\
147
	EXP : IDENTIFIER :,\
147
	EXP : IDENTIFIER :,\
148
	EXP : NAMESPACE :,\
148
	EXP : NAMESPACE :,\
149
	EXP lvalue : NAMESPACE :\
149
	EXP lvalue : NAMESPACE :\
150
    ) STATEMENT MAKE_nspace_block #
150
    ) STATEMENT MAKE_nspace_block #
151
#pragma interface MAKE_nspace_block
151
#pragma interface MAKE_nspace_block
152
 
152
 
153
#pragma token PROC (\
153
#pragma token PROC(\
154
	EXP lvalue : IDENTIFIER :,\
154
	EXP lvalue : IDENTIFIER :,\
155
	EXP lvalue : MEMBER :,\
155
	EXP lvalue : MEMBER :,\
156
	EXP lvalue : MEMBER :,\
156
	EXP lvalue : MEMBER :,\
157
	EXP lvalue : NAMESPACE :,\
157
	EXP lvalue : NAMESPACE :,\
158
	EXP lvalue : LIST ( NAMESPACE ) :,\
158
	EXP lvalue : LIST(NAMESPACE) :,\
159
	EXP lvalue : LIST ( NAMESPACE ) :,\
159
	EXP lvalue : LIST(NAMESPACE) :,\
160
	EXP lvalue : STACK ( IDENTIFIER ) :,\
160
	EXP lvalue : STACK(IDENTIFIER) :,\
161
	EXP lvalue : ulong_type :,\
161
	EXP lvalue : ulong_type :,\
162
	EXP : NAMESPACE :\
162
	EXP : NAMESPACE :\
163
    ) STATEMENT DECONS_nspace_block #
163
    ) STATEMENT DECONS_nspace_block #
164
#pragma interface DECONS_nspace_block
164
#pragma interface DECONS_nspace_block
165
 
165
 
166
#pragma token PROC (\
166
#pragma token PROC(\
167
	EXP : DESTROYER :,\
167
	EXP : DESTROYER :,\
168
	EXP lvalue : IDENTIFIER :,\
168
	EXP lvalue : IDENTIFIER :,\
169
	EXP lvalue : MEMBER :,\
169
	EXP lvalue : MEMBER :,\
170
	EXP lvalue : MEMBER :,\
170
	EXP lvalue : MEMBER :,\
171
	EXP lvalue : NAMESPACE :,\
171
	EXP lvalue : NAMESPACE :,\
172
	EXP lvalue : LIST ( NAMESPACE ) :,\
172
	EXP lvalue : LIST(NAMESPACE) :,\
173
	EXP lvalue : LIST ( NAMESPACE ) :,\
173
	EXP lvalue : LIST(NAMESPACE) :,\
174
	EXP lvalue : STACK ( IDENTIFIER ) :,\
174
	EXP lvalue : STACK(IDENTIFIER) :,\
175
	EXP lvalue : ulong_type :,\
175
	EXP lvalue : ulong_type :,\
176
	EXP : NAMESPACE :\
176
	EXP : NAMESPACE :\
177
    ) STATEMENT DESTROY_nspace_block #
177
    ) STATEMENT DESTROY_nspace_block #
178
#pragma interface DESTROY_nspace_block
178
#pragma interface DESTROY_nspace_block
179
 
179
 
180
 
180
 
181
/* Operations for field param of union NAMESPACE */
181
/* Operations for field param of union NAMESPACE */
182
 
182
 
183
#pragma token EXP const : unsigned : nspace_param_tag #
183
#pragma token EXP const : unsigned : nspace_param_tag #
184
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_param #
184
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_param #
185
#pragma interface nspace_param_tag IS_nspace_param
185
#pragma interface nspace_param_tag IS_nspace_param
186
 
186
 
187
#pragma token PROC (\
187
#pragma token PROC(\
188
	EXP : IDENTIFIER :,\
188
	EXP : IDENTIFIER :,\
189
	EXP : NAMESPACE :,\
189
	EXP : NAMESPACE :,\
190
	EXP lvalue : NAMESPACE :\
190
	EXP lvalue : NAMESPACE :\
191
    ) STATEMENT MAKE_nspace_param #
191
    ) STATEMENT MAKE_nspace_param #
192
#pragma interface MAKE_nspace_param
192
#pragma interface MAKE_nspace_param
193
 
193
 
194
#pragma token PROC (\
194
#pragma token PROC(\
195
	EXP lvalue : IDENTIFIER :,\
195
	EXP lvalue : IDENTIFIER :,\
196
	EXP lvalue : MEMBER :,\
196
	EXP lvalue : MEMBER :,\
197
	EXP lvalue : MEMBER :,\
197
	EXP lvalue : MEMBER :,\
198
	EXP lvalue : NAMESPACE :,\
198
	EXP lvalue : NAMESPACE :,\
199
	EXP lvalue : LIST ( NAMESPACE ) :,\
199
	EXP lvalue : LIST(NAMESPACE) :,\
200
	EXP lvalue : LIST ( NAMESPACE ) :,\
200
	EXP lvalue : LIST(NAMESPACE) :,\
201
	EXP lvalue : STACK ( IDENTIFIER ) :,\
201
	EXP lvalue : STACK(IDENTIFIER) :,\
202
	EXP lvalue : ulong_type :,\
202
	EXP lvalue : ulong_type :,\
203
	EXP : NAMESPACE :\
203
	EXP : NAMESPACE :\
204
    ) STATEMENT DECONS_nspace_param #
204
    ) STATEMENT DECONS_nspace_param #
205
#pragma interface DECONS_nspace_param
205
#pragma interface DECONS_nspace_param
206
 
206
 
207
#pragma token PROC (\
207
#pragma token PROC(\
208
	EXP : DESTROYER :,\
208
	EXP : DESTROYER :,\
209
	EXP lvalue : IDENTIFIER :,\
209
	EXP lvalue : IDENTIFIER :,\
210
	EXP lvalue : MEMBER :,\
210
	EXP lvalue : MEMBER :,\
211
	EXP lvalue : MEMBER :,\
211
	EXP lvalue : MEMBER :,\
212
	EXP lvalue : NAMESPACE :,\
212
	EXP lvalue : NAMESPACE :,\
213
	EXP lvalue : LIST ( NAMESPACE ) :,\
213
	EXP lvalue : LIST(NAMESPACE) :,\
214
	EXP lvalue : LIST ( NAMESPACE ) :,\
214
	EXP lvalue : LIST(NAMESPACE) :,\
215
	EXP lvalue : STACK ( IDENTIFIER ) :,\
215
	EXP lvalue : STACK(IDENTIFIER) :,\
216
	EXP lvalue : ulong_type :,\
216
	EXP lvalue : ulong_type :,\
217
	EXP : NAMESPACE :\
217
	EXP : NAMESPACE :\
218
    ) STATEMENT DESTROY_nspace_param #
218
    ) STATEMENT DESTROY_nspace_param #
219
#pragma interface DESTROY_nspace_param
219
#pragma interface DESTROY_nspace_param
220
 
220
 
221
 
221
 
222
/* Operations for field dummy of union NAMESPACE */
222
/* Operations for field dummy of union NAMESPACE */
223
 
223
 
224
#pragma token EXP const : unsigned : nspace_dummy_tag #
224
#pragma token EXP const : unsigned : nspace_dummy_tag #
225
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_dummy #
225
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_dummy #
226
#pragma interface nspace_dummy_tag IS_nspace_dummy
226
#pragma interface nspace_dummy_tag IS_nspace_dummy
227
 
227
 
228
#pragma token PROC (\
228
#pragma token PROC(\
229
	EXP : IDENTIFIER :,\
229
	EXP : IDENTIFIER :,\
230
	EXP : NAMESPACE :,\
230
	EXP : NAMESPACE :,\
231
	EXP lvalue : NAMESPACE :\
231
	EXP lvalue : NAMESPACE :\
232
    ) STATEMENT MAKE_nspace_dummy #
232
    ) STATEMENT MAKE_nspace_dummy #
233
#pragma interface MAKE_nspace_dummy
233
#pragma interface MAKE_nspace_dummy
234
 
234
 
235
#pragma token PROC (\
235
#pragma token PROC(\
236
	EXP lvalue : IDENTIFIER :,\
236
	EXP lvalue : IDENTIFIER :,\
237
	EXP lvalue : MEMBER :,\
237
	EXP lvalue : MEMBER :,\
238
	EXP lvalue : MEMBER :,\
238
	EXP lvalue : MEMBER :,\
239
	EXP lvalue : NAMESPACE :,\
239
	EXP lvalue : NAMESPACE :,\
240
	EXP lvalue : LIST ( NAMESPACE ) :,\
240
	EXP lvalue : LIST(NAMESPACE) :,\
241
	EXP lvalue : LIST ( NAMESPACE ) :,\
241
	EXP lvalue : LIST(NAMESPACE) :,\
242
	EXP lvalue : STACK ( IDENTIFIER ) :,\
242
	EXP lvalue : STACK(IDENTIFIER) :,\
243
	EXP lvalue : ulong_type :,\
243
	EXP lvalue : ulong_type :,\
244
	EXP : NAMESPACE :\
244
	EXP : NAMESPACE :\
245
    ) STATEMENT DECONS_nspace_dummy #
245
    ) STATEMENT DECONS_nspace_dummy #
246
#pragma interface DECONS_nspace_dummy
246
#pragma interface DECONS_nspace_dummy
247
 
247
 
248
#pragma token PROC (\
248
#pragma token PROC(\
249
	EXP : DESTROYER :,\
249
	EXP : DESTROYER :,\
250
	EXP lvalue : IDENTIFIER :,\
250
	EXP lvalue : IDENTIFIER :,\
251
	EXP lvalue : MEMBER :,\
251
	EXP lvalue : MEMBER :,\
252
	EXP lvalue : MEMBER :,\
252
	EXP lvalue : MEMBER :,\
253
	EXP lvalue : NAMESPACE :,\
253
	EXP lvalue : NAMESPACE :,\
254
	EXP lvalue : LIST ( NAMESPACE ) :,\
254
	EXP lvalue : LIST(NAMESPACE) :,\
255
	EXP lvalue : LIST ( NAMESPACE ) :,\
255
	EXP lvalue : LIST(NAMESPACE) :,\
256
	EXP lvalue : STACK ( IDENTIFIER ) :,\
256
	EXP lvalue : STACK(IDENTIFIER) :,\
257
	EXP lvalue : ulong_type :,\
257
	EXP lvalue : ulong_type :,\
258
	EXP : NAMESPACE :\
258
	EXP : NAMESPACE :\
259
    ) STATEMENT DESTROY_nspace_dummy #
259
    ) STATEMENT DESTROY_nspace_dummy #
260
#pragma interface DESTROY_nspace_dummy
260
#pragma interface DESTROY_nspace_dummy
261
 
261
 
262
 
262
 
263
/* Operations for field label of union NAMESPACE */
263
/* Operations for field label of union NAMESPACE */
264
 
264
 
265
#pragma token EXP const : unsigned : nspace_label_tag #
265
#pragma token EXP const : unsigned : nspace_label_tag #
266
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_label #
266
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_label #
267
#pragma interface nspace_label_tag IS_nspace_label
267
#pragma interface nspace_label_tag IS_nspace_label
268
 
268
 
269
#pragma token PROC (\
269
#pragma token PROC(\
270
	EXP : IDENTIFIER :,\
270
	EXP : IDENTIFIER :,\
271
	EXP : NAMESPACE :,\
271
	EXP : NAMESPACE :,\
272
	EXP lvalue : NAMESPACE :\
272
	EXP lvalue : NAMESPACE :\
273
    ) STATEMENT MAKE_nspace_label #
273
    ) STATEMENT MAKE_nspace_label #
274
#pragma interface MAKE_nspace_label
274
#pragma interface MAKE_nspace_label
275
 
275
 
276
#pragma token PROC (\
276
#pragma token PROC(\
277
	EXP lvalue : IDENTIFIER :,\
277
	EXP lvalue : IDENTIFIER :,\
278
	EXP lvalue : MEMBER :,\
278
	EXP lvalue : MEMBER :,\
279
	EXP lvalue : MEMBER :,\
279
	EXP lvalue : MEMBER :,\
280
	EXP lvalue : NAMESPACE :,\
280
	EXP lvalue : NAMESPACE :,\
281
	EXP lvalue : LIST ( NAMESPACE ) :,\
281
	EXP lvalue : LIST(NAMESPACE) :,\
282
	EXP lvalue : LIST ( NAMESPACE ) :,\
282
	EXP lvalue : LIST(NAMESPACE) :,\
283
	EXP lvalue : STACK ( IDENTIFIER ) :,\
283
	EXP lvalue : STACK(IDENTIFIER) :,\
284
	EXP lvalue : ulong_type :,\
284
	EXP lvalue : ulong_type :,\
285
	EXP : NAMESPACE :\
285
	EXP : NAMESPACE :\
286
    ) STATEMENT DECONS_nspace_label #
286
    ) STATEMENT DECONS_nspace_label #
287
#pragma interface DECONS_nspace_label
287
#pragma interface DECONS_nspace_label
288
 
288
 
289
#pragma token PROC (\
289
#pragma token PROC(\
290
	EXP : DESTROYER :,\
290
	EXP : DESTROYER :,\
291
	EXP lvalue : IDENTIFIER :,\
291
	EXP lvalue : IDENTIFIER :,\
292
	EXP lvalue : MEMBER :,\
292
	EXP lvalue : MEMBER :,\
293
	EXP lvalue : MEMBER :,\
293
	EXP lvalue : MEMBER :,\
294
	EXP lvalue : NAMESPACE :,\
294
	EXP lvalue : NAMESPACE :,\
295
	EXP lvalue : LIST ( NAMESPACE ) :,\
295
	EXP lvalue : LIST(NAMESPACE) :,\
296
	EXP lvalue : LIST ( NAMESPACE ) :,\
296
	EXP lvalue : LIST(NAMESPACE) :,\
297
	EXP lvalue : STACK ( IDENTIFIER ) :,\
297
	EXP lvalue : STACK(IDENTIFIER) :,\
298
	EXP lvalue : ulong_type :,\
298
	EXP lvalue : ulong_type :,\
299
	EXP : NAMESPACE :\
299
	EXP : NAMESPACE :\
300
    ) STATEMENT DESTROY_nspace_label #
300
    ) STATEMENT DESTROY_nspace_label #
301
#pragma interface DESTROY_nspace_label
301
#pragma interface DESTROY_nspace_label
302
 
302
 
303
 
303
 
304
/* Operations for field templ of union NAMESPACE */
304
/* Operations for field templ of union NAMESPACE */
305
 
305
 
306
#pragma token EXP const : unsigned : nspace_templ_tag #
306
#pragma token EXP const : unsigned : nspace_templ_tag #
307
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_templ #
307
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_templ #
308
#pragma interface nspace_templ_tag IS_nspace_templ
308
#pragma interface nspace_templ_tag IS_nspace_templ
309
 
309
 
310
#pragma token PROC (\
310
#pragma token PROC(\
311
	EXP : IDENTIFIER :,\
311
	EXP : IDENTIFIER :,\
312
	EXP : NAMESPACE :,\
312
	EXP : NAMESPACE :,\
313
	EXP lvalue : NAMESPACE :\
313
	EXP lvalue : NAMESPACE :\
314
    ) STATEMENT MAKE_nspace_templ #
314
    ) STATEMENT MAKE_nspace_templ #
315
#pragma interface MAKE_nspace_templ
315
#pragma interface MAKE_nspace_templ
316
 
316
 
317
#pragma token PROC (\
317
#pragma token PROC(\
318
	EXP lvalue : IDENTIFIER :,\
318
	EXP lvalue : IDENTIFIER :,\
319
	EXP lvalue : MEMBER :,\
319
	EXP lvalue : MEMBER :,\
320
	EXP lvalue : MEMBER :,\
320
	EXP lvalue : MEMBER :,\
321
	EXP lvalue : NAMESPACE :,\
321
	EXP lvalue : NAMESPACE :,\
322
	EXP lvalue : LIST ( NAMESPACE ) :,\
322
	EXP lvalue : LIST(NAMESPACE) :,\
323
	EXP lvalue : LIST ( NAMESPACE ) :,\
323
	EXP lvalue : LIST(NAMESPACE) :,\
324
	EXP lvalue : STACK ( IDENTIFIER ) :,\
324
	EXP lvalue : STACK(IDENTIFIER) :,\
325
	EXP lvalue : ulong_type :,\
325
	EXP lvalue : ulong_type :,\
326
	EXP : NAMESPACE :\
326
	EXP : NAMESPACE :\
327
    ) STATEMENT DECONS_nspace_templ #
327
    ) STATEMENT DECONS_nspace_templ #
328
#pragma interface DECONS_nspace_templ
328
#pragma interface DECONS_nspace_templ
329
 
329
 
330
#pragma token PROC (\
330
#pragma token PROC(\
331
	EXP : DESTROYER :,\
331
	EXP : DESTROYER :,\
332
	EXP lvalue : IDENTIFIER :,\
332
	EXP lvalue : IDENTIFIER :,\
333
	EXP lvalue : MEMBER :,\
333
	EXP lvalue : MEMBER :,\
334
	EXP lvalue : MEMBER :,\
334
	EXP lvalue : MEMBER :,\
335
	EXP lvalue : NAMESPACE :,\
335
	EXP lvalue : NAMESPACE :,\
336
	EXP lvalue : LIST ( NAMESPACE ) :,\
336
	EXP lvalue : LIST(NAMESPACE) :,\
337
	EXP lvalue : LIST ( NAMESPACE ) :,\
337
	EXP lvalue : LIST(NAMESPACE) :,\
338
	EXP lvalue : STACK ( IDENTIFIER ) :,\
338
	EXP lvalue : STACK(IDENTIFIER) :,\
339
	EXP lvalue : ulong_type :,\
339
	EXP lvalue : ulong_type :,\
340
	EXP : NAMESPACE :\
340
	EXP : NAMESPACE :\
341
    ) STATEMENT DESTROY_nspace_templ #
341
    ) STATEMENT DESTROY_nspace_templ #
342
#pragma interface DESTROY_nspace_templ
342
#pragma interface DESTROY_nspace_templ
343
 
343
 
344
 
344
 
345
/* Operations for field set named_etc of union NAMESPACE */
345
/* Operations for field set named_etc of union NAMESPACE */
346
 
346
 
347
#pragma token EXP const : unsigned : nspace_named_etc_tag #
347
#pragma token EXP const : unsigned : nspace_named_etc_tag #
348
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_named_etc #
348
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_named_etc #
349
#pragma interface nspace_named_etc_tag IS_nspace_named_etc
349
#pragma interface nspace_named_etc_tag IS_nspace_named_etc
350
 
350
 
351
#pragma token PROC ( EXP : NAMESPACE : )\
351
#pragma token PROC(EXP : NAMESPACE :)\
352
    EXP : PTR ( MEMBER ) : nspace_named_etc_first #
352
    EXP : PTR(MEMBER) : nspace_named_etc_first #
353
#pragma interface nspace_named_etc_first
353
#pragma interface nspace_named_etc_first
354
 
354
 
355
#pragma token PROC ( EXP : NAMESPACE : )\
355
#pragma token PROC(EXP : NAMESPACE :)\
356
    EXP : PTR ( LIST ( IDENTIFIER ) ) : nspace_named_etc_extra #
356
    EXP : PTR(LIST(IDENTIFIER)) : nspace_named_etc_extra #
357
#pragma interface nspace_named_etc_extra
357
#pragma interface nspace_named_etc_extra
358
 
358
 
359
#pragma token PROC ( EXP : NAMESPACE : )\
359
#pragma token PROC(EXP : NAMESPACE :)\
360
    EXP : PTR ( ulong_type ) : nspace_named_etc_size #
360
    EXP : PTR(ulong_type) : nspace_named_etc_size #
361
#pragma interface nspace_named_etc_size
361
#pragma interface nspace_named_etc_size
362
 
362
 
363
#pragma token PROC ( EXP : NAMESPACE : )\
363
#pragma token PROC(EXP : NAMESPACE :)\
364
    EXP : PTR ( PTR ( MEMBER ) ) : nspace_named_etc_table #
364
    EXP : PTR(PTR(MEMBER)) : nspace_named_etc_table #
365
#pragma interface nspace_named_etc_table
365
#pragma interface nspace_named_etc_table
366
 
366
 
367
#pragma token PROC (\
367
#pragma token PROC(\
368
	EXP : unsigned :,\
368
	EXP : unsigned :,\
369
	EXP : IDENTIFIER :,\
369
	EXP : IDENTIFIER :,\
370
	EXP : NAMESPACE :,\
370
	EXP : NAMESPACE :,\
371
	EXP : ulong_type :,\
371
	EXP : ulong_type :,\
372
	EXP : PTR ( MEMBER ) :,\
372
	EXP : PTR(MEMBER) :,\
373
	EXP lvalue : NAMESPACE :\
373
	EXP lvalue : NAMESPACE :\
374
    ) STATEMENT MAKE_nspace_named_etc #
374
    ) STATEMENT MAKE_nspace_named_etc #
375
#pragma interface MAKE_nspace_named_etc
375
#pragma interface MAKE_nspace_named_etc
376
 
376
 
377
#pragma token PROC (\
377
#pragma token PROC(\
378
	EXP : unsigned :,\
378
	EXP : unsigned :,\
379
	EXP : NAMESPACE :\
379
	EXP : NAMESPACE :\
380
    ) STATEMENT MODIFY_nspace_named_etc #
380
    ) STATEMENT MODIFY_nspace_named_etc #
381
#pragma interface MODIFY_nspace_named_etc
381
#pragma interface MODIFY_nspace_named_etc
382
 
382
 
383
#pragma token PROC (\
383
#pragma token PROC(\
384
	EXP lvalue : IDENTIFIER :,\
384
	EXP lvalue : IDENTIFIER :,\
385
	EXP lvalue : MEMBER :,\
385
	EXP lvalue : MEMBER :,\
386
	EXP lvalue : MEMBER :,\
386
	EXP lvalue : MEMBER :,\
387
	EXP lvalue : NAMESPACE :,\
387
	EXP lvalue : NAMESPACE :,\
388
	EXP lvalue : LIST ( NAMESPACE ) :,\
388
	EXP lvalue : LIST(NAMESPACE) :,\
389
	EXP lvalue : LIST ( NAMESPACE ) :,\
389
	EXP lvalue : LIST(NAMESPACE) :,\
390
	EXP lvalue : STACK ( IDENTIFIER ) :,\
390
	EXP lvalue : STACK(IDENTIFIER) :,\
391
	EXP lvalue : ulong_type :,\
391
	EXP lvalue : ulong_type :,\
392
	EXP lvalue : MEMBER :,\
392
	EXP lvalue : MEMBER :,\
393
	EXP lvalue : LIST ( IDENTIFIER ) :,\
393
	EXP lvalue : LIST(IDENTIFIER) :,\
394
	EXP lvalue : ulong_type :,\
394
	EXP lvalue : ulong_type :,\
395
	EXP lvalue : PTR ( MEMBER ) :,\
395
	EXP lvalue : PTR(MEMBER) :,\
396
	EXP : NAMESPACE :\
396
	EXP : NAMESPACE :\
397
    ) STATEMENT DECONS_nspace_named_etc #
397
    ) STATEMENT DECONS_nspace_named_etc #
398
#pragma interface DECONS_nspace_named_etc
398
#pragma interface DECONS_nspace_named_etc
399
 
399
 
400
#pragma token PROC (\
400
#pragma token PROC(\
401
	EXP : DESTROYER :,\
401
	EXP : DESTROYER :,\
402
	EXP lvalue : IDENTIFIER :,\
402
	EXP lvalue : IDENTIFIER :,\
403
	EXP lvalue : MEMBER :,\
403
	EXP lvalue : MEMBER :,\
404
	EXP lvalue : MEMBER :,\
404
	EXP lvalue : MEMBER :,\
405
	EXP lvalue : NAMESPACE :,\
405
	EXP lvalue : NAMESPACE :,\
406
	EXP lvalue : LIST ( NAMESPACE ) :,\
406
	EXP lvalue : LIST(NAMESPACE) :,\
407
	EXP lvalue : LIST ( NAMESPACE ) :,\
407
	EXP lvalue : LIST(NAMESPACE) :,\
408
	EXP lvalue : STACK ( IDENTIFIER ) :,\
408
	EXP lvalue : STACK(IDENTIFIER) :,\
409
	EXP lvalue : ulong_type :,\
409
	EXP lvalue : ulong_type :,\
410
	EXP lvalue : MEMBER :,\
410
	EXP lvalue : MEMBER :,\
411
	EXP lvalue : LIST ( IDENTIFIER ) :,\
411
	EXP lvalue : LIST(IDENTIFIER) :,\
412
	EXP lvalue : ulong_type :,\
412
	EXP lvalue : ulong_type :,\
413
	EXP lvalue : PTR ( MEMBER ) :,\
413
	EXP lvalue : PTR(MEMBER) :,\
414
	EXP : NAMESPACE :\
414
	EXP : NAMESPACE :\
415
    ) STATEMENT DESTROY_nspace_named_etc #
415
    ) STATEMENT DESTROY_nspace_named_etc #
416
#pragma interface DESTROY_nspace_named_etc
416
#pragma interface DESTROY_nspace_named_etc
417
 
417
 
418
 
418
 
419
/* Operations for field named of union NAMESPACE */
419
/* Operations for field named of union NAMESPACE */
420
 
420
 
421
#pragma token EXP const : unsigned : nspace_named_tag #
421
#pragma token EXP const : unsigned : nspace_named_tag #
422
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_named #
422
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_named #
423
#pragma interface nspace_named_tag IS_nspace_named
423
#pragma interface nspace_named_tag IS_nspace_named
424
 
424
 
425
#pragma token PROC ( EXP : NAMESPACE : )\
425
#pragma token PROC(EXP : NAMESPACE :)\
426
    EXP : PTR ( MEMBER ) : nspace_named_first #
426
    EXP : PTR(MEMBER) : nspace_named_first #
427
#pragma interface nspace_named_first
427
#pragma interface nspace_named_first
428
 
428
 
429
#pragma token PROC ( EXP : NAMESPACE : )\
429
#pragma token PROC(EXP : NAMESPACE :)\
430
    EXP : PTR ( LIST ( IDENTIFIER ) ) : nspace_named_extra #
430
    EXP : PTR(LIST(IDENTIFIER)) : nspace_named_extra #
431
#pragma interface nspace_named_extra
431
#pragma interface nspace_named_extra
432
 
432
 
433
#pragma token PROC ( EXP : NAMESPACE : )\
433
#pragma token PROC(EXP : NAMESPACE :)\
434
    EXP : PTR ( ulong_type ) : nspace_named_size #
434
    EXP : PTR(ulong_type) : nspace_named_size #
435
#pragma interface nspace_named_size
435
#pragma interface nspace_named_size
436
 
436
 
437
#pragma token PROC ( EXP : NAMESPACE : )\
437
#pragma token PROC(EXP : NAMESPACE :)\
438
    EXP : PTR ( PTR ( MEMBER ) ) : nspace_named_table #
438
    EXP : PTR(PTR(MEMBER)) : nspace_named_table #
439
#pragma interface nspace_named_table
439
#pragma interface nspace_named_table
440
 
440
 
441
#pragma token PROC (\
441
#pragma token PROC(\
442
	EXP : IDENTIFIER :,\
442
	EXP : IDENTIFIER :,\
443
	EXP : NAMESPACE :,\
443
	EXP : NAMESPACE :,\
444
	EXP : ulong_type :,\
444
	EXP : ulong_type :,\
445
	EXP : PTR ( MEMBER ) :,\
445
	EXP : PTR(MEMBER) :,\
446
	EXP lvalue : NAMESPACE :\
446
	EXP lvalue : NAMESPACE :\
447
    ) STATEMENT MAKE_nspace_named #
447
    ) STATEMENT MAKE_nspace_named #
448
#pragma interface MAKE_nspace_named
448
#pragma interface MAKE_nspace_named
449
 
449
 
450
#pragma token PROC (\
450
#pragma token PROC(\
451
	EXP lvalue : IDENTIFIER :,\
451
	EXP lvalue : IDENTIFIER :,\
452
	EXP lvalue : MEMBER :,\
452
	EXP lvalue : MEMBER :,\
453
	EXP lvalue : MEMBER :,\
453
	EXP lvalue : MEMBER :,\
454
	EXP lvalue : NAMESPACE :,\
454
	EXP lvalue : NAMESPACE :,\
455
	EXP lvalue : LIST ( NAMESPACE ) :,\
455
	EXP lvalue : LIST(NAMESPACE) :,\
456
	EXP lvalue : LIST ( NAMESPACE ) :,\
456
	EXP lvalue : LIST(NAMESPACE) :,\
457
	EXP lvalue : STACK ( IDENTIFIER ) :,\
457
	EXP lvalue : STACK(IDENTIFIER) :,\
458
	EXP lvalue : ulong_type :,\
458
	EXP lvalue : ulong_type :,\
459
	EXP lvalue : MEMBER :,\
459
	EXP lvalue : MEMBER :,\
460
	EXP lvalue : LIST ( IDENTIFIER ) :,\
460
	EXP lvalue : LIST(IDENTIFIER) :,\
461
	EXP lvalue : ulong_type :,\
461
	EXP lvalue : ulong_type :,\
462
	EXP lvalue : PTR ( MEMBER ) :,\
462
	EXP lvalue : PTR(MEMBER) :,\
463
	EXP : NAMESPACE :\
463
	EXP : NAMESPACE :\
464
    ) STATEMENT DECONS_nspace_named #
464
    ) STATEMENT DECONS_nspace_named #
465
#pragma interface DECONS_nspace_named
465
#pragma interface DECONS_nspace_named
466
 
466
 
467
#pragma token PROC (\
467
#pragma token PROC(\
468
	EXP : DESTROYER :,\
468
	EXP : DESTROYER :,\
469
	EXP lvalue : IDENTIFIER :,\
469
	EXP lvalue : IDENTIFIER :,\
470
	EXP lvalue : MEMBER :,\
470
	EXP lvalue : MEMBER :,\
471
	EXP lvalue : MEMBER :,\
471
	EXP lvalue : MEMBER :,\
472
	EXP lvalue : NAMESPACE :,\
472
	EXP lvalue : NAMESPACE :,\
473
	EXP lvalue : LIST ( NAMESPACE ) :,\
473
	EXP lvalue : LIST(NAMESPACE) :,\
474
	EXP lvalue : LIST ( NAMESPACE ) :,\
474
	EXP lvalue : LIST(NAMESPACE) :,\
475
	EXP lvalue : STACK ( IDENTIFIER ) :,\
475
	EXP lvalue : STACK(IDENTIFIER) :,\
476
	EXP lvalue : ulong_type :,\
476
	EXP lvalue : ulong_type :,\
477
	EXP lvalue : MEMBER :,\
477
	EXP lvalue : MEMBER :,\
478
	EXP lvalue : LIST ( IDENTIFIER ) :,\
478
	EXP lvalue : LIST(IDENTIFIER) :,\
479
	EXP lvalue : ulong_type :,\
479
	EXP lvalue : ulong_type :,\
480
	EXP lvalue : PTR ( MEMBER ) :,\
480
	EXP lvalue : PTR(MEMBER) :,\
481
	EXP : NAMESPACE :\
481
	EXP : NAMESPACE :\
482
    ) STATEMENT DESTROY_nspace_named #
482
    ) STATEMENT DESTROY_nspace_named #
483
#pragma interface DESTROY_nspace_named
483
#pragma interface DESTROY_nspace_named
484
 
484
 
485
 
485
 
486
/* Operations for field unnamed of union NAMESPACE */
486
/* Operations for field unnamed of union NAMESPACE */
487
 
487
 
488
#pragma token EXP const : unsigned : nspace_unnamed_tag #
488
#pragma token EXP const : unsigned : nspace_unnamed_tag #
489
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_unnamed #
489
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_unnamed #
490
#pragma interface nspace_unnamed_tag IS_nspace_unnamed
490
#pragma interface nspace_unnamed_tag IS_nspace_unnamed
491
 
491
 
492
#pragma token PROC ( EXP : NAMESPACE : )\
492
#pragma token PROC(EXP : NAMESPACE :)\
493
    EXP : PTR ( MEMBER ) : nspace_unnamed_first #
493
    EXP : PTR(MEMBER) : nspace_unnamed_first #
494
#pragma interface nspace_unnamed_first
494
#pragma interface nspace_unnamed_first
495
 
495
 
496
#pragma token PROC ( EXP : NAMESPACE : )\
496
#pragma token PROC(EXP : NAMESPACE :)\
497
    EXP : PTR ( LIST ( IDENTIFIER ) ) : nspace_unnamed_extra #
497
    EXP : PTR(LIST(IDENTIFIER)) : nspace_unnamed_extra #
498
#pragma interface nspace_unnamed_extra
498
#pragma interface nspace_unnamed_extra
499
 
499
 
500
#pragma token PROC ( EXP : NAMESPACE : )\
500
#pragma token PROC(EXP : NAMESPACE :)\
501
    EXP : PTR ( ulong_type ) : nspace_unnamed_size #
501
    EXP : PTR(ulong_type) : nspace_unnamed_size #
502
#pragma interface nspace_unnamed_size
502
#pragma interface nspace_unnamed_size
503
 
503
 
504
#pragma token PROC ( EXP : NAMESPACE : )\
504
#pragma token PROC(EXP : NAMESPACE :)\
505
    EXP : PTR ( PTR ( MEMBER ) ) : nspace_unnamed_table #
505
    EXP : PTR(PTR(MEMBER)) : nspace_unnamed_table #
506
#pragma interface nspace_unnamed_table
506
#pragma interface nspace_unnamed_table
507
 
507
 
508
#pragma token PROC (\
508
#pragma token PROC(\
509
	EXP : IDENTIFIER :,\
509
	EXP : IDENTIFIER :,\
510
	EXP : NAMESPACE :,\
510
	EXP : NAMESPACE :,\
511
	EXP : ulong_type :,\
511
	EXP : ulong_type :,\
512
	EXP : PTR ( MEMBER ) :,\
512
	EXP : PTR(MEMBER) :,\
513
	EXP lvalue : NAMESPACE :\
513
	EXP lvalue : NAMESPACE :\
514
    ) STATEMENT MAKE_nspace_unnamed #
514
    ) STATEMENT MAKE_nspace_unnamed #
515
#pragma interface MAKE_nspace_unnamed
515
#pragma interface MAKE_nspace_unnamed
516
 
516
 
517
#pragma token PROC (\
517
#pragma token PROC(\
518
	EXP lvalue : IDENTIFIER :,\
518
	EXP lvalue : IDENTIFIER :,\
519
	EXP lvalue : MEMBER :,\
519
	EXP lvalue : MEMBER :,\
520
	EXP lvalue : MEMBER :,\
520
	EXP lvalue : MEMBER :,\
521
	EXP lvalue : NAMESPACE :,\
521
	EXP lvalue : NAMESPACE :,\
522
	EXP lvalue : LIST ( NAMESPACE ) :,\
522
	EXP lvalue : LIST(NAMESPACE) :,\
523
	EXP lvalue : LIST ( NAMESPACE ) :,\
523
	EXP lvalue : LIST(NAMESPACE) :,\
524
	EXP lvalue : STACK ( IDENTIFIER ) :,\
524
	EXP lvalue : STACK(IDENTIFIER) :,\
525
	EXP lvalue : ulong_type :,\
525
	EXP lvalue : ulong_type :,\
526
	EXP lvalue : MEMBER :,\
526
	EXP lvalue : MEMBER :,\
527
	EXP lvalue : LIST ( IDENTIFIER ) :,\
527
	EXP lvalue : LIST(IDENTIFIER) :,\
528
	EXP lvalue : ulong_type :,\
528
	EXP lvalue : ulong_type :,\
529
	EXP lvalue : PTR ( MEMBER ) :,\
529
	EXP lvalue : PTR(MEMBER) :,\
530
	EXP : NAMESPACE :\
530
	EXP : NAMESPACE :\
531
    ) STATEMENT DECONS_nspace_unnamed #
531
    ) STATEMENT DECONS_nspace_unnamed #
532
#pragma interface DECONS_nspace_unnamed
532
#pragma interface DECONS_nspace_unnamed
533
 
533
 
534
#pragma token PROC (\
534
#pragma token PROC(\
535
	EXP : DESTROYER :,\
535
	EXP : DESTROYER :,\
536
	EXP lvalue : IDENTIFIER :,\
536
	EXP lvalue : IDENTIFIER :,\
537
	EXP lvalue : MEMBER :,\
537
	EXP lvalue : MEMBER :,\
538
	EXP lvalue : MEMBER :,\
538
	EXP lvalue : MEMBER :,\
539
	EXP lvalue : NAMESPACE :,\
539
	EXP lvalue : NAMESPACE :,\
540
	EXP lvalue : LIST ( NAMESPACE ) :,\
540
	EXP lvalue : LIST(NAMESPACE) :,\
541
	EXP lvalue : LIST ( NAMESPACE ) :,\
541
	EXP lvalue : LIST(NAMESPACE) :,\
542
	EXP lvalue : STACK ( IDENTIFIER ) :,\
542
	EXP lvalue : STACK(IDENTIFIER) :,\
543
	EXP lvalue : ulong_type :,\
543
	EXP lvalue : ulong_type :,\
544
	EXP lvalue : MEMBER :,\
544
	EXP lvalue : MEMBER :,\
545
	EXP lvalue : LIST ( IDENTIFIER ) :,\
545
	EXP lvalue : LIST(IDENTIFIER) :,\
546
	EXP lvalue : ulong_type :,\
546
	EXP lvalue : ulong_type :,\
547
	EXP lvalue : PTR ( MEMBER ) :,\
547
	EXP lvalue : PTR(MEMBER) :,\
548
	EXP : NAMESPACE :\
548
	EXP : NAMESPACE :\
549
    ) STATEMENT DESTROY_nspace_unnamed #
549
    ) STATEMENT DESTROY_nspace_unnamed #
550
#pragma interface DESTROY_nspace_unnamed
550
#pragma interface DESTROY_nspace_unnamed
551
 
551
 
552
 
552
 
553
/* Operations for field global of union NAMESPACE */
553
/* Operations for field global of union NAMESPACE */
554
 
554
 
555
#pragma token EXP const : unsigned : nspace_global_tag #
555
#pragma token EXP const : unsigned : nspace_global_tag #
556
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_global #
556
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_global #
557
#pragma interface nspace_global_tag IS_nspace_global
557
#pragma interface nspace_global_tag IS_nspace_global
558
 
558
 
559
#pragma token PROC ( EXP : NAMESPACE : )\
559
#pragma token PROC(EXP : NAMESPACE :)\
560
    EXP : PTR ( MEMBER ) : nspace_global_first #
560
    EXP : PTR(MEMBER) : nspace_global_first #
561
#pragma interface nspace_global_first
561
#pragma interface nspace_global_first
562
 
562
 
563
#pragma token PROC ( EXP : NAMESPACE : )\
563
#pragma token PROC(EXP : NAMESPACE :)\
564
    EXP : PTR ( LIST ( IDENTIFIER ) ) : nspace_global_extra #
564
    EXP : PTR(LIST(IDENTIFIER)) : nspace_global_extra #
565
#pragma interface nspace_global_extra
565
#pragma interface nspace_global_extra
566
 
566
 
567
#pragma token PROC ( EXP : NAMESPACE : )\
567
#pragma token PROC(EXP : NAMESPACE :)\
568
    EXP : PTR ( ulong_type ) : nspace_global_size #
568
    EXP : PTR(ulong_type) : nspace_global_size #
569
#pragma interface nspace_global_size
569
#pragma interface nspace_global_size
570
 
570
 
571
#pragma token PROC ( EXP : NAMESPACE : )\
571
#pragma token PROC(EXP : NAMESPACE :)\
572
    EXP : PTR ( PTR ( MEMBER ) ) : nspace_global_table #
572
    EXP : PTR(PTR(MEMBER)) : nspace_global_table #
573
#pragma interface nspace_global_table
573
#pragma interface nspace_global_table
574
 
574
 
575
#pragma token PROC (\
575
#pragma token PROC(\
576
	EXP : IDENTIFIER :,\
576
	EXP : IDENTIFIER :,\
577
	EXP : NAMESPACE :,\
577
	EXP : NAMESPACE :,\
578
	EXP : ulong_type :,\
578
	EXP : ulong_type :,\
579
	EXP : PTR ( MEMBER ) :,\
579
	EXP : PTR(MEMBER) :,\
580
	EXP lvalue : NAMESPACE :\
580
	EXP lvalue : NAMESPACE :\
581
    ) STATEMENT MAKE_nspace_global #
581
    ) STATEMENT MAKE_nspace_global #
582
#pragma interface MAKE_nspace_global
582
#pragma interface MAKE_nspace_global
583
 
583
 
584
#pragma token PROC (\
584
#pragma token PROC(\
585
	EXP lvalue : IDENTIFIER :,\
585
	EXP lvalue : IDENTIFIER :,\
586
	EXP lvalue : MEMBER :,\
586
	EXP lvalue : MEMBER :,\
587
	EXP lvalue : MEMBER :,\
587
	EXP lvalue : MEMBER :,\
588
	EXP lvalue : NAMESPACE :,\
588
	EXP lvalue : NAMESPACE :,\
589
	EXP lvalue : LIST ( NAMESPACE ) :,\
589
	EXP lvalue : LIST(NAMESPACE) :,\
590
	EXP lvalue : LIST ( NAMESPACE ) :,\
590
	EXP lvalue : LIST(NAMESPACE) :,\
591
	EXP lvalue : STACK ( IDENTIFIER ) :,\
591
	EXP lvalue : STACK(IDENTIFIER) :,\
592
	EXP lvalue : ulong_type :,\
592
	EXP lvalue : ulong_type :,\
593
	EXP lvalue : MEMBER :,\
593
	EXP lvalue : MEMBER :,\
594
	EXP lvalue : LIST ( IDENTIFIER ) :,\
594
	EXP lvalue : LIST(IDENTIFIER) :,\
595
	EXP lvalue : ulong_type :,\
595
	EXP lvalue : ulong_type :,\
596
	EXP lvalue : PTR ( MEMBER ) :,\
596
	EXP lvalue : PTR(MEMBER) :,\
597
	EXP : NAMESPACE :\
597
	EXP : NAMESPACE :\
598
    ) STATEMENT DECONS_nspace_global #
598
    ) STATEMENT DECONS_nspace_global #
599
#pragma interface DECONS_nspace_global
599
#pragma interface DECONS_nspace_global
600
 
600
 
601
#pragma token PROC (\
601
#pragma token PROC(\
602
	EXP : DESTROYER :,\
602
	EXP : DESTROYER :,\
603
	EXP lvalue : IDENTIFIER :,\
603
	EXP lvalue : IDENTIFIER :,\
604
	EXP lvalue : MEMBER :,\
604
	EXP lvalue : MEMBER :,\
605
	EXP lvalue : MEMBER :,\
605
	EXP lvalue : MEMBER :,\
606
	EXP lvalue : NAMESPACE :,\
606
	EXP lvalue : NAMESPACE :,\
607
	EXP lvalue : LIST ( NAMESPACE ) :,\
607
	EXP lvalue : LIST(NAMESPACE) :,\
608
	EXP lvalue : LIST ( NAMESPACE ) :,\
608
	EXP lvalue : LIST(NAMESPACE) :,\
609
	EXP lvalue : STACK ( IDENTIFIER ) :,\
609
	EXP lvalue : STACK(IDENTIFIER) :,\
610
	EXP lvalue : ulong_type :,\
610
	EXP lvalue : ulong_type :,\
611
	EXP lvalue : MEMBER :,\
611
	EXP lvalue : MEMBER :,\
612
	EXP lvalue : LIST ( IDENTIFIER ) :,\
612
	EXP lvalue : LIST(IDENTIFIER) :,\
613
	EXP lvalue : ulong_type :,\
613
	EXP lvalue : ulong_type :,\
614
	EXP lvalue : PTR ( MEMBER ) :,\
614
	EXP lvalue : PTR(MEMBER) :,\
615
	EXP : NAMESPACE :\
615
	EXP : NAMESPACE :\
616
    ) STATEMENT DESTROY_nspace_global #
616
    ) STATEMENT DESTROY_nspace_global #
617
#pragma interface DESTROY_nspace_global
617
#pragma interface DESTROY_nspace_global
618
 
618
 
619
 
619
 
620
/* Operations for field ctype of union NAMESPACE */
620
/* Operations for field ctype of union NAMESPACE */
621
 
621
 
622
#pragma token EXP const : unsigned : nspace_ctype_tag #
622
#pragma token EXP const : unsigned : nspace_ctype_tag #
623
#pragma token PROC ( EXP : NAMESPACE : ) EXP : int : IS_nspace_ctype #
623
#pragma token PROC(EXP : NAMESPACE :) EXP : int : IS_nspace_ctype #
624
#pragma interface nspace_ctype_tag IS_nspace_ctype
624
#pragma interface nspace_ctype_tag IS_nspace_ctype
625
 
625
 
626
#pragma token PROC ( EXP : NAMESPACE : )\
626
#pragma token PROC(EXP : NAMESPACE :)\
627
    EXP : PTR ( MEMBER ) : nspace_ctype_first #
627
    EXP : PTR(MEMBER) : nspace_ctype_first #
628
#pragma interface nspace_ctype_first
628
#pragma interface nspace_ctype_first
629
 
629
 
630
#pragma token PROC ( EXP : NAMESPACE : )\
630
#pragma token PROC(EXP : NAMESPACE :)\
631
    EXP : PTR ( LIST ( IDENTIFIER ) ) : nspace_ctype_extra #
631
    EXP : PTR(LIST(IDENTIFIER)) : nspace_ctype_extra #
632
#pragma interface nspace_ctype_extra
632
#pragma interface nspace_ctype_extra
633
 
633
 
634
#pragma token PROC ( EXP : NAMESPACE : )\
634
#pragma token PROC(EXP : NAMESPACE :)\
635
    EXP : PTR ( ulong_type ) : nspace_ctype_size #
635
    EXP : PTR(ulong_type) : nspace_ctype_size #
636
#pragma interface nspace_ctype_size
636
#pragma interface nspace_ctype_size
637
 
637
 
638
#pragma token PROC ( EXP : NAMESPACE : )\
638
#pragma token PROC(EXP : NAMESPACE :)\
639
    EXP : PTR ( PTR ( MEMBER ) ) : nspace_ctype_table #
639
    EXP : PTR(PTR(MEMBER)) : nspace_ctype_table #
640
#pragma interface nspace_ctype_table
640
#pragma interface nspace_ctype_table
641
 
641
 
642
#pragma token PROC (\
642
#pragma token PROC(\
643
	EXP : IDENTIFIER :,\
643
	EXP : IDENTIFIER :,\
644
	EXP : NAMESPACE :,\
644
	EXP : NAMESPACE :,\
645
	EXP : ulong_type :,\
645
	EXP : ulong_type :,\
646
	EXP : PTR ( MEMBER ) :,\
646
	EXP : PTR(MEMBER) :,\
647
	EXP lvalue : NAMESPACE :\
647
	EXP lvalue : NAMESPACE :\
648
    ) STATEMENT MAKE_nspace_ctype #
648
    ) STATEMENT MAKE_nspace_ctype #
649
#pragma interface MAKE_nspace_ctype
649
#pragma interface MAKE_nspace_ctype
650
 
650
 
651
#pragma token PROC (\
651
#pragma token PROC(\
652
	EXP lvalue : IDENTIFIER :,\
652
	EXP lvalue : IDENTIFIER :,\
653
	EXP lvalue : MEMBER :,\
653
	EXP lvalue : MEMBER :,\
654
	EXP lvalue : MEMBER :,\
654
	EXP lvalue : MEMBER :,\
655
	EXP lvalue : NAMESPACE :,\
655
	EXP lvalue : NAMESPACE :,\
656
	EXP lvalue : LIST ( NAMESPACE ) :,\
656
	EXP lvalue : LIST(NAMESPACE) :,\
657
	EXP lvalue : LIST ( NAMESPACE ) :,\
657
	EXP lvalue : LIST(NAMESPACE) :,\
658
	EXP lvalue : STACK ( IDENTIFIER ) :,\
658
	EXP lvalue : STACK(IDENTIFIER) :,\
659
	EXP lvalue : ulong_type :,\
659
	EXP lvalue : ulong_type :,\
660
	EXP lvalue : MEMBER :,\
660
	EXP lvalue : MEMBER :,\
661
	EXP lvalue : LIST ( IDENTIFIER ) :,\
661
	EXP lvalue : LIST(IDENTIFIER) :,\
662
	EXP lvalue : ulong_type :,\
662
	EXP lvalue : ulong_type :,\
663
	EXP lvalue : PTR ( MEMBER ) :,\
663
	EXP lvalue : PTR(MEMBER) :,\
664
	EXP : NAMESPACE :\
664
	EXP : NAMESPACE :\
665
    ) STATEMENT DECONS_nspace_ctype #
665
    ) STATEMENT DECONS_nspace_ctype #
666
#pragma interface DECONS_nspace_ctype
666
#pragma interface DECONS_nspace_ctype
667
 
667
 
668
#pragma token PROC (\
668
#pragma token PROC(\
669
	EXP : DESTROYER :,\
669
	EXP : DESTROYER :,\
670
	EXP lvalue : IDENTIFIER :,\
670
	EXP lvalue : IDENTIFIER :,\
671
	EXP lvalue : MEMBER :,\
671
	EXP lvalue : MEMBER :,\
672
	EXP lvalue : MEMBER :,\
672
	EXP lvalue : MEMBER :,\
673
	EXP lvalue : NAMESPACE :,\
673
	EXP lvalue : NAMESPACE :,\
674
	EXP lvalue : LIST ( NAMESPACE ) :,\
674
	EXP lvalue : LIST(NAMESPACE) :,\
675
	EXP lvalue : LIST ( NAMESPACE ) :,\
675
	EXP lvalue : LIST(NAMESPACE) :,\
676
	EXP lvalue : STACK ( IDENTIFIER ) :,\
676
	EXP lvalue : STACK(IDENTIFIER) :,\
677
	EXP lvalue : ulong_type :,\
677
	EXP lvalue : ulong_type :,\
678
	EXP lvalue : MEMBER :,\
678
	EXP lvalue : MEMBER :,\
679
	EXP lvalue : LIST ( IDENTIFIER ) :,\
679
	EXP lvalue : LIST(IDENTIFIER) :,\
680
	EXP lvalue : ulong_type :,\
680
	EXP lvalue : ulong_type :,\
681
	EXP lvalue : PTR ( MEMBER ) :,\
681
	EXP lvalue : PTR(MEMBER) :,\
682
	EXP : NAMESPACE :\
682
	EXP : NAMESPACE :\
683
    ) STATEMENT DESTROY_nspace_ctype #
683
    ) STATEMENT DESTROY_nspace_ctype #
684
#pragma interface DESTROY_nspace_ctype
684
#pragma interface DESTROY_nspace_ctype
685
 
685
 
686
 
686