Subversion Repositories tendra.SVN

Rev

Rev 2 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 7u83 1 
/*
2 
    		 Crown Copyright (c) 1997, 1998
3 
 
4 
    This TenDRA(r) Computer Program is subject to Copyright
5 
    owned by the United Kingdom Secretary of State for Defence
6 
    acting through the Defence Evaluation and Research Agency
7 
    (DERA).  It is made available to Recipients with a
8 
    royalty-free licence for its use, reproduction, transfer
9 
    to other parties and amendment for any purpose not excluding
10 
    product development provided that any such use et cetera
11 
    shall be deemed to be acceptance of the following conditions:-
12 
 
13 
        (1) Its Recipients shall ensure that this Notice is
14 
        reproduced upon any copies or amended versions of it;
15 
 
16 
        (2) Any amended version of it shall be clearly marked to
17 
        show both the nature of and the organisation responsible
18 
        for the relevant amendment or amendments;
19 
 
20 
        (3) Its onward transfer from a recipient to another
21 
        party shall be deemed to be that party's acceptance of
22 
        these conditions;
23 
 
24 
        (4) DERA gives no warranty or assurance as to its
25 
        quality or suitability for any purpose and DERA accepts
26 
        no liability whatsoever in relation to any use to which
27 
        it may be put.
28 
*/
29 
 
30 
/*
31 
    AUTOMATICALLY GENERATED FROM ALGEBRA c_class (VERSION 1.1)
32 
    BY calculus (VERSION 1.2)
33 
*/
34 
 
35 
#ifndef VIRT_OPS_H_INCLUDED
36 
#define VIRT_OPS_H_INCLUDED
37 
 
38 
/* Operations for union VIRTUAL */
39 
 
7 7u83 40 
#pragma token PROC(EXP : VIRTUAL :) EXP : unsigned : TAG_virt #
2 7u83 41 
#pragma interface TAG_virt
42 
 
43 
 
44 
/* Operations for component func of union VIRTUAL */
45 
 
7 7u83 46 
#pragma token PROC(EXP : VIRTUAL :)\
47 
    EXP : PTR(IDENTIFIER) : virt_func #
2 7u83 48 
#pragma interface virt_func
49 
 
50 
/* Operations for component no of union VIRTUAL */
51 
 
7 7u83 52 
#pragma token PROC(EXP : VIRTUAL :)\
53 
    EXP : PTR(ulong_type) : virt_no #
2 7u83 54 
#pragma interface virt_no
55 
 
56 
/* Operations for component base of union VIRTUAL */
57 
 
7 7u83 58 
#pragma token PROC(EXP : VIRTUAL :)\
59 
    EXP : PTR(GRAPH) : virt_base #
2 7u83 60 
#pragma interface virt_base
61 
 
62 
/* Operations for component next of union VIRTUAL */
63 
 
7 7u83 64 
#pragma token PROC(EXP : VIRTUAL :)\
65 
    EXP : PTR(VIRTUAL) : virt_next #
2 7u83 66 
#pragma interface virt_next
67 
 
68 
/* Operations for field table of union VIRTUAL */
69 
 
70 
#pragma token EXP const : unsigned : virt_table_tag #
7 7u83 71 
#pragma token PROC(EXP : VIRTUAL :) EXP : int : IS_virt_table #
2 7u83 72 
#pragma interface virt_table_tag IS_virt_table
73 
 
7 7u83 74 
#pragma token PROC(EXP : VIRTUAL :)\
75 
    EXP : PTR(OFFSET) : virt_table_off #
2 7u83 76 
#pragma interface virt_table_off
77 
 
7 7u83 78 
#pragma token PROC(EXP : VIRTUAL :)\
79 
    EXP : PTR(LIST(VIRTUAL)) : virt_table_entries #
2 7u83 80 
#pragma interface virt_table_entries
81 
 
7 7u83 82 
#pragma token PROC(EXP : VIRTUAL :)\
83 
    EXP : PTR(ulong_type) : virt_table_tok #
2 7u83 84 
#pragma interface virt_table_tok
85 
 
7 7u83 86 
#pragma token PROC(EXP : VIRTUAL :)\
87 
    EXP : PTR(ulong_type) : virt_table_tbl #
2 7u83 88 
#pragma interface virt_table_tbl
89 
 
7 7u83 90 
#pragma token PROC(EXP : VIRTUAL :)\
91 
    EXP : PTR(ulong_type) : virt_table_rtti #
2 7u83 92 
#pragma interface virt_table_rtti
93 
 
7 7u83 94 
#pragma token PROC(EXP : VIRTUAL :)\
95 
    EXP : PTR(int) : virt_table_rtti_used #
2 7u83 96 
#pragma interface virt_table_rtti_used
97 
 
7 7u83 98 
#pragma token PROC(\
2 7u83 99 
	EXP : IDENTIFIER :,\
100 
	EXP : ulong_type :,\
101 
	EXP : GRAPH :,\
102 
	EXP : OFFSET :,\
103 
	EXP lvalue : VIRTUAL :\
104 
    ) STATEMENT MAKE_virt_table #
105 
#pragma interface MAKE_virt_table
106 
 
7 7u83 107 
#pragma token PROC(\
2 7u83 108 
	EXP lvalue : IDENTIFIER :,\
109 
	EXP lvalue : ulong_type :,\
110 
	EXP lvalue : GRAPH :,\
111 
	EXP lvalue : VIRTUAL :,\
112 
	EXP lvalue : OFFSET :,\
7 7u83 113 
	EXP lvalue : LIST(VIRTUAL) :,\
2 7u83 114 
	EXP lvalue : ulong_type :,\
115 
	EXP lvalue : ulong_type :,\
116 
	EXP lvalue : ulong_type :,\
117 
	EXP lvalue : int :,\
118 
	EXP : VIRTUAL :\
119 
    ) STATEMENT DECONS_virt_table #
120 
#pragma interface DECONS_virt_table
121 
 
7 7u83 122 
#pragma token PROC(\
2 7u83 123 
	EXP : DESTROYER :,\
124 
	EXP lvalue : IDENTIFIER :,\
125 
	EXP lvalue : ulong_type :,\
126 
	EXP lvalue : GRAPH :,\
127 
	EXP lvalue : VIRTUAL :,\
128 
	EXP lvalue : OFFSET :,\
7 7u83 129 
	EXP lvalue : LIST(VIRTUAL) :,\
2 7u83 130 
	EXP lvalue : ulong_type :,\
131 
	EXP lvalue : ulong_type :,\
132 
	EXP lvalue : ulong_type :,\
133 
	EXP lvalue : int :,\
134 
	EXP : VIRTUAL :\
135 
    ) STATEMENT DESTROY_virt_table #
136 
#pragma interface DESTROY_virt_table
137 
 
138 
 
139 
/* Operations for field simple of union VIRTUAL */
140 
 
141 
#pragma token EXP const : unsigned : virt_simple_tag #
7 7u83 142 
#pragma token PROC(EXP : VIRTUAL :) EXP : int : IS_virt_simple #
2 7u83 143 
#pragma interface virt_simple_tag IS_virt_simple
144 
 
7 7u83 145 
#pragma token PROC(\
2 7u83 146 
	EXP : IDENTIFIER :,\
147 
	EXP : ulong_type :,\
148 
	EXP : GRAPH :,\
149 
	EXP lvalue : VIRTUAL :\
150 
    ) STATEMENT MAKE_virt_simple #
151 
#pragma interface MAKE_virt_simple
152 
 
7 7u83 153 
#pragma token PROC(\
2 7u83 154 
	EXP lvalue : IDENTIFIER :,\
155 
	EXP lvalue : ulong_type :,\
156 
	EXP lvalue : GRAPH :,\
157 
	EXP lvalue : VIRTUAL :,\
158 
	EXP : VIRTUAL :\
159 
    ) STATEMENT DECONS_virt_simple #
160 
#pragma interface DECONS_virt_simple
161 
 
7 7u83 162 
#pragma token PROC(\
2 7u83 163 
	EXP : DESTROYER :,\
164 
	EXP lvalue : IDENTIFIER :,\
165 
	EXP lvalue : ulong_type :,\
166 
	EXP lvalue : GRAPH :,\
167 
	EXP lvalue : VIRTUAL :,\
168 
	EXP : VIRTUAL :\
169 
    ) STATEMENT DESTROY_virt_simple #
170 
#pragma interface DESTROY_virt_simple
171 
 
172 
 
173 
/* Operations for field override of union VIRTUAL */
174 
 
175 
#pragma token EXP const : unsigned : virt_override_tag #
7 7u83 176 
#pragma token PROC(EXP : VIRTUAL :) EXP : int : IS_virt_override #
2 7u83 177 
#pragma interface virt_override_tag IS_virt_override
178 
 
7 7u83 179 
#pragma token PROC(EXP : VIRTUAL :)\
180 
    EXP : PTR(GRAPH) : virt_override_ret #
2 7u83 181 
#pragma interface virt_override_ret
182 
 
7 7u83 183 
#pragma token PROC(EXP : VIRTUAL :)\
184 
    EXP : PTR(IDENTIFIER) : virt_override_orig #
2 7u83 185 
#pragma interface virt_override_orig
186 
 
7 7u83 187 
#pragma token PROC(EXP : VIRTUAL :)\
188 
    EXP : PTR(GRAPH) : virt_override_src #
2 7u83 189 
#pragma interface virt_override_src
190 
 
7 7u83 191 
#pragma token PROC(\
2 7u83 192 
	EXP : IDENTIFIER :,\
193 
	EXP : ulong_type :,\
194 
	EXP : GRAPH :,\
195 
	EXP : GRAPH :,\
196 
	EXP : IDENTIFIER :,\
197 
	EXP : GRAPH :,\
198 
	EXP lvalue : VIRTUAL :\
199 
    ) STATEMENT MAKE_virt_override #
200 
#pragma interface MAKE_virt_override
201 
 
7 7u83 202 
#pragma token PROC(\
2 7u83 203 
	EXP lvalue : IDENTIFIER :,\
204 
	EXP lvalue : ulong_type :,\
205 
	EXP lvalue : GRAPH :,\
206 
	EXP lvalue : VIRTUAL :,\
207 
	EXP lvalue : GRAPH :,\
208 
	EXP lvalue : IDENTIFIER :,\
209 
	EXP lvalue : GRAPH :,\
210 
	EXP : VIRTUAL :\
211 
    ) STATEMENT DECONS_virt_override #
212 
#pragma interface DECONS_virt_override
213 
 
7 7u83 214 
#pragma token PROC(\
2 7u83 215 
	EXP : DESTROYER :,\
216 
	EXP lvalue : IDENTIFIER :,\
217 
	EXP lvalue : ulong_type :,\
218 
	EXP lvalue : GRAPH :,\
219 
	EXP lvalue : VIRTUAL :,\
220 
	EXP lvalue : GRAPH :,\
221 
	EXP lvalue : IDENTIFIER :,\
222 
	EXP lvalue : GRAPH :,\
223 
	EXP : VIRTUAL :\
224 
    ) STATEMENT DESTROY_virt_override #
225 
#pragma interface DESTROY_virt_override
226 
 
227 
 
228 
/* Operations for field inherit of union VIRTUAL */
229 
 
230 
#pragma token EXP const : unsigned : virt_inherit_tag #
7 7u83 231 
#pragma token PROC(EXP : VIRTUAL :) EXP : int : IS_virt_inherit #
2 7u83 232 
#pragma interface virt_inherit_tag IS_virt_inherit
233 
 
7 7u83 234 
#pragma token PROC(\
2 7u83 235 
	EXP : IDENTIFIER :,\
236 
	EXP : ulong_type :,\
237 
	EXP : GRAPH :,\
238 
	EXP lvalue : VIRTUAL :\
239 
    ) STATEMENT MAKE_virt_inherit #
240 
#pragma interface MAKE_virt_inherit
241 
 
7 7u83 242 
#pragma token PROC(\
2 7u83 243 
	EXP lvalue : IDENTIFIER :,\
244 
	EXP lvalue : ulong_type :,\
245 
	EXP lvalue : GRAPH :,\
246 
	EXP lvalue : VIRTUAL :,\
247 
	EXP : VIRTUAL :\
248 
    ) STATEMENT DECONS_virt_inherit #
249 
#pragma interface DECONS_virt_inherit
250 
 
7 7u83 251 
#pragma token PROC(\
2 7u83 252 
	EXP : DESTROYER :,\
253 
	EXP lvalue : IDENTIFIER :,\
254 
	EXP lvalue : ulong_type :,\
255 
	EXP lvalue : GRAPH :,\
256 
	EXP lvalue : VIRTUAL :,\
257 
	EXP : VIRTUAL :\
258 
    ) STATEMENT DESTROY_virt_inherit #
259 
#pragma interface DESTROY_virt_inherit
260 
 
261 
 
262 
/* Operations for field complex of union VIRTUAL */
263 
 
264 
#pragma token EXP const : unsigned : virt_complex_tag #
7 7u83 265 
#pragma token PROC(EXP : VIRTUAL :) EXP : int : IS_virt_complex #
2 7u83 266 
#pragma interface virt_complex_tag IS_virt_complex
267 
 
7 7u83 268 
#pragma token PROC(EXP : VIRTUAL :)\
269 
    EXP : PTR(GRAPH) : virt_complex_ret #
2 7u83 270 
#pragma interface virt_complex_ret
271 
 
7 7u83 272 
#pragma token PROC(EXP : VIRTUAL :)\
273 
    EXP : PTR(IDENTIFIER) : virt_complex_orig #
2 7u83 274 
#pragma interface virt_complex_orig
275 
 
7 7u83 276 
#pragma token PROC(EXP : VIRTUAL :)\
277 
    EXP : PTR(GRAPH) : virt_complex_src #
2 7u83 278 
#pragma interface virt_complex_src
279 
 
7 7u83 280 
#pragma token PROC(\
2 7u83 281 
	EXP : IDENTIFIER :,\
282 
	EXP : ulong_type :,\
283 
	EXP : GRAPH :,\
284 
	EXP : GRAPH :,\
285 
	EXP : IDENTIFIER :,\
286 
	EXP : GRAPH :,\
287 
	EXP lvalue : VIRTUAL :\
288 
    ) STATEMENT MAKE_virt_complex #
289 
#pragma interface MAKE_virt_complex
290 
 
7 7u83 291 
#pragma token PROC(\
2 7u83 292 
	EXP lvalue : IDENTIFIER :,\
293 
	EXP lvalue : ulong_type :,\
294 
	EXP lvalue : GRAPH :,\
295 
	EXP lvalue : VIRTUAL :,\
296 
	EXP lvalue : GRAPH :,\
297 
	EXP lvalue : IDENTIFIER :,\
298 
	EXP lvalue : GRAPH :,\
299 
	EXP : VIRTUAL :\
300 
    ) STATEMENT DECONS_virt_complex #
301 
#pragma interface DECONS_virt_complex
302 
 
7 7u83 303 
#pragma token PROC(\
2 7u83 304 
	EXP : DESTROYER :,\
305 
	EXP lvalue : IDENTIFIER :,\
306 
	EXP lvalue : ulong_type :,\
307 
	EXP lvalue : GRAPH :,\
308 
	EXP lvalue : VIRTUAL :,\
309 
	EXP lvalue : GRAPH :,\
310 
	EXP lvalue : IDENTIFIER :,\
311 
	EXP lvalue : GRAPH :,\
312 
	EXP : VIRTUAL :\
313 
    ) STATEMENT DESTROY_virt_complex #
314 
#pragma interface DESTROY_virt_complex
315 
 
316 
 
317 
/* Operations for field link of union VIRTUAL */
318 
 
319 
#pragma token EXP const : unsigned : virt_link_tag #
7 7u83 320 
#pragma token PROC(EXP : VIRTUAL :) EXP : int : IS_virt_link #
2 7u83 321 
#pragma interface virt_link_tag IS_virt_link
322 
 
7 7u83 323 
#pragma token PROC(EXP : VIRTUAL :)\
324 
    EXP : PTR(PTR(VIRTUAL)) : virt_link_to #
2 7u83 325 
#pragma interface virt_link_to
326 
 
7 7u83 327 
#pragma token PROC(\
2 7u83 328 
	EXP : IDENTIFIER :,\
329 
	EXP : ulong_type :,\
330 
	EXP : GRAPH :,\
7 7u83 331 
	EXP : PTR(VIRTUAL) :,\
2 7u83 332 
	EXP lvalue : VIRTUAL :\
333 
    ) STATEMENT MAKE_virt_link #
334 
#pragma interface MAKE_virt_link
335 
 
7 7u83 336 
#pragma token PROC(\
2 7u83 337 
	EXP lvalue : IDENTIFIER :,\
338 
	EXP lvalue : ulong_type :,\
339 
	EXP lvalue : GRAPH :,\
340 
	EXP lvalue : VIRTUAL :,\
7 7u83 341 
	EXP lvalue : PTR(VIRTUAL) :,\
2 7u83 342 
	EXP : VIRTUAL :\
343 
    ) STATEMENT DECONS_virt_link #
344 
#pragma interface DECONS_virt_link
345 
 
7 7u83 346 
#pragma token PROC(\
2 7u83 347 
	EXP : DESTROYER :,\
348 
	EXP lvalue : IDENTIFIER :,\
349 
	EXP lvalue : ulong_type :,\
350 
	EXP lvalue : GRAPH :,\
351 
	EXP lvalue : VIRTUAL :,\
7 7u83 352 
	EXP lvalue : PTR(VIRTUAL) :,\
2 7u83 353 
	EXP : VIRTUAL :\
354 
    ) STATEMENT DESTROY_virt_link #
355 
#pragma interface DESTROY_virt_link
356 
 
357 
 
358 
#endif