Mercurial > hg > CbC > CbC_gcc
comparison gcc/ada/atree.h @ 111:04ced10e8804
gcc 7
author | kono |
---|---|
date | Fri, 27 Oct 2017 22:46:09 +0900 |
parents | |
children | 84e7813d76e9 |
comparison
equal
deleted
inserted
replaced
68:561a7518be6b | 111:04ced10e8804 |
---|---|
1 /**************************************************************************** | |
2 * * | |
3 * GNAT COMPILER COMPONENTS * | |
4 * * | |
5 * A T R E E * | |
6 * * | |
7 * C Header File * | |
8 * * | |
9 * Copyright (C) 1992-2017, Free Software Foundation, Inc. * | |
10 * * | |
11 * GNAT is free software; you can redistribute it and/or modify it under * | |
12 * terms of the GNU General Public License as published by the Free Soft- * | |
13 * ware Foundation; either version 3, or (at your option) any later ver- * | |
14 * sion. GNAT is distributed in the hope that it will be useful, but WITH- * | |
15 * OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY * | |
16 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License * | |
17 * for more details. You should have received a copy of the GNU General * | |
18 * Public License distributed with GNAT; see file COPYING3. If not, go to * | |
19 * http://www.gnu.org/licenses for a complete copy of the license. * | |
20 * * | |
21 * GNAT was originally developed by the GNAT team at New York University. * | |
22 * Extensive contributions were provided by Ada Core Technologies Inc. * | |
23 * * | |
24 ****************************************************************************/ | |
25 | |
26 /* This is the C header corresponding to the Ada package specification for | |
27 Atree. It also contains the implementations of inlined functions from the | |
28 package body for Atree. It was generated manually from atree.ads and | |
29 atree.adb and must be kept synchronized with changes in these files. | |
30 | |
31 Note that only routines for reading the tree are included, since the tree | |
32 transformer is not supposed to modify the tree in any way. */ | |
33 | |
34 #ifdef __cplusplus | |
35 extern "C" { | |
36 #endif | |
37 | |
38 /* Structure used for the first part of the node in the case where we have | |
39 an Nkind. */ | |
40 | |
41 struct NFK | |
42 { | |
43 Boolean is_extension : 1; | |
44 Boolean pflag1 : 1; | |
45 Boolean pflag2 : 1; | |
46 Boolean in_list : 1; | |
47 Boolean has_aspects : 1; | |
48 Boolean rewrite_ins : 1; | |
49 Boolean analyzed : 1; | |
50 Boolean c_f_s : 1; | |
51 Boolean error_posted : 1; | |
52 | |
53 Boolean flag4 : 1; | |
54 Boolean flag5 : 1; | |
55 Boolean flag6 : 1; | |
56 Boolean flag7 : 1; | |
57 Boolean flag8 : 1; | |
58 Boolean flag9 : 1; | |
59 Boolean flag10 : 1; | |
60 | |
61 Boolean flag11 : 1; | |
62 Boolean flag12 : 1; | |
63 Boolean flag13 : 1; | |
64 Boolean flag14 : 1; | |
65 Boolean flag15 : 1; | |
66 Boolean flag16 : 1; | |
67 Boolean flag17 : 1; | |
68 Boolean flag18 : 1; | |
69 | |
70 unsigned char kind; | |
71 }; | |
72 | |
73 /* Structure for the first part of a node when Nkind is not present by | |
74 extra flag bits are. */ | |
75 | |
76 struct NFNK | |
77 { | |
78 Boolean is_extension : 1; | |
79 Boolean pflag1 : 1; | |
80 Boolean pflag2 : 1; | |
81 Boolean in_list : 1; | |
82 Boolean has_aspects : 1; | |
83 Boolean rewrite_ins : 1; | |
84 Boolean analyzed : 1; | |
85 Boolean c_f_s : 1; | |
86 Boolean error_posted : 1; | |
87 | |
88 Boolean flag4 : 1; | |
89 Boolean flag5 : 1; | |
90 Boolean flag6 : 1; | |
91 Boolean flag7 : 1; | |
92 Boolean flag8 : 1; | |
93 Boolean flag9 : 1; | |
94 Boolean flag10 : 1; | |
95 | |
96 Boolean flag11 : 1; | |
97 Boolean flag12 : 1; | |
98 Boolean flag13 : 1; | |
99 Boolean flag14 : 1; | |
100 Boolean flag15 : 1; | |
101 Boolean flag16 : 1; | |
102 Boolean flag17 : 1; | |
103 Boolean flag18 : 1; | |
104 | |
105 Boolean flag65 : 1; | |
106 Boolean flag66 : 1; | |
107 Boolean flag67 : 1; | |
108 Boolean flag68 : 1; | |
109 Boolean flag69 : 1; | |
110 Boolean flag70 : 1; | |
111 Boolean flag71 : 1; | |
112 Boolean flag72 : 1; | |
113 }; | |
114 | |
115 /* Structure used for extra flags in third component overlaying Field12 */ | |
116 struct Flag_Word | |
117 { | |
118 Boolean flag73 : 1; | |
119 Boolean flag74 : 1; | |
120 Boolean flag75 : 1; | |
121 Boolean flag76 : 1; | |
122 Boolean flag77 : 1; | |
123 Boolean flag78 : 1; | |
124 Boolean flag79 : 1; | |
125 Boolean flag80 : 1; | |
126 Boolean flag81 : 1; | |
127 Boolean flag82 : 1; | |
128 Boolean flag83 : 1; | |
129 Boolean flag84 : 1; | |
130 Boolean flag85 : 1; | |
131 Boolean flag86 : 1; | |
132 Boolean flag87 : 1; | |
133 Boolean flag88 : 1; | |
134 Boolean flag89 : 1; | |
135 Boolean flag90 : 1; | |
136 Boolean flag91 : 1; | |
137 Boolean flag92 : 1; | |
138 Boolean flag93 : 1; | |
139 Boolean flag94 : 1; | |
140 Boolean flag95 : 1; | |
141 Boolean flag96 : 1; | |
142 Byte convention : 8; | |
143 }; | |
144 | |
145 /* Structure used for extra flags in fourth component overlaying Field12 */ | |
146 struct Flag_Word2 | |
147 { | |
148 Boolean flag97 : 1; | |
149 Boolean flag98 : 1; | |
150 Boolean flag99 : 1; | |
151 Boolean flag100 : 1; | |
152 Boolean flag101 : 1; | |
153 Boolean flag102 : 1; | |
154 Boolean flag103 : 1; | |
155 Boolean flag104 : 1; | |
156 Boolean flag105 : 1; | |
157 Boolean flag106 : 1; | |
158 Boolean flag107 : 1; | |
159 Boolean flag108 : 1; | |
160 Boolean flag109 : 1; | |
161 Boolean flag110 : 1; | |
162 Boolean flag111 : 1; | |
163 Boolean flag112 : 1; | |
164 Boolean flag113 : 1; | |
165 Boolean flag114 : 1; | |
166 Boolean flag115 : 1; | |
167 Boolean flag116 : 1; | |
168 Boolean flag117 : 1; | |
169 Boolean flag118 : 1; | |
170 Boolean flag119 : 1; | |
171 Boolean flag120 : 1; | |
172 Boolean flag121 : 1; | |
173 Boolean flag122 : 1; | |
174 Boolean flag123 : 1; | |
175 Boolean flag124 : 1; | |
176 Boolean flag125 : 1; | |
177 Boolean flag126 : 1; | |
178 Boolean flag127 : 1; | |
179 Boolean flag128 : 1; | |
180 }; | |
181 | |
182 /* Structure used for extra flags in fourth component overlaying Field11 */ | |
183 struct Flag_Word3 | |
184 { | |
185 Boolean flag152 : 1; | |
186 Boolean flag153 : 1; | |
187 Boolean flag154 : 1; | |
188 Boolean flag155 : 1; | |
189 Boolean flag156 : 1; | |
190 Boolean flag157 : 1; | |
191 Boolean flag158 : 1; | |
192 Boolean flag159 : 1; | |
193 | |
194 Boolean flag160 : 1; | |
195 Boolean flag161 : 1; | |
196 Boolean flag162 : 1; | |
197 Boolean flag163 : 1; | |
198 Boolean flag164 : 1; | |
199 Boolean flag165 : 1; | |
200 Boolean flag166 : 1; | |
201 Boolean flag167 : 1; | |
202 | |
203 Boolean flag168 : 1; | |
204 Boolean flag169 : 1; | |
205 Boolean flag170 : 1; | |
206 Boolean flag171 : 1; | |
207 Boolean flag172 : 1; | |
208 Boolean flag173 : 1; | |
209 Boolean flag174 : 1; | |
210 Boolean flag175 : 1; | |
211 | |
212 Boolean flag176 : 1; | |
213 Boolean flag177 : 1; | |
214 Boolean flag178 : 1; | |
215 Boolean flag179 : 1; | |
216 Boolean flag180 : 1; | |
217 Boolean flag181 : 1; | |
218 Boolean flag182 : 1; | |
219 Boolean flag183 : 1; | |
220 }; | |
221 | |
222 /* Structure used for extra flags in fifth component overlaying Field12 */ | |
223 struct Flag_Word4 | |
224 { | |
225 Boolean flag184 : 1; | |
226 Boolean flag185 : 1; | |
227 Boolean flag186 : 1; | |
228 Boolean flag187 : 1; | |
229 Boolean flag188 : 1; | |
230 Boolean flag189 : 1; | |
231 Boolean flag190 : 1; | |
232 Boolean flag191 : 1; | |
233 | |
234 Boolean flag192 : 1; | |
235 Boolean flag193 : 1; | |
236 Boolean flag194 : 1; | |
237 Boolean flag195 : 1; | |
238 Boolean flag196 : 1; | |
239 Boolean flag197 : 1; | |
240 Boolean flag198 : 1; | |
241 Boolean flag199 : 1; | |
242 | |
243 Boolean flag200 : 1; | |
244 Boolean flag201 : 1; | |
245 Boolean flag202 : 1; | |
246 Boolean flag203 : 1; | |
247 Boolean flag204 : 1; | |
248 Boolean flag205 : 1; | |
249 Boolean flag206 : 1; | |
250 Boolean flag207 : 1; | |
251 | |
252 Boolean flag208 : 1; | |
253 Boolean flag209 : 1; | |
254 Boolean flag210 : 1; | |
255 Boolean flag211 : 1; | |
256 Boolean flag212 : 1; | |
257 Boolean flag213 : 1; | |
258 Boolean flag214 : 1; | |
259 Boolean flag215 : 1; | |
260 }; | |
261 | |
262 /* Structure used for extra flags in sixth component overlaying Field12 */ | |
263 struct Flag_Word5 | |
264 { | |
265 Boolean flag255 : 1; | |
266 Boolean flag256 : 1; | |
267 Boolean flag257 : 1; | |
268 Boolean flag258 : 1; | |
269 Boolean flag259 : 1; | |
270 Boolean flag260 : 1; | |
271 Boolean flag261 : 1; | |
272 Boolean flag262 : 1; | |
273 | |
274 Boolean flag263 : 1; | |
275 Boolean flag264 : 1; | |
276 Boolean flag265 : 1; | |
277 Boolean flag266 : 1; | |
278 Boolean flag267 : 1; | |
279 Boolean flag268 : 1; | |
280 Boolean flag269 : 1; | |
281 Boolean flag270 : 1; | |
282 | |
283 Boolean flag271 : 1; | |
284 Boolean flag272 : 1; | |
285 Boolean flag273 : 1; | |
286 Boolean flag274 : 1; | |
287 Boolean flag275 : 1; | |
288 Boolean flag276 : 1; | |
289 Boolean flag277 : 1; | |
290 Boolean flag278 : 1; | |
291 | |
292 Boolean flag279 : 1; | |
293 Boolean flag280 : 1; | |
294 Boolean flag281 : 1; | |
295 Boolean flag282 : 1; | |
296 Boolean flag283 : 1; | |
297 Boolean flag284 : 1; | |
298 Boolean flag285 : 1; | |
299 Boolean flag286 : 1; | |
300 }; | |
301 struct Non_Extended | |
302 { | |
303 Source_Ptr sloc; | |
304 Int link; | |
305 Int field1; | |
306 Int field2; | |
307 Int field3; | |
308 Int field4; | |
309 Int field5; | |
310 }; | |
311 | |
312 /* The Following structure corresponds to variant with is_extension = True. */ | |
313 struct Extended | |
314 { | |
315 Int field6; | |
316 Int field7; | |
317 Int field8; | |
318 Int field9; | |
319 Int field10; | |
320 union | |
321 { | |
322 Int field11; | |
323 struct Flag_Word3 fw3; | |
324 } X; | |
325 | |
326 union | |
327 { | |
328 Int field12; | |
329 struct Flag_Word fw; | |
330 struct Flag_Word2 fw2; | |
331 struct Flag_Word4 fw4; | |
332 struct Flag_Word5 fw5; | |
333 } U; | |
334 }; | |
335 | |
336 /* A tree node itself. */ | |
337 | |
338 struct Node | |
339 { | |
340 union kind | |
341 { | |
342 struct NFK K; | |
343 struct NFNK NK; | |
344 } U; | |
345 | |
346 union variant | |
347 { | |
348 struct Non_Extended NX; | |
349 struct Extended EX; | |
350 } V; | |
351 }; | |
352 | |
353 /* The actual tree is an array of nodes. The pointer to this array is passed | |
354 as a parameter to the tree transformer procedure and stored in the global | |
355 variable Nodes_Ptr after adjusting it by subtracting Node_First_Entry, so | |
356 that Node_Id values can be used as subscripts. */ | |
357 extern struct Node *Nodes_Ptr; | |
358 | |
359 #define Parent atree__parent | |
360 extern Node_Id Parent (Node_Id); | |
361 | |
362 #define Original_Node atree__original_node | |
363 extern Node_Id Original_Node (Node_Id); | |
364 | |
365 /* The auxiliary flags array which is allocated in parallel to Nodes */ | |
366 | |
367 struct Flags | |
368 { | |
369 Boolean Flag0 : 1; | |
370 Boolean Flag1 : 1; | |
371 Boolean Flag2 : 1; | |
372 Boolean Flag3 : 1; | |
373 Boolean Spare0 : 1; | |
374 Boolean Spare1 : 1; | |
375 Boolean Spare2 : 1; | |
376 Boolean Spare3 : 1; | |
377 }; | |
378 extern struct Flags *Flags_Ptr; | |
379 | |
380 /* Overloaded Functions: | |
381 | |
382 These functions are overloaded in the original Ada source, but there is | |
383 only one corresponding C function, which works as described below. */ | |
384 | |
385 /* Type used for union of Node_Id, List_Id, Elist_Id. */ | |
386 typedef Int Tree_Id; | |
387 | |
388 /* These two functions can only be used for Node_Id and List_Id values and | |
389 they work in the C version because Empty = No_List = 0. */ | |
390 | |
391 static Boolean No (Tree_Id); | |
392 static Boolean Present (Tree_Id); | |
393 | |
394 INLINE Boolean | |
395 No (Tree_Id N) | |
396 { | |
397 return N == Empty; | |
398 } | |
399 | |
400 INLINE Boolean | |
401 Present (Tree_Id N) | |
402 { | |
403 return N != Empty; | |
404 } | |
405 | |
406 extern Node_Id Parent (Tree_Id); | |
407 | |
408 #define Current_Error_Node atree__current_error_node | |
409 extern Node_Id Current_Error_Node; | |
410 | |
411 /* Node Access Functions: */ | |
412 | |
413 #define Nkind(N) ((Node_Kind) (Nodes_Ptr[(N) - First_Node_Id].U.K.kind)) | |
414 #define Ekind(N) ((Entity_Kind) (Nodes_Ptr[N + 1].U.K.kind)) | |
415 #define Sloc(N) (Nodes_Ptr[(N) - First_Node_Id].V.NX.sloc) | |
416 #define Paren_Count(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.pflag1 \ | |
417 + 2 * Nodes_Ptr[(N) - First_Node_Id].U.K.pflag2) | |
418 | |
419 #define Field1(N) (Nodes_Ptr[(N) - First_Node_Id].V.NX.field1) | |
420 #define Field2(N) (Nodes_Ptr[(N) - First_Node_Id].V.NX.field2) | |
421 #define Field3(N) (Nodes_Ptr[(N) - First_Node_Id].V.NX.field3) | |
422 #define Field4(N) (Nodes_Ptr[(N) - First_Node_Id].V.NX.field4) | |
423 #define Field5(N) (Nodes_Ptr[(N) - First_Node_Id].V.NX.field5) | |
424 #define Field6(N) (Nodes_Ptr[(N) - First_Node_Id + 1].V.EX.field6) | |
425 #define Field7(N) (Nodes_Ptr[(N) - First_Node_Id + 1].V.EX.field7) | |
426 #define Field8(N) (Nodes_Ptr[(N) - First_Node_Id + 1].V.EX.field8) | |
427 #define Field9(N) (Nodes_Ptr[(N) - First_Node_Id + 1].V.EX.field9) | |
428 #define Field10(N) (Nodes_Ptr[(N) - First_Node_Id + 1].V.EX.field10) | |
429 #define Field11(N) (Nodes_Ptr[(N) - First_Node_Id + 1].V.EX.X.field11) | |
430 #define Field12(N) (Nodes_Ptr[(N) - First_Node_Id + 1].V.EX.U.field12) | |
431 #define Field13(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.field6) | |
432 #define Field14(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.field7) | |
433 #define Field15(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.field8) | |
434 #define Field16(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.field9) | |
435 #define Field17(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.field10) | |
436 #define Field18(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.X.field11) | |
437 #define Field19(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.field6) | |
438 #define Field20(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.field7) | |
439 #define Field21(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.field8) | |
440 #define Field22(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.field9) | |
441 #define Field23(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.field10) | |
442 #define Field24(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.field6) | |
443 #define Field25(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.field7) | |
444 #define Field26(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.field8) | |
445 #define Field27(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.field9) | |
446 #define Field28(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.field10) | |
447 #define Field29(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.X.field11) | |
448 #define Field30(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.field6) | |
449 #define Field31(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.field7) | |
450 #define Field32(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.field8) | |
451 #define Field33(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.field9) | |
452 #define Field34(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.field10) | |
453 #define Field35(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.X.field11) | |
454 #define Field36(N) (Nodes_Ptr[(N) - First_Node_Id + 6].V.EX.field6) | |
455 #define Field37(N) (Nodes_Ptr[(N) - First_Node_Id + 6].V.EX.field7) | |
456 #define Field38(N) (Nodes_Ptr[(N) - First_Node_Id + 6].V.EX.field8) | |
457 #define Field39(N) (Nodes_Ptr[(N) - First_Node_Id + 6].V.EX.field9) | |
458 #define Field40(N) (Nodes_Ptr[(N) - First_Node_Id + 6].V.EX.field10) | |
459 #define Field41(N) (Nodes_Ptr[(N) - First_Node_Id + 6].V.EX.X.field11) | |
460 | |
461 #define Node1(N) Field1 (N) | |
462 #define Node2(N) Field2 (N) | |
463 #define Node3(N) Field3 (N) | |
464 #define Node4(N) Field4 (N) | |
465 #define Node5(N) Field5 (N) | |
466 #define Node6(N) Field6 (N) | |
467 #define Node7(N) Field7 (N) | |
468 #define Node8(N) Field8 (N) | |
469 #define Node9(N) Field9 (N) | |
470 #define Node10(N) Field10 (N) | |
471 #define Node11(N) Field11 (N) | |
472 #define Node12(N) Field12 (N) | |
473 #define Node13(N) Field13 (N) | |
474 #define Node14(N) Field14 (N) | |
475 #define Node15(N) Field15 (N) | |
476 #define Node16(N) Field16 (N) | |
477 #define Node17(N) Field17 (N) | |
478 #define Node18(N) Field18 (N) | |
479 #define Node19(N) Field19 (N) | |
480 #define Node20(N) Field20 (N) | |
481 #define Node21(N) Field21 (N) | |
482 #define Node22(N) Field22 (N) | |
483 #define Node23(N) Field23 (N) | |
484 #define Node24(N) Field24 (N) | |
485 #define Node25(N) Field25 (N) | |
486 #define Node26(N) Field26 (N) | |
487 #define Node27(N) Field27 (N) | |
488 #define Node28(N) Field28 (N) | |
489 #define Node29(N) Field29 (N) | |
490 #define Node30(N) Field30 (N) | |
491 #define Node31(N) Field31 (N) | |
492 #define Node32(N) Field32 (N) | |
493 #define Node33(N) Field33 (N) | |
494 #define Node34(N) Field34 (N) | |
495 #define Node35(N) Field35 (N) | |
496 #define Node36(N) Field36 (N) | |
497 #define Node37(N) Field37 (N) | |
498 #define Node38(N) Field38 (N) | |
499 #define Node39(N) Field39 (N) | |
500 #define Node40(N) Field40 (N) | |
501 #define Node41(N) Field41 (N) | |
502 | |
503 #define List1(N) Field1 (N) | |
504 #define List2(N) Field2 (N) | |
505 #define List3(N) Field3 (N) | |
506 #define List4(N) Field4 (N) | |
507 #define List5(N) Field5 (N) | |
508 #define List10(N) Field10 (N) | |
509 #define List14(N) Field14 (N) | |
510 #define List25(N) Field25 (N) | |
511 #define List38(N) Field38 (N) | |
512 #define List39(N) Field39 (N) | |
513 | |
514 #define Elist1(N) Field1 (N) | |
515 #define Elist2(N) Field2 (N) | |
516 #define Elist3(N) Field3 (N) | |
517 #define Elist4(N) Field4 (N) | |
518 #define Elist5(N) Field5 (N) | |
519 #define Elist8(N) Field8 (N) | |
520 #define Elist9(N) Field9 (N) | |
521 #define Elist10(N) Field10 (N) | |
522 #define Elist11(N) Field11 (N) | |
523 #define Elist13(N) Field13 (N) | |
524 #define Elist15(N) Field15 (N) | |
525 #define Elist16(N) Field16 (N) | |
526 #define Elist18(N) Field18 (N) | |
527 #define Elist21(N) Field21 (N) | |
528 #define Elist23(N) Field23 (N) | |
529 #define Elist24(N) Field24 (N) | |
530 #define Elist25(N) Field25 (N) | |
531 #define Elist26(N) Field26 (N) | |
532 #define Elist29(N) Field29 (N) | |
533 #define Elist36(N) Field36 (N) | |
534 | |
535 #define Name1(N) Field1 (N) | |
536 #define Name2(N) Field2 (N) | |
537 | |
538 #define Char_Code2(N) (Field2 (N) - Char_Code_Bias) | |
539 | |
540 #define Str3(N) Field3 (N) | |
541 | |
542 #define Uint2(N) ((Field2 (N) == 0) ? Uint_0 : Field2 (N)) | |
543 #define Uint3(N) ((Field3 (N) == 0) ? Uint_0 : Field3 (N)) | |
544 #define Uint4(N) ((Field4 (N) == 0) ? Uint_0 : Field4 (N)) | |
545 #define Uint5(N) ((Field5 (N) == 0) ? Uint_0 : Field5 (N)) | |
546 #define Uint8(N) ((Field8 (N) == 0) ? Uint_0 : Field8 (N)) | |
547 #define Uint9(N) ((Field9 (N) == 0) ? Uint_0 : Field9 (N)) | |
548 #define Uint10(N) ((Field10 (N) == 0) ? Uint_0 : Field10 (N)) | |
549 #define Uint11(N) ((Field11 (N) == 0) ? Uint_0 : Field11 (N)) | |
550 #define Uint12(N) ((Field12 (N) == 0) ? Uint_0 : Field12 (N)) | |
551 #define Uint13(N) ((Field13 (N) == 0) ? Uint_0 : Field13 (N)) | |
552 #define Uint14(N) ((Field14 (N) == 0) ? Uint_0 : Field14 (N)) | |
553 #define Uint15(N) ((Field15 (N) == 0) ? Uint_0 : Field15 (N)) | |
554 #define Uint16(N) ((Field16 (N) == 0) ? Uint_0 : Field16 (N)) | |
555 #define Uint17(N) ((Field17 (N) == 0) ? Uint_0 : Field17 (N)) | |
556 #define Uint22(N) ((Field22 (N) == 0) ? Uint_0 : Field22 (N)) | |
557 #define Uint24(N) ((Field24 (N) == 0) ? Uint_0 : Field24 (N)) | |
558 | |
559 #define Ureal3(N) Field3 (N) | |
560 #define Ureal18(N) Field18 (N) | |
561 #define Ureal21(N) Field21 (N) | |
562 | |
563 #define Analyzed(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.analyzed) | |
564 #define Comes_From_Source(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.c_f_s) | |
565 #define Error_Posted(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.error_posted) | |
566 #define Has_Aspects(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.has_aspects) | |
567 #define Convention(N) \ | |
568 (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.convention) | |
569 | |
570 #define Flag0(N) (Flags_Ptr[(N) - First_Node_Id].Flag0) | |
571 #define Flag1(N) (Flags_Ptr[(N) - First_Node_Id].Flag1) | |
572 #define Flag2(N) (Flags_Ptr[(N) - First_Node_Id].Flag2) | |
573 #define Flag3(N) (Flags_Ptr[(N) - First_Node_Id].Flag3) | |
574 | |
575 #define Flag4(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag4) | |
576 #define Flag5(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag5) | |
577 #define Flag6(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag6) | |
578 #define Flag7(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag7) | |
579 #define Flag8(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag8) | |
580 #define Flag9(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag9) | |
581 #define Flag10(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag10) | |
582 #define Flag11(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag11) | |
583 #define Flag12(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag12) | |
584 #define Flag13(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag13) | |
585 #define Flag14(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag14) | |
586 #define Flag15(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag15) | |
587 #define Flag16(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag16) | |
588 #define Flag17(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag17) | |
589 #define Flag18(N) (Nodes_Ptr[(N) - First_Node_Id].U.K.flag18) | |
590 | |
591 #define Flag19(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.in_list) | |
592 #define Flag20(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.has_aspects) | |
593 #define Flag21(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.rewrite_ins) | |
594 #define Flag22(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.analyzed) | |
595 #define Flag23(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.c_f_s) | |
596 #define Flag24(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.error_posted) | |
597 #define Flag25(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag4) | |
598 #define Flag26(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag5) | |
599 #define Flag27(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag6) | |
600 #define Flag28(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag7) | |
601 #define Flag29(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag8) | |
602 #define Flag30(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag9) | |
603 #define Flag31(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag10) | |
604 #define Flag32(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag11) | |
605 #define Flag33(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag12) | |
606 #define Flag34(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag13) | |
607 #define Flag35(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag14) | |
608 #define Flag36(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag15) | |
609 #define Flag37(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag16) | |
610 #define Flag38(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag17) | |
611 #define Flag39(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.flag18) | |
612 | |
613 #define Flag40(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.in_list) | |
614 #define Flag41(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.has_aspects) | |
615 #define Flag42(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.rewrite_ins) | |
616 #define Flag43(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.analyzed) | |
617 #define Flag44(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.c_f_s) | |
618 #define Flag45(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.error_posted) | |
619 #define Flag46(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag4) | |
620 #define Flag47(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag5) | |
621 #define Flag48(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag6) | |
622 #define Flag49(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag7) | |
623 #define Flag50(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag8) | |
624 #define Flag51(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag9) | |
625 #define Flag52(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag10) | |
626 #define Flag53(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag11) | |
627 #define Flag54(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag12) | |
628 #define Flag55(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag13) | |
629 #define Flag56(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag14) | |
630 #define Flag57(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag15) | |
631 #define Flag58(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag16) | |
632 #define Flag59(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag17) | |
633 #define Flag60(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.flag18) | |
634 #define Flag61(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.pflag1) | |
635 #define Flag62(N) (Nodes_Ptr[(N) - First_Node_Id + 1].U.K.pflag2) | |
636 #define Flag63(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.pflag1) | |
637 #define Flag64(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.K.pflag2) | |
638 | |
639 #define Flag65(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.NK.flag65) | |
640 #define Flag66(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.NK.flag66) | |
641 #define Flag67(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.NK.flag67) | |
642 #define Flag68(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.NK.flag68) | |
643 #define Flag69(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.NK.flag69) | |
644 #define Flag70(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.NK.flag70) | |
645 #define Flag71(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.NK.flag71) | |
646 #define Flag72(N) (Nodes_Ptr[(N) - First_Node_Id + 2].U.NK.flag72) | |
647 | |
648 #define Flag73(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag73) | |
649 #define Flag74(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag74) | |
650 #define Flag75(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag75) | |
651 #define Flag76(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag76) | |
652 #define Flag77(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag77) | |
653 #define Flag78(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag78) | |
654 #define Flag79(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag79) | |
655 #define Flag80(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag80) | |
656 #define Flag81(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag81) | |
657 #define Flag82(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag82) | |
658 #define Flag83(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag83) | |
659 #define Flag84(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag84) | |
660 #define Flag85(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag85) | |
661 #define Flag86(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag86) | |
662 #define Flag87(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag87) | |
663 #define Flag88(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag88) | |
664 #define Flag89(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag89) | |
665 #define Flag90(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag90) | |
666 #define Flag91(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag91) | |
667 #define Flag92(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag92) | |
668 #define Flag93(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag93) | |
669 #define Flag94(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag94) | |
670 #define Flag95(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag95) | |
671 #define Flag96(N) (Nodes_Ptr[(N) - First_Node_Id + 2].V.EX.U.fw.flag96) | |
672 #define Flag97(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag97) | |
673 #define Flag98(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag98) | |
674 #define Flag99(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag99) | |
675 #define Flag100(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag100) | |
676 #define Flag101(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag101) | |
677 #define Flag102(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag102) | |
678 #define Flag103(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag103) | |
679 #define Flag104(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag104) | |
680 #define Flag105(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag105) | |
681 #define Flag106(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag106) | |
682 #define Flag107(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag107) | |
683 #define Flag108(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag108) | |
684 #define Flag109(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag109) | |
685 #define Flag110(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag110) | |
686 #define Flag111(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag111) | |
687 #define Flag112(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag112) | |
688 #define Flag113(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag113) | |
689 #define Flag114(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag114) | |
690 #define Flag115(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag115) | |
691 #define Flag116(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag116) | |
692 #define Flag117(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag117) | |
693 #define Flag118(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag118) | |
694 #define Flag119(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag119) | |
695 #define Flag120(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag120) | |
696 #define Flag121(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag121) | |
697 #define Flag122(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag122) | |
698 #define Flag123(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag123) | |
699 #define Flag124(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag124) | |
700 #define Flag125(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag125) | |
701 #define Flag126(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag126) | |
702 #define Flag127(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag127) | |
703 #define Flag128(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.U.fw2.flag128) | |
704 | |
705 #define Flag129(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.in_list) | |
706 #define Flag130(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.has_aspects) | |
707 #define Flag131(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.rewrite_ins) | |
708 #define Flag132(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.analyzed) | |
709 #define Flag133(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.c_f_s) | |
710 #define Flag134(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.error_posted) | |
711 #define Flag135(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag4) | |
712 #define Flag136(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag5) | |
713 #define Flag137(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag6) | |
714 #define Flag138(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag7) | |
715 #define Flag139(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag8) | |
716 #define Flag140(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag9) | |
717 #define Flag141(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag10) | |
718 #define Flag142(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag11) | |
719 #define Flag143(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag12) | |
720 #define Flag144(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag13) | |
721 #define Flag145(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag14) | |
722 #define Flag146(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag15) | |
723 #define Flag147(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag16) | |
724 #define Flag148(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag17) | |
725 #define Flag149(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.flag18) | |
726 #define Flag150(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.pflag1) | |
727 #define Flag151(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.K.pflag2) | |
728 | |
729 #define Flag152(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag152) | |
730 #define Flag153(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag153) | |
731 #define Flag154(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag154) | |
732 #define Flag155(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag155) | |
733 #define Flag156(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag156) | |
734 #define Flag157(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag157) | |
735 #define Flag158(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag158) | |
736 #define Flag159(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag159) | |
737 #define Flag160(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag160) | |
738 #define Flag161(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag161) | |
739 #define Flag162(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag162) | |
740 #define Flag163(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag163) | |
741 #define Flag164(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag164) | |
742 #define Flag165(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag165) | |
743 #define Flag166(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag166) | |
744 #define Flag167(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag167) | |
745 #define Flag168(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag168) | |
746 #define Flag169(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag169) | |
747 #define Flag170(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag170) | |
748 #define Flag171(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag171) | |
749 #define Flag172(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag172) | |
750 #define Flag173(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag173) | |
751 #define Flag174(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag174) | |
752 #define Flag175(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag175) | |
753 #define Flag176(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag176) | |
754 #define Flag177(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag177) | |
755 #define Flag178(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag178) | |
756 #define Flag179(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag179) | |
757 #define Flag180(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag180) | |
758 #define Flag181(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag181) | |
759 #define Flag182(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag182) | |
760 #define Flag183(N) (Nodes_Ptr[(N) - First_Node_Id + 3].V.EX.X.fw3.flag183) | |
761 | |
762 #define Flag184(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag184) | |
763 #define Flag185(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag185) | |
764 #define Flag186(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag186) | |
765 #define Flag187(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag187) | |
766 #define Flag188(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag188) | |
767 #define Flag189(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag189) | |
768 #define Flag190(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag190) | |
769 #define Flag191(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag191) | |
770 #define Flag192(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag192) | |
771 #define Flag193(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag193) | |
772 #define Flag194(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag194) | |
773 #define Flag195(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag195) | |
774 #define Flag196(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag196) | |
775 #define Flag197(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag197) | |
776 #define Flag198(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag198) | |
777 #define Flag199(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag199) | |
778 #define Flag200(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag200) | |
779 #define Flag201(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag201) | |
780 #define Flag202(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag202) | |
781 #define Flag203(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag203) | |
782 #define Flag204(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag204) | |
783 #define Flag205(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag205) | |
784 #define Flag206(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag206) | |
785 #define Flag207(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag207) | |
786 #define Flag208(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag208) | |
787 #define Flag209(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag209) | |
788 #define Flag210(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag210) | |
789 #define Flag211(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag211) | |
790 #define Flag212(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag212) | |
791 #define Flag213(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag213) | |
792 #define Flag214(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag214) | |
793 #define Flag215(N) (Nodes_Ptr[(N) - First_Node_Id + 4].V.EX.U.fw4.flag215) | |
794 | |
795 #define Flag216(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.in_list) | |
796 #define Flag217(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.has_aspects) | |
797 #define Flag218(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.rewrite_ins) | |
798 #define Flag219(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.analyzed) | |
799 #define Flag220(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.c_f_s) | |
800 #define Flag221(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.error_posted) | |
801 #define Flag222(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag4) | |
802 #define Flag223(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag5) | |
803 #define Flag224(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag6) | |
804 #define Flag225(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag7) | |
805 #define Flag226(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag8) | |
806 #define Flag227(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag9) | |
807 #define Flag228(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag10) | |
808 #define Flag229(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag11) | |
809 #define Flag230(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag12) | |
810 #define Flag231(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag13) | |
811 #define Flag232(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag14) | |
812 #define Flag233(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag15) | |
813 #define Flag234(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag16) | |
814 #define Flag235(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag17) | |
815 #define Flag236(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.flag18) | |
816 #define Flag237(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.pflag1) | |
817 #define Flag238(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.K.pflag2) | |
818 | |
819 #define Flag239(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.NK.flag65) | |
820 #define Flag240(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.NK.flag66) | |
821 #define Flag241(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.NK.flag67) | |
822 #define Flag242(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.NK.flag68) | |
823 #define Flag243(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.NK.flag69) | |
824 #define Flag244(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.NK.flag70) | |
825 #define Flag245(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.NK.flag71) | |
826 #define Flag246(N) (Nodes_Ptr[(N) - First_Node_Id + 3].U.NK.flag72) | |
827 | |
828 #define Flag247(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.NK.flag65) | |
829 #define Flag248(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.NK.flag66) | |
830 #define Flag249(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.NK.flag67) | |
831 #define Flag250(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.NK.flag68) | |
832 #define Flag251(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.NK.flag69) | |
833 #define Flag252(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.NK.flag70) | |
834 #define Flag253(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.NK.flag71) | |
835 #define Flag254(N) (Nodes_Ptr[(N) - First_Node_Id + 4].U.NK.flag72) | |
836 | |
837 #define Flag255(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag255) | |
838 #define Flag256(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag256) | |
839 #define Flag257(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag257) | |
840 #define Flag258(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag258) | |
841 #define Flag259(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag259) | |
842 #define Flag260(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag260) | |
843 #define Flag261(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag261) | |
844 #define Flag262(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag262) | |
845 #define Flag263(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag263) | |
846 #define Flag264(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag264) | |
847 #define Flag265(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag265) | |
848 #define Flag266(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag266) | |
849 #define Flag267(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag267) | |
850 #define Flag268(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag268) | |
851 #define Flag269(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag269) | |
852 #define Flag270(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag270) | |
853 #define Flag271(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag271) | |
854 #define Flag272(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag272) | |
855 #define Flag273(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag273) | |
856 #define Flag274(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag274) | |
857 #define Flag275(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag275) | |
858 #define Flag276(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag276) | |
859 #define Flag277(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag277) | |
860 #define Flag278(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag278) | |
861 #define Flag279(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag279) | |
862 #define Flag280(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag280) | |
863 #define Flag281(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag281) | |
864 #define Flag282(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag282) | |
865 #define Flag283(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag283) | |
866 #define Flag284(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag284) | |
867 #define Flag285(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag285) | |
868 #define Flag286(N) (Nodes_Ptr[(N) - First_Node_Id + 5].V.EX.U.fw5.flag286) | |
869 #define Flag287(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.in_list) | |
870 #define Flag288(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.has_aspects) | |
871 #define Flag289(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.rewrite_ins) | |
872 #define Flag290(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.analyzed) | |
873 #define Flag291(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.c_f_s) | |
874 #define Flag292(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.error_posted) | |
875 #define Flag293(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag4) | |
876 #define Flag294(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag5) | |
877 #define Flag295(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag6) | |
878 #define Flag296(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag7) | |
879 #define Flag297(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag8) | |
880 #define Flag298(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag9) | |
881 #define Flag299(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag10) | |
882 #define Flag300(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag11) | |
883 #define Flag301(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag12) | |
884 #define Flag302(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag13) | |
885 #define Flag303(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag14) | |
886 #define Flag304(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag15) | |
887 #define Flag305(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag16) | |
888 #define Flag306(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag17) | |
889 #define Flag307(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.flag18) | |
890 #define Flag308(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.pflag1) | |
891 #define Flag309(N) (Nodes_Ptr[(N) - First_Node_Id + 5].U.K.pflag2) | |
892 | |
893 #ifdef __cplusplus | |
894 } | |
895 #endif |