Subversion Repositories tendra.SVN

Rev

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

Rev 5 Rev 6
Line 35... Line 35...
35 
#ifndef INST_OPS_H_INCLUDED
 35 
#ifndef INST_OPS_H_INCLUDED
36 
#define INST_OPS_H_INCLUDED
 36 
#define INST_OPS_H_INCLUDED
37 
 
 37 
 
38 
/* Operations for union INSTANCE */
 38 
/* Operations for union INSTANCE */
39 
 
 39 
 
40 
#pragma token PROC ( EXP : INSTANCE : ) EXP : unsigned : TAG_inst #
 40 
#pragma token PROC(EXP : INSTANCE :) EXP : unsigned : TAG_inst #
41 
#pragma interface TAG_inst
 41 
#pragma interface TAG_inst
42 
 
 42 
 
43 
 
 43 
 
44 
/* Operations for component form of union INSTANCE */
 44 
/* Operations for component form of union INSTANCE */
45 
 
 45 
 
46 
#pragma token PROC ( EXP : INSTANCE : )\
 46 
#pragma token PROC(EXP : INSTANCE :)\
47 
    EXP : PTR ( TYPE ) : inst_form #
 47 
    EXP : PTR(TYPE) : inst_form #
48 
#pragma interface inst_form
 48 
#pragma interface inst_form
49 
 
 49 
 
50 
/* Operations for component alias of union INSTANCE */
 50 
/* Operations for component alias of union INSTANCE */
51 
 
 51 
 
52 
#pragma token PROC ( EXP : INSTANCE : )\
 52 
#pragma token PROC(EXP : INSTANCE :)\
53 
    EXP : PTR ( INSTANCE ) : inst_alias #
 53 
    EXP : PTR(INSTANCE) : inst_alias #
54 
#pragma interface inst_alias
 54 
#pragma interface inst_alias
55 
 
 55 
 
56 
/* Operations for component next of union INSTANCE */
 56 
/* Operations for component next of union INSTANCE */
57 
 
 57 
 
58 
#pragma token PROC ( EXP : INSTANCE : )\
 58 
#pragma token PROC(EXP : INSTANCE :)\
59 
    EXP : PTR ( INSTANCE ) : inst_next #
 59 
    EXP : PTR(INSTANCE) : inst_next #
60 
#pragma interface inst_next
 60 
#pragma interface inst_next
61 
 
 61 
 
62 
/* Operations for field templ of union INSTANCE */
 62 
/* Operations for field templ of union INSTANCE */
63 
 
 63 
 
64 
#pragma token EXP const : unsigned : inst_templ_tag #
 64 
#pragma token EXP const : unsigned : inst_templ_tag #
65 
#pragma token PROC ( EXP : INSTANCE : ) EXP : int : IS_inst_templ #
 65 
#pragma token PROC(EXP : INSTANCE :) EXP : int : IS_inst_templ #
66 
#pragma interface inst_templ_tag IS_inst_templ
 66 
#pragma interface inst_templ_tag IS_inst_templ
67 
 
 67 
 
68 
#pragma token PROC ( EXP : INSTANCE : )\
 68 
#pragma token PROC(EXP : INSTANCE :)\
69 
    EXP : PTR ( IDENTIFIER ) : inst_templ_id #
 69 
    EXP : PTR(IDENTIFIER) : inst_templ_id #
70 
#pragma interface inst_templ_id
 70 
#pragma interface inst_templ_id
71 
 
 71 
 
72 
#pragma token PROC ( EXP : INSTANCE : )\
 72 
#pragma token PROC(EXP : INSTANCE :)\
73 
    EXP : PTR ( TYPE ) : inst_templ_spec #
 73 
    EXP : PTR(TYPE) : inst_templ_spec #
74 
#pragma interface inst_templ_spec
 74 
#pragma interface inst_templ_spec
75 
 
 75 
 
76 
#pragma token PROC ( EXP : INSTANCE : )\
 76 
#pragma token PROC(EXP : INSTANCE :)\
77 
    EXP : PTR ( DECL_SPEC ) : inst_templ_access #
 77 
    EXP : PTR(DECL_SPEC) : inst_templ_access #
78 
#pragma interface inst_templ_access
 78 
#pragma interface inst_templ_access
79 
 
 79 
 
80 
#pragma token PROC ( EXP : INSTANCE : )\
 80 
#pragma token PROC(EXP : INSTANCE :)\
81 
    EXP : PTR ( PPTOKEN_P ) : inst_templ_mode #
 81 
    EXP : PTR(PPTOKEN_P) : inst_templ_mode #
82 
#pragma interface inst_templ_mode
 82 
#pragma interface inst_templ_mode
83 
 
 83 
 
84 
#pragma token PROC ( EXP : INSTANCE : )\
 84 
#pragma token PROC(EXP : INSTANCE :)\
85 
    EXP : PTR ( LIST ( IDENTIFIER ) ) : inst_templ_mems #
 85 
    EXP : PTR(LIST(IDENTIFIER)) : inst_templ_mems #
86 
#pragma interface inst_templ_mems
 86 
#pragma interface inst_templ_mems
87 
 
 87 
 
88 
#pragma token PROC ( EXP : INSTANCE : )\
 88 
#pragma token PROC(EXP : INSTANCE :)\
89 
    EXP : PTR ( INSTANCE ) : inst_templ_prev #
 89 
    EXP : PTR(INSTANCE) : inst_templ_prev #
90 
#pragma interface inst_templ_prev
 90 
#pragma interface inst_templ_prev
91 
 
 91 
 
92 
#pragma token PROC (\
 92 
#pragma token PROC(\
93 
	EXP : TYPE :,\
 93 
	EXP : TYPE :,\
94 
	EXP : INSTANCE :,\
 94 
	EXP : INSTANCE :,\
95 
	EXP : IDENTIFIER :,\
 95 
	EXP : IDENTIFIER :,\
96 
	EXP : DECL_SPEC :,\
 96 
	EXP : DECL_SPEC :,\
97 
	EXP : INSTANCE :,\
 97 
	EXP : INSTANCE :,\
98 
	EXP lvalue : INSTANCE :\
 98 
	EXP lvalue : INSTANCE :\
99 
    ) STATEMENT MAKE_inst_templ #
 99 
    ) STATEMENT MAKE_inst_templ #
100 
#pragma interface MAKE_inst_templ
 100 
#pragma interface MAKE_inst_templ
101 
 
 101 
 
102 
#pragma token PROC (\
 102 
#pragma token PROC(\
103 
	EXP lvalue : TYPE :,\
 103 
	EXP lvalue : TYPE :,\
104 
	EXP lvalue : INSTANCE :,\
 104 
	EXP lvalue : INSTANCE :,\
105 
	EXP lvalue : INSTANCE :,\
 105 
	EXP lvalue : INSTANCE :,\
106 
	EXP lvalue : IDENTIFIER :,\
 106 
	EXP lvalue : IDENTIFIER :,\
107 
	EXP lvalue : TYPE :,\
 107 
	EXP lvalue : TYPE :,\
108 
	EXP lvalue : DECL_SPEC :,\
 108 
	EXP lvalue : DECL_SPEC :,\
109 
	EXP lvalue : PPTOKEN_P :,\
 109 
	EXP lvalue : PPTOKEN_P :,\
110 
	EXP lvalue : LIST ( IDENTIFIER ) :,\
 110 
	EXP lvalue : LIST(IDENTIFIER) :,\
111 
	EXP lvalue : INSTANCE :,\
 111 
	EXP lvalue : INSTANCE :,\
112 
	EXP : INSTANCE :\
 112 
	EXP : INSTANCE :\
113 
    ) STATEMENT DECONS_inst_templ #
 113 
    ) STATEMENT DECONS_inst_templ #
114 
#pragma interface DECONS_inst_templ
 114 
#pragma interface DECONS_inst_templ
115 
 
 115 
 
116 
#pragma token PROC (\
 116 
#pragma token PROC(\
117 
	EXP : DESTROYER :,\
 117 
	EXP : DESTROYER :,\
118 
	EXP lvalue : TYPE :,\
 118 
	EXP lvalue : TYPE :,\
119 
	EXP lvalue : INSTANCE :,\
 119 
	EXP lvalue : INSTANCE :,\
120 
	EXP lvalue : INSTANCE :,\
 120 
	EXP lvalue : INSTANCE :,\
121 
	EXP lvalue : IDENTIFIER :,\
 121 
	EXP lvalue : IDENTIFIER :,\
122 
	EXP lvalue : TYPE :,\
 122 
	EXP lvalue : TYPE :,\
123 
	EXP lvalue : DECL_SPEC :,\
 123 
	EXP lvalue : DECL_SPEC :,\
124 
	EXP lvalue : PPTOKEN_P :,\
 124 
	EXP lvalue : PPTOKEN_P :,\
125 
	EXP lvalue : LIST ( IDENTIFIER ) :,\
 125 
	EXP lvalue : LIST(IDENTIFIER) :,\
126 
	EXP lvalue : INSTANCE :,\
 126 
	EXP lvalue : INSTANCE :,\
127 
	EXP : INSTANCE :\
 127 
	EXP : INSTANCE :\
128 
    ) STATEMENT DESTROY_inst_templ #
 128 
    ) STATEMENT DESTROY_inst_templ #
129 
#pragma interface DESTROY_inst_templ
 129 
#pragma interface DESTROY_inst_templ
130 
 
 130 
 
131 
 
 131 
 
132 
/* Operations for field token of union INSTANCE */
 132 
/* Operations for field token of union INSTANCE */
133 
 
 133 
 
134 
#pragma token EXP const : unsigned : inst_token_tag #
 134 
#pragma token EXP const : unsigned : inst_token_tag #
135 
#pragma token PROC ( EXP : INSTANCE : ) EXP : int : IS_inst_token #
 135 
#pragma token PROC(EXP : INSTANCE :) EXP : int : IS_inst_token #
136 
#pragma interface inst_token_tag IS_inst_token
 136 
#pragma interface inst_token_tag IS_inst_token
137 
 
 137 
 
138 
#pragma token PROC ( EXP : INSTANCE : )\
 138 
#pragma token PROC(EXP : INSTANCE :)\
139 
    EXP : PTR ( ulong_type ) : inst_token_no #
 139 
    EXP : PTR(ulong_type) : inst_token_no #
140 
#pragma interface inst_token_no
 140 
#pragma interface inst_token_no
141 
 
 141 
 
142 
#pragma token PROC (\
 142 
#pragma token PROC(\
143 
	EXP : TYPE :,\
 143 
	EXP : TYPE :,\
144 
	EXP : INSTANCE :,\
 144 
	EXP : INSTANCE :,\
145 
	EXP lvalue : INSTANCE :\
 145 
	EXP lvalue : INSTANCE :\
146 
    ) STATEMENT MAKE_inst_token #
 146 
    ) STATEMENT MAKE_inst_token #
147 
#pragma interface MAKE_inst_token
 147 
#pragma interface MAKE_inst_token
148 
 
 148 
 
149 
#pragma token PROC (\
 149 
#pragma token PROC(\
150 
	EXP lvalue : TYPE :,\
 150 
	EXP lvalue : TYPE :,\
151 
	EXP lvalue : INSTANCE :,\
 151 
	EXP lvalue : INSTANCE :,\
152 
	EXP lvalue : INSTANCE :,\
 152 
	EXP lvalue : INSTANCE :,\
153 
	EXP lvalue : ulong_type :,\
 153 
	EXP lvalue : ulong_type :,\
154 
	EXP : INSTANCE :\
 154 
	EXP : INSTANCE :\
155 
    ) STATEMENT DECONS_inst_token #
 155 
    ) STATEMENT DECONS_inst_token #
156 
#pragma interface DECONS_inst_token
 156 
#pragma interface DECONS_inst_token
157 
 
 157 
 
158 
#pragma token PROC (\
 158 
#pragma token PROC(\
159 
	EXP : DESTROYER :,\
 159 
	EXP : DESTROYER :,\
160 
	EXP lvalue : TYPE :,\
 160 
	EXP lvalue : TYPE :,\
161 
	EXP lvalue : INSTANCE :,\
 161 
	EXP lvalue : INSTANCE :,\
162 
	EXP lvalue : INSTANCE :,\
 162 
	EXP lvalue : INSTANCE :,\
163 
	EXP lvalue : ulong_type :,\
 163 
	EXP lvalue : ulong_type :,\