Warning: Undefined variable $n in /usr/local/www/websvn.planix.org/include/diff_util.php on line 243

Warning: Undefined variable $n in /usr/local/www/websvn.planix.org/include/diff_util.php on line 247

Warning: Undefined variable $m in /usr/local/www/websvn.planix.org/include/diff_util.php on line 251
WebSVN – tendra.SVN – Diff – /branches/tendra5/src/installers/common/reader/externs.h – Rev 5 and 6

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 -... Line 1...
-
 
1
/*
-
 
2
 * Copyright (c) 2002-2005 The TenDRA Project <http://www.tendra.org/>.
-
 
3
 * All rights reserved.
-
 
4
 *
-
 
5
 * Redistribution and use in source and binary forms, with or without
-
 
6
 * modification, are permitted provided that the following conditions are met:
-
 
7
 *
-
 
8
 * 1. Redistributions of source code must retain the above copyright notice,
-
 
9
 *    this list of conditions and the following disclaimer.
-
 
10
 * 2. Redistributions in binary form must reproduce the above copyright notice,
-
 
11
 *    this list of conditions and the following disclaimer in the documentation
-
 
12
 *    and/or other materials provided with the distribution.
-
 
13
 * 3. Neither the name of The TenDRA Project nor the names of its contributors
-
 
14
 *    may be used to endorse or promote products derived from this software
-
 
15
 *    without specific, prior written permission.
-
 
16
 *
-
 
17
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS ``AS
-
 
18
 * IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
-
 
19
 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
-
 
20
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR
-
 
21
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
-
 
22
 * EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
-
 
23
 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
-
 
24
 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
-
 
25
 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
-
 
26
 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
-
 
27
 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-
 
28
 *
-
 
29
 * $Id$
-
 
30
 */
1
/*
31
/*
2
    		 Crown Copyright (c) 1997
32
    		 Crown Copyright (c) 1997
3
    
33
 
4
    This TenDRA(r) Computer Program is subject to Copyright
34
    This TenDRA(r) Computer Program is subject to Copyright
5
    owned by the United Kingdom Secretary of State for Defence
35
    owned by the United Kingdom Secretary of State for Defence
6
    acting through the Defence Evaluation and Research Agency
36
    acting through the Defence Evaluation and Research Agency
7
    (DERA).  It is made available to Recipients with a
37
    (DERA).  It is made available to Recipients with a
8
    royalty-free licence for its use, reproduction, transfer
38
    royalty-free licence for its use, reproduction, transfer
9
    to other parties and amendment for any purpose not excluding
39
    to other parties and amendment for any purpose not excluding
10
    product development provided that any such use et cetera
40
    product development provided that any such use et cetera
11
    shall be deemed to be acceptance of the following conditions:-
41
    shall be deemed to be acceptance of the following conditions:-
12
    
42
 
13
        (1) Its Recipients shall ensure that this Notice is
43
        (1) Its Recipients shall ensure that this Notice is
14
        reproduced upon any copies or amended versions of it;
44
        reproduced upon any copies or amended versions of it;
15
    
45
 
16
        (2) Any amended version of it shall be clearly marked to
46
        (2) Any amended version of it shall be clearly marked to
17
        show both the nature of and the organisation responsible
47
        show both the nature of and the organisation responsible
18
        for the relevant amendment or amendments;
48
        for the relevant amendment or amendments;
19
    
49
 
20
        (3) Its onward transfer from a recipient to another
50
        (3) Its onward transfer from a recipient to another
21
        party shall be deemed to be that party's acceptance of
51
        party shall be deemed to be that party's acceptance of
22
        these conditions;
52
        these conditions;
23
    
53
 
24
        (4) DERA gives no warranty or assurance as to its
54
        (4) DERA gives no warranty or assurance as to its
25
        quality or suitability for any purpose and DERA accepts
55
        quality or suitability for any purpose and DERA accepts
26
        no liability whatsoever in relation to any use to which
56
        no liability whatsoever in relation to any use to which
27
        it may be put.
57
        it may be put.
28
*/
58
*/
Line 33... Line 63...
33
#ifndef EXTERNS_INCLUDED
63
#ifndef EXTERNS_INCLUDED
34
#define EXTERNS_INCLUDED
64
#define EXTERNS_INCLUDED
35
 
65
 
36
 
66
 
37
/* CONSTRUCTS FOR ACCESS */
67
/* CONSTRUCTS FOR ACCESS */
38
extern access f_access_apply_token PROTO_S ( ( token, bitstream ) ) ;
68
extern access f_access_apply_token(token, bitstream);
39
extern access f_access_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
69
extern access f_access_cond(exp, bitstream, bitstream);
40
extern access f_add_accesses PROTO_S ( ( access, access ) ) ;
70
extern access f_add_accesses(access, access);
41
extern access f_constant ;
71
extern access f_constant;
42
extern access f_long_jump_access ;
72
extern access f_long_jump_access;
43
extern access f_no_other_read ;
73
extern access f_no_other_read;
44
extern access f_no_other_write ;
74
extern access f_no_other_write;
45
extern access f_out_par ;
75
extern access f_out_par;
46
extern access f_preserve ;
76
extern access f_preserve;
47
extern access f_register ;
77
extern access f_register;
48
extern access f_standard_access ;
78
extern access f_standard_access;
49
extern access f_used_as_volatile ;
79
extern access f_used_as_volatile;
50
extern access f_visible ;
80
extern access f_visible;
51
extern access f_dummy_access ;
81
extern access f_dummy_access;
52
extern void init_access PROTO_S ( ( void ) ) ;
82
extern void init_access(void);
53
 
83
 
54
/* CONSTRUCTS FOR ACCESS_OPTION */
84
/* CONSTRUCTS FOR ACCESS_OPTION */
55
extern access_option yes_access_option PROTO_S ( ( access ) ) ;
85
extern access_option yes_access_option(access);
56
extern access_option no_access_option ;
86
extern access_option no_access_option;
57
extern void init_access_option PROTO_S ( ( void ) ) ;
87
extern void init_access_option(void);
58
 
88
 
59
/* CONSTRUCTS FOR AL_TAG */
89
/* CONSTRUCTS FOR AL_TAG */
60
extern al_tag f_al_tag_apply_token PROTO_S ( ( token, bitstream ) ) ;
90
extern al_tag f_al_tag_apply_token(token, bitstream);
61
extern al_tag f_make_al_tag PROTO_S ( ( tdfint ) ) ;
91
extern al_tag f_make_al_tag(tdfint);
62
extern al_tag f_dummy_al_tag ;
92
extern al_tag f_dummy_al_tag;
63
extern void init_al_tag PROTO_S ( ( void ) ) ;
93
extern void init_al_tag(void);
64
 
94
 
65
/* CONSTRUCTS FOR AL_TAGDEF */
95
/* CONSTRUCTS FOR AL_TAGDEF */
66
extern al_tagdef f_make_al_tagdef PROTO_S ( ( tdfint, alignment ) ) ;
96
extern al_tagdef f_make_al_tagdef(tdfint, alignment);
67
extern al_tagdef f_dummy_al_tagdef ;
97
extern al_tagdef f_dummy_al_tagdef;
68
extern void init_al_tagdef PROTO_S ( ( void ) ) ;
98
extern void init_al_tagdef(void);
69
 
99
 
70
/* CONSTRUCTS FOR AL_TAGDEF_LIST */
100
/* CONSTRUCTS FOR AL_TAGDEF_LIST */
71
extern al_tagdef_list new_al_tagdef_list PROTO_S ( ( int ) ) ;
101
extern al_tagdef_list new_al_tagdef_list(int);
72
extern al_tagdef_list add_al_tagdef_list PROTO_S ( ( al_tagdef_list, al_tagdef, int ) ) ;
102
extern al_tagdef_list add_al_tagdef_list(al_tagdef_list, al_tagdef, int);
73
extern void init_al_tagdef_list PROTO_S ( ( void ) ) ;
103
extern void init_al_tagdef_list(void);
74
 
104
 
75
/* CONSTRUCTS FOR AL_TAGDEF_PROPS */
105
/* CONSTRUCTS FOR AL_TAGDEF_PROPS */
76
extern al_tagdef_props f_make_al_tagdefs PROTO_S ( ( tdfint, al_tagdef_list ) ) ;
106
extern al_tagdef_props f_make_al_tagdefs(tdfint, al_tagdef_list);
77
extern al_tagdef_props f_dummy_al_tagdef_props ;
107
extern al_tagdef_props f_dummy_al_tagdef_props;
78
extern void init_al_tagdef_props PROTO_S ( ( void ) ) ;
108
extern void init_al_tagdef_props(void);
79
 
109
 
80
/* CONSTRUCTS FOR ALIGNMENT */
110
/* CONSTRUCTS FOR ALIGNMENT */
81
extern alignment f_alignment_apply_token PROTO_S ( ( token, bitstream ) ) ;
111
extern alignment f_alignment_apply_token(token, bitstream);
82
extern alignment f_alignment_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
112
extern alignment f_alignment_cond(exp, bitstream, bitstream);
83
extern alignment f_alignment PROTO_S ( ( shape ) ) ;
113
extern alignment f_alignment(shape);
84
extern alignment f_alloca_alignment ;
114
extern alignment f_alloca_alignment;
85
extern alignment f_callees_alignment PROTO_S ( ( bool ) ) ;
115
extern alignment f_callees_alignment(bool);
86
extern alignment f_callers_alignment PROTO_S ( ( bool ) ) ;
116
extern alignment f_callers_alignment(bool);
87
extern alignment f_code_alignment ;
117
extern alignment f_code_alignment;
88
extern alignment f_locals_alignment ;
118
extern alignment f_locals_alignment;
89
extern alignment f_obtain_al_tag PROTO_S ( ( al_tag ) ) ;
119
extern alignment f_obtain_al_tag(al_tag);
90
extern alignment f_parameter_alignment PROTO_S ( ( shape ) ) ;
120
extern alignment f_parameter_alignment(shape);
91
extern alignment f_unite_alignments PROTO_S ( ( alignment, alignment ) ) ;
121
extern alignment f_unite_alignments(alignment, alignment);
92
extern alignment f_var_param_alignment ;
122
extern alignment f_var_param_alignment;
93
extern alignment f_dummy_alignment ;
123
extern alignment f_dummy_alignment;
94
extern void init_alignment PROTO_S ( ( void ) ) ;
124
extern void init_alignment(void);
95
 
125
 
96
/* CONSTRUCTS FOR BITFIELD_VARIETY */
126
/* CONSTRUCTS FOR BITFIELD_VARIETY */
97
extern bitfield_variety f_bfvar_apply_token PROTO_S ( ( token, bitstream ) ) ;
127
extern bitfield_variety f_bfvar_apply_token(token, bitstream);
98
extern bitfield_variety f_bfvar_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
128
extern bitfield_variety f_bfvar_cond(exp, bitstream, bitstream);
99
extern bitfield_variety f_bfvar_bits PROTO_S ( ( bool, nat ) ) ;
129
extern bitfield_variety f_bfvar_bits(bool, nat);
100
extern bitfield_variety f_dummy_bitfield_variety ;
130
extern bitfield_variety f_dummy_bitfield_variety;
101
extern void init_bitfield_variety PROTO_S ( ( void ) ) ;
131
extern void init_bitfield_variety(void);
102
 
132
 
103
/* CONSTRUCTS FOR BOOL */
133
/* CONSTRUCTS FOR BOOL */
104
extern bool f_bool_apply_token PROTO_S ( ( token, bitstream ) ) ;
134
extern bool f_bool_apply_token(token, bitstream);
105
extern bool f_bool_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
135
extern bool f_bool_cond(exp, bitstream, bitstream);
106
extern bool f_false ;
136
extern bool f_false;
107
extern bool f_true ;
137
extern bool f_true;
108
extern bool f_dummy_bool ;
138
extern bool f_dummy_bool;
109
extern void init_bool PROTO_S ( ( void ) ) ;
139
extern void init_bool(void);
110
 
140
 
111
/* CONSTRUCTS FOR BOOL_OPTION */
141
/* CONSTRUCTS FOR BOOL_OPTION */
112
extern bool_option yes_bool_option PROTO_S ( ( bool ) ) ;
142
extern bool_option yes_bool_option(bool);
113
extern bool_option no_bool_option ;
143
extern bool_option no_bool_option;
114
extern void init_bool_option PROTO_S ( ( void ) ) ;
144
extern void init_bool_option(void);
115
 
145
 
116
/* CONSTRUCTS FOR CALLEES */
146
/* CONSTRUCTS FOR CALLEES */
117
extern callees f_make_callee_list PROTO_S ( ( exp_list ) ) ;
147
extern callees f_make_callee_list(exp_list);
118
extern callees f_make_dynamic_callees PROTO_S ( ( exp, exp ) ) ;
148
extern callees f_make_dynamic_callees(exp, exp);
119
extern callees f_same_callees ;
149
extern callees f_same_callees;
120
extern callees f_dummy_callees ;
150
extern callees f_dummy_callees;
121
extern void init_callees PROTO_S ( ( void ) ) ;
151
extern void init_callees(void);
122
 
152
 
123
/* CONSTRUCTS FOR CAPSULE */
153
/* CONSTRUCTS FOR CAPSULE */
124
extern void start_make_capsule PROTO_S ( ( tdfident_list, capsule_link_list ) ) ;
154
extern void start_make_capsule(tdfident_list, capsule_link_list);
125
extern capsule f_make_capsule PROTO_S ( ( tdfident_list, capsule_link_list, extern_link_list, group_list ) ) ;
155
extern capsule f_make_capsule(tdfident_list, capsule_link_list,
-
 
156
			      extern_link_list, group_list);
126
extern capsule f_dummy_capsule ;
157
extern capsule f_dummy_capsule;
127
extern void init_capsule PROTO_S ( ( void ) ) ;
158
extern void init_capsule(void);
128
 
159
 
129
/* CONSTRUCTS FOR CAPSULE_LINK */
160
/* CONSTRUCTS FOR CAPSULE_LINK */
130
extern capsule_link f_make_capsule_link PROTO_S ( ( tdfident, tdfint ) ) ;
161
extern capsule_link f_make_capsule_link(tdfident, tdfint);
131
extern capsule_link f_dummy_capsule_link ;
162
extern capsule_link f_dummy_capsule_link;
132
extern void init_capsule_link PROTO_S ( ( void ) ) ;
163
extern void init_capsule_link(void);
133
 
164
 
134
/* CONSTRUCTS FOR CAPSULE_LINK_LIST */
165
/* CONSTRUCTS FOR CAPSULE_LINK_LIST */
135
extern capsule_link_list new_capsule_link_list PROTO_S ( ( int ) ) ;
166
extern capsule_link_list new_capsule_link_list(int);
136
extern capsule_link_list add_capsule_link_list PROTO_S ( ( capsule_link_list, capsule_link, int ) ) ;
167
extern capsule_link_list add_capsule_link_list(capsule_link_list,
-
 
168
					       capsule_link, int);
137
extern void init_capsule_link_list PROTO_S ( ( void ) ) ;
169
extern void init_capsule_link_list(void);
138
 
170
 
139
/* CONSTRUCTS FOR CASELIM */
171
/* CONSTRUCTS FOR CASELIM */
140
extern caselim f_make_caselim PROTO_S ( ( label, signed_nat, signed_nat ) ) ;
172
extern caselim f_make_caselim(label, signed_nat, signed_nat);
141
extern caselim f_dummy_caselim ;
173
extern caselim f_dummy_caselim;
142
extern void init_caselim PROTO_S ( ( void ) ) ;
174
extern void init_caselim(void);
143
 
175
 
144
/* CONSTRUCTS FOR CASELIM_LIST */
176
/* CONSTRUCTS FOR CASELIM_LIST */
145
extern caselim_list new_caselim_list PROTO_S ( ( int ) ) ;
177
extern caselim_list new_caselim_list(int);
146
extern caselim_list add_caselim_list PROTO_S ( ( caselim_list, caselim, int ) ) ;
178
extern caselim_list add_caselim_list(caselim_list, caselim, int);
147
extern void init_caselim_list PROTO_S ( ( void ) ) ;
179
extern void init_caselim_list(void);
148
 
180
 
149
/* CONSTRUCTS FOR DG */
181
/* CONSTRUCTS FOR DG */
150
extern dg f_dg_apply_token PROTO_S ( ( token, bitstream ) ) ;
182
extern dg f_dg_apply_token(token, bitstream);
151
extern dg f_make_tag_dg PROTO_S ( ( dg_tag, dg ) ) ;
183
extern dg f_make_tag_dg(dg_tag, dg);
152
extern dg f_abortable_part_dg PROTO_S ( ( dg_sourcepos, bool ) ) ;
184
extern dg f_abortable_part_dg(dg_sourcepos, bool);
153
extern dg f_accept_dg PROTO_S ( ( dg_sourcepos, dg_tag, dg_name_list, bool, dg_tag_option ) ) ;
185
extern dg f_accept_dg(dg_sourcepos, dg_tag, dg_name_list, bool, dg_tag_option);
154
extern dg f_barrier_dg PROTO_S ( ( dg_sourcepos, dg_tag ) ) ;
186
extern dg f_barrier_dg(dg_sourcepos, dg_tag);
155
extern dg f_branch_dg PROTO_S ( ( dg_sourcepos ) ) ;
187
extern dg f_branch_dg(dg_sourcepos);
156
extern dg f_call_dg PROTO_S ( ( dg_idname_option, dg_sourcepos, nat_option, dg_tag_option, dg_tag_option ) ) ;
188
extern dg f_call_dg(dg_idname_option, dg_sourcepos, nat_option, dg_tag_option,
-
 
189
		    dg_tag_option);
157
extern dg f_compilation_dg PROTO_S ( ( dg_tag ) ) ;
190
extern dg f_compilation_dg(dg_tag);
158
extern dg f_destructor_dg PROTO_S ( ( dg_sourcepos, exp_option ) ) ;
191
extern dg f_destructor_dg(dg_sourcepos, exp_option);
159
extern dg f_exception_handler_dg PROTO_S ( ( dg_name_option ) ) ;
192
extern dg f_exception_handler_dg(dg_name_option);
160
extern dg f_exception_scope_dg PROTO_S ( ( dg_tag_list ) ) ;
193
extern dg f_exception_scope_dg(dg_tag_list);
161
extern dg f_inline_call_dg PROTO_S ( ( dg_tag, dg_name_list, nat_option ) ) ;
194
extern dg f_inline_call_dg(dg_tag, dg_name_list, nat_option);
162
extern dg f_inline_result_dg PROTO_S ( ( dg_tag ) ) ;
195
extern dg f_inline_result_dg(dg_tag);
163
extern dg f_inlined_dg PROTO_S ( ( dg, dg_tag ) ) ;
196
extern dg f_inlined_dg(dg, dg_tag);
164
extern dg f_jump_dg PROTO_S ( ( dg_sourcepos ) ) ;
197
extern dg f_jump_dg(dg_sourcepos);
165
extern dg f_label_dg PROTO_S ( ( dg_idname, dg_sourcepos ) ) ;
198
extern dg f_label_dg(dg_idname, dg_sourcepos);
166
extern dg f_lexical_block_dg PROTO_S ( ( dg_idname_option, dg_sourcepos ) ) ;
199
extern dg f_lexical_block_dg(dg_idname_option, dg_sourcepos);
167
extern dg f_list_dg PROTO_S ( ( dg_list ) ) ;
200
extern dg f_list_dg(dg_list);
168
extern dg f_long_jump_dg PROTO_S ( ( dg_sourcepos ) ) ;
201
extern dg f_long_jump_dg(dg_sourcepos);
169
extern dg f_name_decl_dg PROTO_S ( ( dg_name ) ) ;
202
extern dg f_name_decl_dg(dg_name);
170
extern dg f_params_dg PROTO_S ( ( dg_name_list, exp_option ) ) ;
203
extern dg f_params_dg(dg_name_list, exp_option);
171
extern dg f_raise_dg PROTO_S ( ( dg_sourcepos, dg_type_option, exp_option ) ) ;
204
extern dg f_raise_dg(dg_sourcepos, dg_type_option, exp_option);
172
extern dg f_requeue_dg PROTO_S ( ( dg_sourcepos, dg_tag, bool ) ) ;
205
extern dg f_requeue_dg(dg_sourcepos, dg_tag, bool);
173
extern dg f_rts_call_dg PROTO_S ( ( dg_sourcepos, nat, dg_tag_option, dg_tag_option ) ) ;
206
extern dg f_rts_call_dg(dg_sourcepos, nat, dg_tag_option, dg_tag_option);
174
extern dg f_select_dg PROTO_S ( ( dg_sourcepos, bool ) ) ;
207
extern dg f_select_dg(dg_sourcepos, bool);
175
extern dg f_select_alternative_dg PROTO_S ( ( dg_sourcepos, nat, bool, exp ) ) ;
208
extern dg f_select_alternative_dg(dg_sourcepos, nat, bool, exp);
176
extern dg f_select_guard_dg PROTO_S ( ( dg_sourcepos, dg_tag ) ) ;
209
extern dg f_select_guard_dg(dg_sourcepos, dg_tag);
177
extern dg f_singlestep_dg PROTO_S ( ( dg_sourcepos ) ) ;
210
extern dg f_singlestep_dg(dg_sourcepos);
178
extern dg f_source_language_dg PROTO_S ( ( nat ) ) ;
211
extern dg f_source_language_dg(nat);
179
extern dg f_sourcepos_dg PROTO_S ( ( dg_sourcepos ) ) ;
212
extern dg f_sourcepos_dg(dg_sourcepos);
180
extern dg f_statement_part_dg PROTO_S ( ( dg_tag ) ) ;
213
extern dg f_statement_part_dg(dg_tag);
181
extern dg f_test_dg PROTO_S ( ( dg_sourcepos, bool ) ) ;
214
extern dg f_test_dg(dg_sourcepos, bool);
182
extern dg f_triggering_alternative_dg PROTO_S ( ( dg_sourcepos, nat, bool ) ) ;
215
extern dg f_triggering_alternative_dg(dg_sourcepos, nat, bool);
183
extern dg f_with_dg PROTO_S ( ( dg_type, exp ) ) ;
216
extern dg f_with_dg(dg_type, exp);
184
extern dg f_dummy_dg ;
217
extern dg f_dummy_dg;
185
extern void init_dg PROTO_S ( ( void ) ) ;
218
extern void init_dg(void);
186
 
219
 
187
/* CONSTRUCTS FOR DG_ACCESSIBILITY */
220
/* CONSTRUCTS FOR DG_ACCESSIBILITY */
188
extern dg_accessibility f_dg_local_accessibility ;
221
extern dg_accessibility f_dg_local_accessibility;
189
extern dg_accessibility f_dg_private_accessibility ;
222
extern dg_accessibility f_dg_private_accessibility;
190
extern dg_accessibility f_dg_protected_accessibility ;
223
extern dg_accessibility f_dg_protected_accessibility;
191
extern dg_accessibility f_dg_public_accessibility ;
224
extern dg_accessibility f_dg_public_accessibility;
192
extern dg_accessibility f_dummy_dg_accessibility ;
225
extern dg_accessibility f_dummy_dg_accessibility;
193
extern void init_dg_accessibility PROTO_S ( ( void ) ) ;
226
extern void init_dg_accessibility(void);
194
 
227
 
195
/* CONSTRUCTS FOR DG_ACCESSIBILITY_OPTION */
228
/* CONSTRUCTS FOR DG_ACCESSIBILITY_OPTION */
196
extern dg_accessibility_option yes_dg_accessibility_option PROTO_S ( ( dg_accessibility ) ) ;
229
extern dg_accessibility_option yes_dg_accessibility_option(dg_accessibility);
197
extern dg_accessibility_option no_dg_accessibility_option ;
230
extern dg_accessibility_option no_dg_accessibility_option;
198
extern void init_dg_accessibility_option PROTO_S ( ( void ) ) ;
231
extern void init_dg_accessibility_option(void);
199
 
232
 
200
/* CONSTRUCTS FOR DG_APPEND */
233
/* CONSTRUCTS FOR DG_APPEND */
201
extern dg_append f_dg_name_append PROTO_S ( ( dg_tag, dg_name ) ) ;
234
extern dg_append f_dg_name_append(dg_tag, dg_name);
202
extern dg_append f_dummy_dg_append ;
235
extern dg_append f_dummy_dg_append;
203
extern void init_dg_append PROTO_S ( ( void ) ) ;
236
extern void init_dg_append(void);
204
 
237
 
205
/* CONSTRUCTS FOR DG_APPEND_LIST */
238
/* CONSTRUCTS FOR DG_APPEND_LIST */
206
extern dg_append_list new_dg_append_list PROTO_S ( ( int ) ) ;
239
extern dg_append_list new_dg_append_list(int);
207
extern dg_append_list add_dg_append_list PROTO_S ( ( dg_append_list, dg_append, int ) ) ;
240
extern dg_append_list add_dg_append_list(dg_append_list, dg_append, int);
208
extern void init_dg_append_list PROTO_S ( ( void ) ) ;
241
extern void init_dg_append_list(void);
209
 
242
 
210
/* CONSTRUCTS FOR DG_BOUND */
243
/* CONSTRUCTS FOR DG_BOUND */
211
extern dg_bound f_dg_dynamic_bound PROTO_S ( ( dg_tag, shape ) ) ;
244
extern dg_bound f_dg_dynamic_bound(dg_tag, shape);
212
extern dg_bound f_dg_static_bound PROTO_S ( ( exp ) ) ;
245
extern dg_bound f_dg_static_bound(exp);
213
extern dg_bound f_dg_unknown_bound PROTO_S ( ( shape ) ) ;
246
extern dg_bound f_dg_unknown_bound(shape);
214
extern dg_bound f_dummy_dg_bound ;
247
extern dg_bound f_dummy_dg_bound;
215
extern void init_dg_bound PROTO_S ( ( void ) ) ;
248
extern void init_dg_bound(void);
216
 
249
 
217
/* CONSTRUCTS FOR DG_CLASS_BASE */
250
/* CONSTRUCTS FOR DG_CLASS_BASE */
218
extern dg_class_base f_make_dg_class_base PROTO_S ( ( dg_tag, dg_sourcepos_option, token_option, dg_accessibility_option, dg_virtuality_option ) ) ;
251
extern dg_class_base f_make_dg_class_base(dg_tag, dg_sourcepos_option,
-
 
252
					  token_option, dg_accessibility_option,
-
 
253
					  dg_virtuality_option);
219
extern dg_class_base f_dummy_dg_class_base ;
254
extern dg_class_base f_dummy_dg_class_base;
220
extern void init_dg_class_base PROTO_S ( ( void ) ) ;
255
extern void init_dg_class_base(void);
221
 
256
 
222
/* CONSTRUCTS FOR DG_CLASS_BASE_LIST */
257
/* CONSTRUCTS FOR DG_CLASS_BASE_LIST */
223
extern dg_class_base_list new_dg_class_base_list PROTO_S ( ( int ) ) ;
258
extern dg_class_base_list new_dg_class_base_list(int);
224
extern dg_class_base_list add_dg_class_base_list PROTO_S ( ( dg_class_base_list, dg_class_base, int ) ) ;
259
extern dg_class_base_list add_dg_class_base_list(dg_class_base_list,
-
 
260
						 dg_class_base, int);
225
extern void init_dg_class_base_list PROTO_S ( ( void ) ) ;
261
extern void init_dg_class_base_list(void);
226
 
262
 
227
/* CONSTRUCTS FOR DG_CLASSMEM */
263
/* CONSTRUCTS FOR DG_CLASSMEM */
228
extern dg_classmem f_dg_tag_classmem PROTO_S ( ( dg_tag, dg_classmem ) ) ;
264
extern dg_classmem f_dg_tag_classmem(dg_tag, dg_classmem);
229
extern dg_classmem f_dg_field_classmem PROTO_S ( ( dg_idname, dg_sourcepos, exp, dg_type, dg_accessibility_option, bool_option, dg_default_option ) ) ;
265
extern dg_classmem f_dg_field_classmem(dg_idname, dg_sourcepos, exp, dg_type,
-
 
266
				       dg_accessibility_option, bool_option,
-
 
267
				       dg_default_option);
230
extern dg_classmem f_dg_function_classmem PROTO_S ( ( dg_name, exp_option ) ) ;
268
extern dg_classmem f_dg_function_classmem(dg_name, exp_option);
231
extern dg_classmem f_dg_indirect_classmem PROTO_S ( ( dg_idname, dg_sourcepos, token, dg_type ) ) ;
269
extern dg_classmem f_dg_indirect_classmem(dg_idname, dg_sourcepos, token,
-
 
270
					  dg_type);
232
extern dg_classmem f_dg_name_classmem PROTO_S ( ( dg_name ) ) ;
271
extern dg_classmem f_dg_name_classmem(dg_name);
233
extern dg_classmem f_dummy_dg_classmem ;
272
extern dg_classmem f_dummy_dg_classmem;
234
extern void init_dg_classmem PROTO_S ( ( void ) ) ;
273
extern void init_dg_classmem(void);
235
 
274
 
236
/* CONSTRUCTS FOR DG_CLASSMEM_LIST */
275
/* CONSTRUCTS FOR DG_CLASSMEM_LIST */
237
extern dg_classmem_list new_dg_classmem_list PROTO_S ( ( int ) ) ;
276
extern dg_classmem_list new_dg_classmem_list(int);
238
extern dg_classmem_list add_dg_classmem_list PROTO_S ( ( dg_classmem_list, dg_classmem, int ) ) ;
277
extern dg_classmem_list add_dg_classmem_list(dg_classmem_list, dg_classmem,
-
 
278
					     int);
239
extern void init_dg_classmem_list PROTO_S ( ( void ) ) ;
279
extern void init_dg_classmem_list(void);
240
 
280
 
241
/* CONSTRUCTS FOR DG_COMP_PROPS */
281
/* CONSTRUCTS FOR DG_COMP_PROPS */
242
extern dg_comp_props f_make_dg_compunit PROTO_S ( ( tdfint, dg_compilation, dg_append_list ) ) ;
282
extern dg_comp_props f_make_dg_compunit(tdfint, dg_compilation, dg_append_list);
243
extern dg_comp_props f_dummy_dg_comp_props ;
283
extern dg_comp_props f_dummy_dg_comp_props;
244
extern void init_dg_comp_props PROTO_S ( ( void ) ) ;
284
extern void init_dg_comp_props(void);
245
 
285
 
246
/* CONSTRUCTS FOR DG_COMPILATION */
286
/* CONSTRUCTS FOR DG_COMPILATION */
247
extern dg_compilation f_dg_tag_compilation PROTO_S ( ( dg_tag, dg_compilation ) ) ;
287
extern dg_compilation f_dg_tag_compilation(dg_tag, dg_compilation);
248
extern dg_compilation f_make_dg_compilation PROTO_S ( ( dg_filename, string_list, dg_macro_list, dg_filename, nat, nat, nat, string, string_list, dg_namelist ) ) ;
288
extern dg_compilation f_make_dg_compilation(dg_filename, string_list,
-
 
289
					    dg_macro_list, dg_filename, nat,
-
 
290
					    nat, nat, string, string_list,
-
 
291
					    dg_namelist);
249
extern dg_compilation f_dummy_dg_compilation ;
292
extern dg_compilation f_dummy_dg_compilation;
250
extern void init_dg_compilation PROTO_S ( ( void ) ) ;
293
extern void init_dg_compilation(void);
251
 
294
 
252
/* CONSTRUCTS FOR DG_CONSTRAINT */
295
/* CONSTRUCTS FOR DG_CONSTRAINT */
253
extern dg_constraint f_dg_type_constraint PROTO_S ( ( dg_tag_option, dg_type ) ) ;
296
extern dg_constraint f_dg_type_constraint(dg_tag_option, dg_type);
254
extern dg_constraint f_dg_value_constraint PROTO_S ( ( dg_tag_option, exp ) ) ;
297
extern dg_constraint f_dg_value_constraint(dg_tag_option, exp);
255
extern dg_constraint f_dummy_dg_constraint ;
298
extern dg_constraint f_dummy_dg_constraint;
256
extern void init_dg_constraint PROTO_S ( ( void ) ) ;
299
extern void init_dg_constraint(void);
257
 
300
 
258
/* CONSTRUCTS FOR DG_CONSTRAINT_LIST */
301
/* CONSTRUCTS FOR DG_CONSTRAINT_LIST */
259
extern dg_constraint_list new_dg_constraint_list PROTO_S ( ( int ) ) ;
302
extern dg_constraint_list new_dg_constraint_list(int);
260
extern dg_constraint_list add_dg_constraint_list PROTO_S ( ( dg_constraint_list, dg_constraint, int ) ) ;
303
extern dg_constraint_list add_dg_constraint_list(dg_constraint_list,
-
 
304
						 dg_constraint, int);
261
extern void init_dg_constraint_list PROTO_S ( ( void ) ) ;
305
extern void init_dg_constraint_list(void);
262
 
306
 
263
/* CONSTRUCTS FOR DG_CONSTRAINT_LIST_OPTION */
307
/* CONSTRUCTS FOR DG_CONSTRAINT_LIST_OPTION */
264
extern dg_constraint_list_option yes_dg_constraint_list_option PROTO_S ( ( dg_constraint_list ) ) ;
308
extern dg_constraint_list_option yes_dg_constraint_list_option(dg_constraint_list);
265
extern dg_constraint_list_option no_dg_constraint_list_option ;
309
extern dg_constraint_list_option no_dg_constraint_list_option;
266
extern void init_dg_constraint_list_option PROTO_S ( ( void ) ) ;
310
extern void init_dg_constraint_list_option(void);
267
 
311
 
268
/* CONSTRUCTS FOR DG_DEFAULT */
312
/* CONSTRUCTS FOR DG_DEFAULT */
269
extern dg_default f_make_dg_default PROTO_S ( ( exp_option, dg_sourcepos_option ) ) ;
313
extern dg_default f_make_dg_default(exp_option, dg_sourcepos_option);
270
extern dg_default f_dummy_dg_default ;
314
extern dg_default f_dummy_dg_default;
271
extern void init_dg_default PROTO_S ( ( void ) ) ;
315
extern void init_dg_default(void);
272
 
316
 
273
/* CONSTRUCTS FOR DG_DEFAULT_OPTION */
317
/* CONSTRUCTS FOR DG_DEFAULT_OPTION */
274
extern dg_default_option yes_dg_default_option PROTO_S ( ( dg_default ) ) ;
318
extern dg_default_option yes_dg_default_option(dg_default);
275
extern dg_default_option no_dg_default_option ;
319
extern dg_default_option no_dg_default_option;
276
extern void init_dg_default_option PROTO_S ( ( void ) ) ;
320
extern void init_dg_default_option(void);
277
 
321
 
278
/* CONSTRUCTS FOR DG_DIM */
322
/* CONSTRUCTS FOR DG_DIM */
279
extern dg_dim f_dg_dim_apply_token PROTO_S ( ( token, bitstream ) ) ;
323
extern dg_dim f_dg_dim_apply_token(token, bitstream);
280
extern dg_dim f_dg_tag_dim PROTO_S ( ( dg_tag, dg_dim ) ) ;
324
extern dg_dim f_dg_tag_dim(dg_tag, dg_dim);
281
extern dg_dim f_dg_bounds_dim PROTO_S ( ( dg_bound, dg_bound, dg_type ) ) ;
325
extern dg_dim f_dg_bounds_dim(dg_bound, dg_bound, dg_type);
282
extern dg_dim f_dg_count_dim PROTO_S ( ( dg_bound, dg_bound, dg_type ) ) ;
326
extern dg_dim f_dg_count_dim(dg_bound, dg_bound, dg_type);
283
extern dg_dim f_dg_type_dim PROTO_S ( ( dg_type, nat_option ) ) ;
327
extern dg_dim f_dg_type_dim(dg_type, nat_option);
284
extern dg_dim f_dg_unspecified_dim ;
328
extern dg_dim f_dg_unspecified_dim;
285
extern dg_dim f_dummy_dg_dim ;
329
extern dg_dim f_dummy_dg_dim;
286
extern void init_dg_dim PROTO_S ( ( void ) ) ;
330
extern void init_dg_dim(void);
287
 
331
 
288
/* CONSTRUCTS FOR DG_DIM_LIST */
332
/* CONSTRUCTS FOR DG_DIM_LIST */
289
extern dg_dim_list new_dg_dim_list PROTO_S ( ( int ) ) ;
333
extern dg_dim_list new_dg_dim_list(int);
290
extern dg_dim_list add_dg_dim_list PROTO_S ( ( dg_dim_list, dg_dim, int ) ) ;
334
extern dg_dim_list add_dg_dim_list(dg_dim_list, dg_dim, int);
291
extern void init_dg_dim_list PROTO_S ( ( void ) ) ;
335
extern void init_dg_dim_list(void);
292
 
336
 
293
/* CONSTRUCTS FOR DG_DIM_OPTION */
337
/* CONSTRUCTS FOR DG_DIM_OPTION */
294
extern dg_dim_option yes_dg_dim_option PROTO_S ( ( dg_dim ) ) ;
338
extern dg_dim_option yes_dg_dim_option(dg_dim);
295
extern dg_dim_option no_dg_dim_option ;
339
extern dg_dim_option no_dg_dim_option;
296
extern void init_dg_dim_option PROTO_S ( ( void ) ) ;
340
extern void init_dg_dim_option(void);
297
 
341
 
298
/* CONSTRUCTS FOR DG_DISCRIM */
342
/* CONSTRUCTS FOR DG_DISCRIM */
299
extern dg_discrim f_make_dg_discrim PROTO_S ( ( exp, exp ) ) ;
343
extern dg_discrim f_make_dg_discrim(exp, exp);
300
extern dg_discrim f_dummy_dg_discrim ;
344
extern dg_discrim f_dummy_dg_discrim;
301
extern void init_dg_discrim PROTO_S ( ( void ) ) ;
345
extern void init_dg_discrim(void);
302
 
346
 
303
/* CONSTRUCTS FOR DG_DISCRIM_LIST */
347
/* CONSTRUCTS FOR DG_DISCRIM_LIST */
304
extern dg_discrim_list new_dg_discrim_list PROTO_S ( ( int ) ) ;
348
extern dg_discrim_list new_dg_discrim_list(int);
305
extern dg_discrim_list add_dg_discrim_list PROTO_S ( ( dg_discrim_list, dg_discrim, int ) ) ;
349
extern dg_discrim_list add_dg_discrim_list(dg_discrim_list, dg_discrim, int);
306
extern void init_dg_discrim_list PROTO_S ( ( void ) ) ;
350
extern void init_dg_discrim_list(void);
307
 
351
 
308
/* CONSTRUCTS FOR DG_ENUM */
352
/* CONSTRUCTS FOR DG_ENUM */
309
extern dg_enum f_dg_tag_enum PROTO_S ( ( dg_tag, dg_enum ) ) ;
353
extern dg_enum f_dg_tag_enum(dg_tag, dg_enum);
310
extern dg_enum f_make_dg_enum PROTO_S ( ( exp, dg_idname, dg_sourcepos ) ) ;
354
extern dg_enum f_make_dg_enum(exp, dg_idname, dg_sourcepos);
311
extern dg_enum f_dg_char_enum PROTO_S ( ( exp, nat, dg_sourcepos ) ) ;
355
extern dg_enum f_dg_char_enum(exp, nat, dg_sourcepos);
312
extern dg_enum f_dummy_dg_enum ;
356
extern dg_enum f_dummy_dg_enum;
313
extern void init_dg_enum PROTO_S ( ( void ) ) ;
357
extern void init_dg_enum(void);
314
 
358
 
315
/* CONSTRUCTS FOR DG_ENUM_LIST */
359
/* CONSTRUCTS FOR DG_ENUM_LIST */
316
extern dg_enum_list new_dg_enum_list PROTO_S ( ( int ) ) ;
360
extern dg_enum_list new_dg_enum_list(int);
317
extern dg_enum_list add_dg_enum_list PROTO_S ( ( dg_enum_list, dg_enum, int ) ) ;
361
extern dg_enum_list add_dg_enum_list(dg_enum_list, dg_enum, int);
318
extern void init_dg_enum_list PROTO_S ( ( void ) ) ;
362
extern void init_dg_enum_list(void);
319
 
363
 
320
/* CONSTRUCTS FOR DG_FILENAME */
364
/* CONSTRUCTS FOR DG_FILENAME */
321
extern dg_filename f_dg_filename_apply_token PROTO_S ( ( token, bitstream ) ) ;
365
extern dg_filename f_dg_filename_apply_token(token, bitstream);
322
extern dg_filename f_make_dg_filename PROTO_S ( ( nat, string, string, string ) ) ;
366
extern dg_filename f_make_dg_filename(nat, string, string, string);
323
extern dg_filename f_dummy_dg_filename ;
367
extern dg_filename f_dummy_dg_filename;
324
extern void init_dg_filename PROTO_S ( ( void ) ) ;
368
extern void init_dg_filename(void);
325
 
369
 
326
/* CONSTRUCTS FOR DG_FILENAME_OPTION */
370
/* CONSTRUCTS FOR DG_FILENAME_OPTION */
327
extern dg_filename_option yes_dg_filename_option PROTO_S ( ( dg_filename ) ) ;
371
extern dg_filename_option yes_dg_filename_option(dg_filename);
328
extern dg_filename_option no_dg_filename_option ;
372
extern dg_filename_option no_dg_filename_option;
329
extern void init_dg_filename_option PROTO_S ( ( void ) ) ;
373
extern void init_dg_filename_option(void);
330
 
374
 
331
/* CONSTRUCTS FOR DG_IDNAME */
375
/* CONSTRUCTS FOR DG_IDNAME */
332
extern dg_idname f_dg_idname_apply_token PROTO_S ( ( token, bitstream ) ) ;
376
extern dg_idname f_dg_idname_apply_token(token, bitstream);
333
extern dg_idname f_dg_anonymous_idname PROTO_S ( ( string_option ) ) ;
377
extern dg_idname f_dg_anonymous_idname(string_option);
334
extern dg_idname f_dg_artificial_idname PROTO_S ( ( string_option ) ) ;
378
extern dg_idname f_dg_artificial_idname(string_option);
335
extern dg_idname f_dg_external_idname PROTO_S ( ( string ) ) ;
379
extern dg_idname f_dg_external_idname(string);
336
extern dg_idname f_dg_instance_idname PROTO_S ( ( dg_idname_option, dg_idname, dg_sourcepos, dg_name_list ) ) ;
380
extern dg_idname f_dg_instance_idname(dg_idname_option, dg_idname, dg_sourcepos,
-
 
381
				      dg_name_list);
337
extern dg_idname f_dg_sourcestring_idname PROTO_S ( ( string ) ) ;
382
extern dg_idname f_dg_sourcestring_idname(string);
338
extern dg_idname f_dummy_dg_idname ;
383
extern dg_idname f_dummy_dg_idname;
339
extern void init_dg_idname PROTO_S ( ( void ) ) ;
384
extern void init_dg_idname(void);
340
 
385
 
341
/* CONSTRUCTS FOR DG_IDNAME_LIST */
386
/* CONSTRUCTS FOR DG_IDNAME_LIST */
342
extern dg_idname_list new_dg_idname_list PROTO_S ( ( int ) ) ;
387
extern dg_idname_list new_dg_idname_list(int);
343
extern dg_idname_list add_dg_idname_list PROTO_S ( ( dg_idname_list, dg_idname, int ) ) ;
388
extern dg_idname_list add_dg_idname_list(dg_idname_list, dg_idname, int);
344
extern void init_dg_idname_list PROTO_S ( ( void ) ) ;
389
extern void init_dg_idname_list(void);
345
 
390
 
346
/* CONSTRUCTS FOR DG_IDNAME_OPTION */
391
/* CONSTRUCTS FOR DG_IDNAME_OPTION */
347
extern dg_idname_option yes_dg_idname_option PROTO_S ( ( dg_idname ) ) ;
392
extern dg_idname_option yes_dg_idname_option(dg_idname);
348
extern dg_idname_option no_dg_idname_option ;
393
extern dg_idname_option no_dg_idname_option;
349
extern void init_dg_idname_option PROTO_S ( ( void ) ) ;
394
extern void init_dg_idname_option(void);
350
 
395
 
351
/* CONSTRUCTS FOR DG_LIST */
396
/* CONSTRUCTS FOR DG_LIST */
352
extern dg_list new_dg_list PROTO_S ( ( int ) ) ;
397
extern dg_list new_dg_list(int);
353
extern dg_list add_dg_list PROTO_S ( ( dg_list, dg, int ) ) ;
398
extern dg_list add_dg_list(dg_list, dg, int);
354
extern void init_dg_list PROTO_S ( ( void ) ) ;
399
extern void init_dg_list(void);
355
 
400
 
356
/* CONSTRUCTS FOR DG_MACRO */
401
/* CONSTRUCTS FOR DG_MACRO */
357
extern dg_macro f_dg_function_macro PROTO_S ( ( dg_sourcepos, dg_idname, dg_idname_list, string ) ) ;
402
extern dg_macro f_dg_function_macro(dg_sourcepos, dg_idname, dg_idname_list,
-
 
403
				    string);
358
extern dg_macro f_dg_include_macro PROTO_S ( ( dg_sourcepos, dg_filename, dg_macro_list ) ) ;
404
extern dg_macro f_dg_include_macro(dg_sourcepos, dg_filename, dg_macro_list);
359
extern dg_macro f_dg_object_macro PROTO_S ( ( dg_sourcepos, dg_idname, string ) ) ;
405
extern dg_macro f_dg_object_macro(dg_sourcepos, dg_idname, string);
360
extern dg_macro f_dg_undef_macro PROTO_S ( ( dg_sourcepos, dg_idname ) ) ;
406
extern dg_macro f_dg_undef_macro(dg_sourcepos, dg_idname);
361
extern dg_macro f_dummy_dg_macro ;
407
extern dg_macro f_dummy_dg_macro;
362
extern void init_dg_macro PROTO_S ( ( void ) ) ;
408
extern void init_dg_macro(void);
363
 
409
 
364
/* CONSTRUCTS FOR DG_MACRO_LIST */
410
/* CONSTRUCTS FOR DG_MACRO_LIST */
365
extern dg_macro_list new_dg_macro_list PROTO_S ( ( int ) ) ;
411
extern dg_macro_list new_dg_macro_list(int);
366
extern dg_macro_list add_dg_macro_list PROTO_S ( ( dg_macro_list, dg_macro, int ) ) ;
412
extern dg_macro_list add_dg_macro_list(dg_macro_list, dg_macro, int);
367
extern void init_dg_macro_list PROTO_S ( ( void ) ) ;
413
extern void init_dg_macro_list(void);
368
 
414
 
369
/* CONSTRUCTS FOR DG_NAME */
415
/* CONSTRUCTS FOR DG_NAME */
370
extern dg_name f_dg_name_apply_token PROTO_S ( ( token, bitstream ) ) ;
416
extern dg_name f_dg_name_apply_token(token, bitstream);
371
extern dg_name f_dg_tag_name PROTO_S ( ( dg_tag, dg_name ) ) ;
417
extern dg_name f_dg_tag_name(dg_tag, dg_name);
372
extern dg_name f_dg_constant_name PROTO_S ( ( dg_name ) ) ;
418
extern dg_name f_dg_constant_name(dg_name);
373
extern dg_name f_dg_entry_family_name PROTO_S ( ( dg_name, dg_dim ) ) ;
419
extern dg_name f_dg_entry_family_name(dg_name, dg_dim);
374
extern dg_name f_dg_entry_name PROTO_S ( ( dg_idname, dg_sourcepos, dg_type, dg_accessibility_option, dg_dim_option ) ) ;
420
extern dg_name f_dg_entry_name(dg_idname, dg_sourcepos, dg_type,
-
 
421
			       dg_accessibility_option, dg_dim_option);
375
extern dg_name f_dg_inlined_name PROTO_S ( ( dg_name, dg_tag ) ) ;
422
extern dg_name f_dg_inlined_name(dg_name, dg_tag);
376
extern dg_name f_dg_is_spec_name PROTO_S ( ( dg_name, bool_option ) ) ;
423
extern dg_name f_dg_is_spec_name(dg_name, bool_option);
377
extern dg_name f_dg_module_name PROTO_S ( ( dg_idname, dg_sourcepos, dg_namelist, exp_option, dg_tag_option ) ) ;
424
extern dg_name f_dg_module_name(dg_idname, dg_sourcepos, dg_namelist,
-
 
425
				exp_option, dg_tag_option);
378
extern dg_name f_dg_namespace_name PROTO_S ( ( dg_idname, dg_sourcepos, dg_namelist ) ) ;
426
extern dg_name f_dg_namespace_name(dg_idname, dg_sourcepos, dg_namelist);
379
extern dg_name f_dg_object_name PROTO_S ( ( dg_idname, dg_sourcepos, dg_type, exp_option, dg_accessibility_option ) ) ;
427
extern dg_name f_dg_object_name(dg_idname, dg_sourcepos, dg_type, exp_option,
-
 
428
				dg_accessibility_option);
380
extern dg_name f_dg_proc_name PROTO_S ( ( dg_idname, dg_sourcepos, dg_type, exp_option, dg_accessibility_option, dg_virtuality_option, bool, dg_type_list_option, dg_tag_option ) ) ;
429
extern dg_name f_dg_proc_name(dg_idname, dg_sourcepos, dg_type, exp_option,
-
 
430
			      dg_accessibility_option, dg_virtuality_option,
-
 
431
			      bool, dg_type_list_option, dg_tag_option);
381
extern dg_name f_dg_program_name PROTO_S ( ( dg_idname, dg_sourcepos, exp ) ) ;
432
extern dg_name f_dg_program_name(dg_idname, dg_sourcepos, exp);
382
extern dg_name f_dg_rep_clause_name PROTO_S ( ( dg_name, exp ) ) ;
433
extern dg_name f_dg_rep_clause_name(dg_name, exp);
383
extern dg_name f_dg_spec_ref_name PROTO_S ( ( dg_tag, dg_name ) ) ;
434
extern dg_name f_dg_spec_ref_name(dg_tag, dg_name);
384
extern dg_name f_dg_subunit_name PROTO_S ( ( dg_tag, dg_name, nat, dg_accessibility_option ) ) ;
435
extern dg_name f_dg_subunit_name(dg_tag, dg_name, nat, dg_accessibility_option);
385
extern dg_name f_dg_type_name PROTO_S ( ( dg_idname_option, dg_sourcepos, dg_accessibility_option, dg_type_option, bool, bool_option, dg_constraint_list_option ) ) ;
436
extern dg_name f_dg_type_name(dg_idname_option, dg_sourcepos,
-
 
437
			      dg_accessibility_option, dg_type_option, bool,
-
 
438
			      bool_option, dg_constraint_list_option);
386
extern dg_name f_dg_visibility_name PROTO_S ( ( dg_tag, nat, dg_idname_option, dg_sourcepos_option, dg_accessibility_option, dg_type_option ) ) ;
439
extern dg_name f_dg_visibility_name(dg_tag, nat, dg_idname_option,
-
 
440
				    dg_sourcepos_option,
-
 
441
				    dg_accessibility_option, dg_type_option);
387
extern dg_name f_dummy_dg_name ;
442
extern dg_name f_dummy_dg_name;
388
extern void init_dg_name PROTO_S ( ( void ) ) ;
443
extern void init_dg_name(void);
389
 
444
 
390
/* CONSTRUCTS FOR DG_NAME_LIST */
445
/* CONSTRUCTS FOR DG_NAME_LIST */
391
extern dg_name_list new_dg_name_list PROTO_S ( ( int ) ) ;
446
extern dg_name_list new_dg_name_list(int);
392
extern dg_name_list add_dg_name_list PROTO_S ( ( dg_name_list, dg_name, int ) ) ;
447
extern dg_name_list add_dg_name_list(dg_name_list, dg_name, int);
393
extern void init_dg_name_list PROTO_S ( ( void ) ) ;
448
extern void init_dg_name_list(void);
394
 
449
 
395
/* CONSTRUCTS FOR DG_NAME_OPTION */
450
/* CONSTRUCTS FOR DG_NAME_OPTION */
396
extern dg_name_option yes_dg_name_option PROTO_S ( ( dg_name ) ) ;
451
extern dg_name_option yes_dg_name_option(dg_name);
397
extern dg_name_option no_dg_name_option ;
452
extern dg_name_option no_dg_name_option;
398
extern void init_dg_name_option PROTO_S ( ( void ) ) ;
453
extern void init_dg_name_option(void);
399
 
454
 
400
/* CONSTRUCTS FOR DG_NAMELIST */
455
/* CONSTRUCTS FOR DG_NAMELIST */
401
extern dg_namelist f_dg_tag_namelist PROTO_S ( ( dg_tag, dg_namelist ) ) ;
456
extern dg_namelist f_dg_tag_namelist(dg_tag, dg_namelist);
402
extern dg_namelist f_make_dg_namelist PROTO_S ( ( dg_name_list ) ) ;
457
extern dg_namelist f_make_dg_namelist(dg_name_list);
403
extern dg_namelist f_dummy_dg_namelist ;
458
extern dg_namelist f_dummy_dg_namelist;
404
extern void init_dg_namelist PROTO_S ( ( void ) ) ;
459
extern void init_dg_namelist(void);
405
 
460
 
406
/* CONSTRUCTS FOR DG_PARAM */
461
/* CONSTRUCTS FOR DG_PARAM */
407
extern dg_param f_dg_object_param PROTO_S ( ( dg_idname_option, dg_sourcepos_option, dg_param_mode_option, dg_type, dg_default_option ) ) ;
462
extern dg_param f_dg_object_param(dg_idname_option, dg_sourcepos_option,
-
 
463
				  dg_param_mode_option, dg_type,
-
 
464
				  dg_default_option);
408
extern dg_param f_dg_type_param PROTO_S ( ( dg_idname_option, dg_sourcepos_option, dg_param_list ) ) ;
465
extern dg_param f_dg_type_param(dg_idname_option, dg_sourcepos_option,
-
 
466
				dg_param_list);
409
extern dg_param f_dummy_dg_param ;
467
extern dg_param f_dummy_dg_param;
410
extern void init_dg_param PROTO_S ( ( void ) ) ;
468
extern void init_dg_param(void);
411
 
469
 
412
/* CONSTRUCTS FOR DG_PARAM_LIST */
470
/* CONSTRUCTS FOR DG_PARAM_LIST */
413
extern dg_param_list new_dg_param_list PROTO_S ( ( int ) ) ;
471
extern dg_param_list new_dg_param_list(int);
414
extern dg_param_list add_dg_param_list PROTO_S ( ( dg_param_list, dg_param, int ) ) ;
472
extern dg_param_list add_dg_param_list(dg_param_list, dg_param, int);
415
extern void init_dg_param_list PROTO_S ( ( void ) ) ;
473
extern void init_dg_param_list(void);
416
 
474
 
417
/* CONSTRUCTS FOR DG_PARAM_MODE */
475
/* CONSTRUCTS FOR DG_PARAM_MODE */
418
extern dg_param_mode f_dg_in_mode ;
476
extern dg_param_mode f_dg_in_mode;
419
extern dg_param_mode f_dg_inout_mode ;
477
extern dg_param_mode f_dg_inout_mode;
420
extern dg_param_mode f_dg_out_mode ;
478
extern dg_param_mode f_dg_out_mode;
421
extern dg_param_mode f_dummy_dg_param_mode ;
479
extern dg_param_mode f_dummy_dg_param_mode;
422
extern void init_dg_param_mode PROTO_S ( ( void ) ) ;
480
extern void init_dg_param_mode(void);
423
 
481
 
424
/* CONSTRUCTS FOR DG_PARAM_MODE_OPTION */
482
/* CONSTRUCTS FOR DG_PARAM_MODE_OPTION */
425
extern dg_param_mode_option yes_dg_param_mode_option PROTO_S ( ( dg_param_mode ) ) ;
483
extern dg_param_mode_option yes_dg_param_mode_option(dg_param_mode);
426
extern dg_param_mode_option no_dg_param_mode_option ;
484
extern dg_param_mode_option no_dg_param_mode_option;
427
extern void init_dg_param_mode_option PROTO_S ( ( void ) ) ;
485
extern void init_dg_param_mode_option(void);
428
 
486
 
429
/* CONSTRUCTS FOR DG_QUALIFIER */
487
/* CONSTRUCTS FOR DG_QUALIFIER */
430
extern dg_qualifier f_dg_aliased_qualifier ;
488
extern dg_qualifier f_dg_aliased_qualifier;
431
extern dg_qualifier f_dg_class_wide_qualifier ;
489
extern dg_qualifier f_dg_class_wide_qualifier;
432
extern dg_qualifier f_dg_const_qualifier ;
490
extern dg_qualifier f_dg_const_qualifier;
433
extern dg_qualifier f_dg_limited_qualifier ;
491
extern dg_qualifier f_dg_limited_qualifier;
434
extern dg_qualifier f_dg_volatile_qualifier ;
492
extern dg_qualifier f_dg_volatile_qualifier;
435
extern dg_qualifier f_dummy_dg_qualifier ;
493
extern dg_qualifier f_dummy_dg_qualifier;
436
extern void init_dg_qualifier PROTO_S ( ( void ) ) ;
494
extern void init_dg_qualifier(void);
437
 
495
 
438
/* CONSTRUCTS FOR DG_SOURCEPOS */
496
/* CONSTRUCTS FOR DG_SOURCEPOS */
439
extern dg_sourcepos f_dg_file_sourcepos PROTO_S ( ( dg_filename ) ) ;
497
extern dg_sourcepos f_dg_file_sourcepos(dg_filename);
440
extern dg_sourcepos f_dg_global_sourcepos ;
498
extern dg_sourcepos f_dg_global_sourcepos;
441
extern dg_sourcepos f_dg_mark_sourcepos PROTO_S ( ( dg_filename, nat, nat ) ) ;
499
extern dg_sourcepos f_dg_mark_sourcepos(dg_filename, nat, nat);
442
extern dg_sourcepos f_dg_null_sourcepos ;
500
extern dg_sourcepos f_dg_null_sourcepos;
443
extern dg_sourcepos f_dg_span_sourcepos PROTO_S ( ( dg_filename, nat, nat, dg_filename_option, nat, nat ) ) ;
501
extern dg_sourcepos f_dg_span_sourcepos(dg_filename, nat, nat,
-
 
502
					dg_filename_option, nat, nat);
444
extern dg_sourcepos f_dummy_dg_sourcepos ;
503
extern dg_sourcepos f_dummy_dg_sourcepos;
445
extern void init_dg_sourcepos PROTO_S ( ( void ) ) ;
504
extern void init_dg_sourcepos(void);
446
 
505
 
447
/* CONSTRUCTS FOR DG_SOURCEPOS_OPTION */
506
/* CONSTRUCTS FOR DG_SOURCEPOS_OPTION */
448
extern dg_sourcepos_option yes_dg_sourcepos_option PROTO_S ( ( dg_sourcepos ) ) ;
507
extern dg_sourcepos_option yes_dg_sourcepos_option(dg_sourcepos);
449
extern dg_sourcepos_option no_dg_sourcepos_option ;
508
extern dg_sourcepos_option no_dg_sourcepos_option;
450
extern void init_dg_sourcepos_option PROTO_S ( ( void ) ) ;
509
extern void init_dg_sourcepos_option(void);
451
 
510
 
452
/* CONSTRUCTS FOR DG_TAG */
511
/* CONSTRUCTS FOR DG_TAG */
453
extern dg_tag f_make_dg_tag PROTO_S ( ( tdfint ) ) ;
512
extern dg_tag f_make_dg_tag(tdfint);
454
extern dg_tag f_dummy_dg_tag ;
513
extern dg_tag f_dummy_dg_tag;
455
extern void init_dg_tag PROTO_S ( ( void ) ) ;
514
extern void init_dg_tag(void);
456
 
515
 
457
/* CONSTRUCTS FOR DG_TAG_LIST */
516
/* CONSTRUCTS FOR DG_TAG_LIST */
458
extern dg_tag_list new_dg_tag_list PROTO_S ( ( int ) ) ;
517
extern dg_tag_list new_dg_tag_list(int);
459
extern dg_tag_list add_dg_tag_list PROTO_S ( ( dg_tag_list, dg_tag, int ) ) ;
518
extern dg_tag_list add_dg_tag_list(dg_tag_list, dg_tag, int);
460
extern void init_dg_tag_list PROTO_S ( ( void ) ) ;
519
extern void init_dg_tag_list(void);
461
 
520
 
462
/* CONSTRUCTS FOR DG_TAG_OPTION */
521
/* CONSTRUCTS FOR DG_TAG_OPTION */
463
extern dg_tag_option yes_dg_tag_option PROTO_S ( ( dg_tag ) ) ;
522
extern dg_tag_option yes_dg_tag_option(dg_tag);
464
extern dg_tag_option no_dg_tag_option ;
523
extern dg_tag_option no_dg_tag_option;
465
extern void init_dg_tag_option PROTO_S ( ( void ) ) ;
524
extern void init_dg_tag_option(void);
466
 
525
 
467
/* CONSTRUCTS FOR DG_TYPE */
526
/* CONSTRUCTS FOR DG_TYPE */
468
extern dg_type f_dg_type_apply_token PROTO_S ( ( token, bitstream ) ) ;
527
extern dg_type f_dg_type_apply_token(token, bitstream);
469
extern dg_type f_dg_tag_type PROTO_S ( ( dg_tag, dg_type ) ) ;
528
extern dg_type f_dg_tag_type(dg_tag, dg_type);
470
extern dg_type f_dg_address_type PROTO_S ( ( dg_idname, shape ) ) ;
529
extern dg_type f_dg_address_type(dg_idname, shape);
471
extern dg_type f_dg_array_type PROTO_S ( ( dg_type, exp, bool_option, dg_dim_list ) ) ;
530
extern dg_type f_dg_array_type(dg_type, exp, bool_option, dg_dim_list);
472
extern dg_type f_dg_bitfield_type PROTO_S ( ( dg_type, bitfield_variety, shape ) ) ;
531
extern dg_type f_dg_bitfield_type(dg_type, bitfield_variety, shape);
473
extern dg_type f_dg_boolean_type PROTO_S ( ( dg_idname, variety ) ) ;
532
extern dg_type f_dg_boolean_type(dg_idname, variety);
474
extern dg_type f_dg_char_type PROTO_S ( ( dg_idname, variety ) ) ;
533
extern dg_type f_dg_char_type(dg_idname, variety);
475
extern dg_type f_dg_class_type PROTO_S ( ( dg_class_base_list, dg_classmem_list, dg_varpart_option, dg_tag_list, shape_option, dg_tag_option, dg_tag_option, dg_idname_option, dg_sourcepos_option, bool, dg_tag_option, dg_tag_option, bool, bool_option ) ) ;
534
extern dg_type f_dg_class_type(dg_class_base_list, dg_classmem_list,
-
 
535
			       dg_varpart_option, dg_tag_list, shape_option,
-
 
536
			       dg_tag_option, dg_tag_option, dg_idname_option,
-
 
537
			       dg_sourcepos_option, bool, dg_tag_option,
-
 
538
			       dg_tag_option, bool, bool_option);
476
extern dg_type f_dg_complex_float_type PROTO_S ( ( dg_idname, floating_variety ) ) ;
539
extern dg_type f_dg_complex_float_type(dg_idname, floating_variety);
477
extern dg_type f_dg_enum_type PROTO_S ( ( dg_enum_list, dg_idname_option, dg_sourcepos_option, shape, bool ) ) ;
540
extern dg_type f_dg_enum_type(dg_enum_list, dg_idname_option,
-
 
541
			      dg_sourcepos_option, shape, bool);
478
extern dg_type f_dg_file_type PROTO_S ( ( dg_type, shape ) ) ;
542
extern dg_type f_dg_file_type(dg_type, shape);
479
extern dg_type f_dg_fixed_point_type PROTO_S ( ( dg_type, exp, exp_option, exp_option ) ) ;
543
extern dg_type f_dg_fixed_point_type(dg_type, exp, exp_option, exp_option);
480
extern dg_type f_dg_float_type PROTO_S ( ( dg_idname, floating_variety ) ) ;
544
extern dg_type f_dg_float_type(dg_idname, floating_variety);
481
extern dg_type f_dg_floating_digits_type PROTO_S ( ( dg_type, exp ) ) ;
545
extern dg_type f_dg_floating_digits_type(dg_type, exp);
482
extern dg_type f_dg_inlined_type PROTO_S ( ( dg_type, dg_tag ) ) ;
546
extern dg_type f_dg_inlined_type(dg_type, dg_tag);
483
extern dg_type f_dg_integer_type PROTO_S ( ( dg_idname, variety ) ) ;
547
extern dg_type f_dg_integer_type(dg_idname, variety);
484
extern dg_type f_dg_is_spec_type PROTO_S ( ( dg_type ) ) ;
548
extern dg_type f_dg_is_spec_type(dg_type);
485
extern dg_type f_dg_modular_type PROTO_S ( ( dg_type, exp ) ) ;
549
extern dg_type f_dg_modular_type(dg_type, exp);
486
extern dg_type f_dg_named_type PROTO_S ( ( dg_tag ) ) ;
550
extern dg_type f_dg_named_type(dg_tag);
487
extern dg_type f_dg_packed_type PROTO_S ( ( dg_type, shape ) ) ;
551
extern dg_type f_dg_packed_type(dg_type, shape);
488
extern dg_type f_dg_pointer_type PROTO_S ( ( dg_type, bool_option ) ) ;
552
extern dg_type f_dg_pointer_type(dg_type, bool_option);
489
extern dg_type f_dg_proc_type PROTO_S ( ( dg_param_list, dg_type, bool_option, nat_option, nat_option, procprops_option ) ) ;
553
extern dg_type f_dg_proc_type(dg_param_list, dg_type, bool_option, nat_option,
-
 
554
			      nat_option, procprops_option);
490
extern dg_type f_dg_ptr_memdata_type PROTO_S ( ( dg_tag, dg_type, shape, dg_tag_option ) ) ;
555
extern dg_type f_dg_ptr_memdata_type(dg_tag, dg_type, shape, dg_tag_option);
491
extern dg_type f_dg_ptr_memfn_type PROTO_S ( ( dg_tag, dg_type, shape, dg_tag_option ) ) ;
556
extern dg_type f_dg_ptr_memfn_type(dg_tag, dg_type, shape, dg_tag_option);
492
extern dg_type f_dg_qualified_type PROTO_S ( ( dg_qualifier, dg_type ) ) ;
557
extern dg_type f_dg_qualified_type(dg_qualifier, dg_type);
493
extern dg_type f_dg_reference_type PROTO_S ( ( dg_type ) ) ;
558
extern dg_type f_dg_reference_type(dg_type);
494
extern dg_type f_dg_set_type PROTO_S ( ( dg_type, shape ) ) ;
559
extern dg_type f_dg_set_type(dg_type, shape);
495
extern dg_type f_dg_spec_ref_type PROTO_S ( ( dg_tag, dg_type ) ) ;
560
extern dg_type f_dg_spec_ref_type(dg_tag, dg_type);
496
extern dg_type f_dg_string_type PROTO_S ( ( dg_tag, exp, exp ) ) ;
561
extern dg_type f_dg_string_type(dg_tag, exp, exp);
497
extern dg_type f_dg_struct_type PROTO_S ( ( dg_classmem_list, shape_option, dg_idname_option, dg_sourcepos_option, dg_varpart_option, bool, bool ) ) ;
562
extern dg_type f_dg_struct_type(dg_classmem_list, shape_option,
-
 
563
				dg_idname_option, dg_sourcepos_option,
-
 
564
				dg_varpart_option, bool, bool);
498
extern dg_type f_dg_subrange_type PROTO_S ( ( dg_type, dg_bound, dg_bound ) ) ;
565
extern dg_type f_dg_subrange_type(dg_type, dg_bound, dg_bound);
499
extern dg_type f_dg_synchronous_type PROTO_S ( ( dg_idname, dg_sourcepos, dg_name_list, dg_tag, dg_classmem_list, dg_varpart_option, shape_option, bool, dg_tag_option ) ) ;
566
extern dg_type f_dg_synchronous_type(dg_idname, dg_sourcepos, dg_name_list,
-
 
567
				     dg_tag, dg_classmem_list,
-
 
568
				     dg_varpart_option, shape_option, bool,
-
 
569
				     dg_tag_option);
500
extern dg_type f_dg_task_type PROTO_S ( ( dg_idname, dg_sourcepos, dg_name_list, dg_tag, dg_tag, dg_classmem_list, dg_varpart_option, shape_option, bool, dg_tag_option ) ) ;
570
extern dg_type f_dg_task_type(dg_idname, dg_sourcepos, dg_name_list, dg_tag,
-
 
571
			      dg_tag, dg_classmem_list, dg_varpart_option,
-
 
572
			      shape_option, bool, dg_tag_option);
501
extern dg_type f_dg_unknown_type PROTO_S ( ( shape ) ) ;
573
extern dg_type f_dg_unknown_type(shape);
502
extern dg_type f_dg_void_type ;
574
extern dg_type f_dg_void_type;
503
extern dg_type f_dummy_dg_type ;
575
extern dg_type f_dummy_dg_type;
504
extern void init_dg_type PROTO_S ( ( void ) ) ;
576
extern void init_dg_type(void);
505
 
577
 
506
/* CONSTRUCTS FOR DG_TYPE_LIST */
578
/* CONSTRUCTS FOR DG_TYPE_LIST */
507
extern dg_type_list new_dg_type_list PROTO_S ( ( int ) ) ;
579
extern dg_type_list new_dg_type_list(int);
508
extern dg_type_list add_dg_type_list PROTO_S ( ( dg_type_list, dg_type, int ) ) ;
580
extern dg_type_list add_dg_type_list(dg_type_list, dg_type, int);
509
extern void init_dg_type_list PROTO_S ( ( void ) ) ;
581
extern void init_dg_type_list(void);
510
 
582
 
511
/* CONSTRUCTS FOR DG_TYPE_LIST_OPTION */
583
/* CONSTRUCTS FOR DG_TYPE_LIST_OPTION */
512
extern dg_type_list_option yes_dg_type_list_option PROTO_S ( ( dg_type_list ) ) ;
584
extern dg_type_list_option yes_dg_type_list_option(dg_type_list);
513
extern dg_type_list_option no_dg_type_list_option ;
585
extern dg_type_list_option no_dg_type_list_option;
514
extern void init_dg_type_list_option PROTO_S ( ( void ) ) ;
586
extern void init_dg_type_list_option(void);
515
 
587
 
516
/* CONSTRUCTS FOR DG_TYPE_OPTION */
588
/* CONSTRUCTS FOR DG_TYPE_OPTION */
517
extern dg_type_option yes_dg_type_option PROTO_S ( ( dg_type ) ) ;
589
extern dg_type_option yes_dg_type_option(dg_type);
518
extern dg_type_option no_dg_type_option ;
590
extern dg_type_option no_dg_type_option;
519
extern void init_dg_type_option PROTO_S ( ( void ) ) ;
591
extern void init_dg_type_option(void);
520
 
592
 
521
/* CONSTRUCTS FOR DG_VARIANT */
593
/* CONSTRUCTS FOR DG_VARIANT */
522
extern dg_variant f_make_dg_variant PROTO_S ( ( dg_discrim_list, dg_classmem_list ) ) ;
594
extern dg_variant f_make_dg_variant(dg_discrim_list, dg_classmem_list);
523
extern dg_variant f_dummy_dg_variant ;
595
extern dg_variant f_dummy_dg_variant;
524
extern void init_dg_variant PROTO_S ( ( void ) ) ;
596
extern void init_dg_variant(void);
525
 
597
 
526
/* CONSTRUCTS FOR DG_VARIANT_LIST */
598
/* CONSTRUCTS FOR DG_VARIANT_LIST */
527
extern dg_variant_list new_dg_variant_list PROTO_S ( ( int ) ) ;
599
extern dg_variant_list new_dg_variant_list(int);
528
extern dg_variant_list add_dg_variant_list PROTO_S ( ( dg_variant_list, dg_variant, int ) ) ;
600
extern dg_variant_list add_dg_variant_list(dg_variant_list, dg_variant, int);
529
extern void init_dg_variant_list PROTO_S ( ( void ) ) ;
601
extern void init_dg_variant_list(void);
530
 
602
 
531
/* CONSTRUCTS FOR DG_VARPART */
603
/* CONSTRUCTS FOR DG_VARPART */
532
extern dg_varpart f_dg_discrim_varpart PROTO_S ( ( dg_classmem, dg_variant_list ) ) ;
604
extern dg_varpart f_dg_discrim_varpart(dg_classmem, dg_variant_list);
533
extern dg_varpart f_dg_sibl_discrim_varpart PROTO_S ( ( dg_tag, dg_variant_list ) ) ;
605
extern dg_varpart f_dg_sibl_discrim_varpart(dg_tag, dg_variant_list);
534
extern dg_varpart f_dg_undiscrim_varpart PROTO_S ( ( dg_type, dg_variant_list ) ) ;
606
extern dg_varpart f_dg_undiscrim_varpart(dg_type, dg_variant_list);
535
extern dg_varpart f_dummy_dg_varpart ;
607
extern dg_varpart f_dummy_dg_varpart;
536
extern void init_dg_varpart PROTO_S ( ( void ) ) ;
608
extern void init_dg_varpart(void);
537
 
609
 
538
/* CONSTRUCTS FOR DG_VARPART_OPTION */
610
/* CONSTRUCTS FOR DG_VARPART_OPTION */
539
extern dg_varpart_option yes_dg_varpart_option PROTO_S ( ( dg_varpart ) ) ;
611
extern dg_varpart_option yes_dg_varpart_option(dg_varpart);
540
extern dg_varpart_option no_dg_varpart_option ;
612
extern dg_varpart_option no_dg_varpart_option;
541
extern void init_dg_varpart_option PROTO_S ( ( void ) ) ;
613
extern void init_dg_varpart_option(void);
542
 
614
 
543
/* CONSTRUCTS FOR DG_VIRTUALITY */
615
/* CONSTRUCTS FOR DG_VIRTUALITY */
544
extern dg_virtuality f_dg_abstract_virtuality ;
616
extern dg_virtuality f_dg_abstract_virtuality;
545
extern dg_virtuality f_dg_virtual_virtuality ;
617
extern dg_virtuality f_dg_virtual_virtuality;
546
extern dg_virtuality f_dummy_dg_virtuality ;
618
extern dg_virtuality f_dummy_dg_virtuality;
547
extern void init_dg_virtuality PROTO_S ( ( void ) ) ;
619
extern void init_dg_virtuality(void);
548
 
620
 
549
/* CONSTRUCTS FOR DG_VIRTUALITY_OPTION */
621
/* CONSTRUCTS FOR DG_VIRTUALITY_OPTION */
550
extern dg_virtuality_option yes_dg_virtuality_option PROTO_S ( ( dg_virtuality ) ) ;
622
extern dg_virtuality_option yes_dg_virtuality_option(dg_virtuality);
551
extern dg_virtuality_option no_dg_virtuality_option ;
623
extern dg_virtuality_option no_dg_virtuality_option;
552
extern void init_dg_virtuality_option PROTO_S ( ( void ) ) ;
624
extern void init_dg_virtuality_option(void);
553
 
625
 
554
/* CONSTRUCTS FOR DIAG_DESCRIPTOR */
626
/* CONSTRUCTS FOR DIAG_DESCRIPTOR */
555
extern diag_descriptor f_diag_desc_id PROTO_S ( ( tdfstring, sourcemark, exp, diag_type ) ) ;
627
extern diag_descriptor f_diag_desc_id(tdfstring, sourcemark, exp, diag_type);
556
extern diag_descriptor f_diag_desc_struct PROTO_S ( ( tdfstring, sourcemark, diag_type ) ) ;
628
extern diag_descriptor f_diag_desc_struct(tdfstring, sourcemark, diag_type);
557
extern diag_descriptor f_diag_desc_typedef PROTO_S ( ( tdfstring, sourcemark, diag_type ) ) ;
629
extern diag_descriptor f_diag_desc_typedef(tdfstring, sourcemark, diag_type);
558
extern diag_descriptor f_dummy_diag_descriptor ;
630
extern diag_descriptor f_dummy_diag_descriptor;
559
extern void init_diag_descriptor PROTO_S ( ( void ) ) ;
631
extern void init_diag_descriptor(void);
560
 
632
 
561
/* CONSTRUCTS FOR DIAG_DESCRIPTOR_LIST */
633
/* CONSTRUCTS FOR DIAG_DESCRIPTOR_LIST */
562
extern diag_descriptor_list new_diag_descriptor_list PROTO_S ( ( int ) ) ;
634
extern diag_descriptor_list new_diag_descriptor_list(int);
563
extern diag_descriptor_list add_diag_descriptor_list PROTO_S ( ( diag_descriptor_list, diag_descriptor, int ) ) ;
635
extern diag_descriptor_list add_diag_descriptor_list(diag_descriptor_list,
-
 
636
						     diag_descriptor, int);
564
extern void init_diag_descriptor_list PROTO_S ( ( void ) ) ;
637
extern void init_diag_descriptor_list(void);
565
 
638
 
566
/* CONSTRUCTS FOR DIAG_FIELD */
639
/* CONSTRUCTS FOR DIAG_FIELD */
567
extern diag_field f_make_diag_field PROTO_S ( ( tdfstring, exp, diag_type ) ) ;
640
extern diag_field f_make_diag_field(tdfstring, exp, diag_type);
568
extern diag_field f_dummy_diag_field ;
641
extern diag_field f_dummy_diag_field;
569
extern void init_diag_field PROTO_S ( ( void ) ) ;
642
extern void init_diag_field(void);
570
 
643
 
571
/* CONSTRUCTS FOR DIAG_FIELD_LIST */
644
/* CONSTRUCTS FOR DIAG_FIELD_LIST */
572
extern diag_field_list new_diag_field_list PROTO_S ( ( int ) ) ;
645
extern diag_field_list new_diag_field_list(int);
573
extern diag_field_list add_diag_field_list PROTO_S ( ( diag_field_list, diag_field, int ) ) ;
646
extern diag_field_list add_diag_field_list(diag_field_list, diag_field, int);
574
extern void init_diag_field_list PROTO_S ( ( void ) ) ;
647
extern void init_diag_field_list(void);
575
 
648
 
576
/* CONSTRUCTS FOR DIAG_TAG */
649
/* CONSTRUCTS FOR DIAG_TAG */
577
extern diag_tag f_make_diag_tag PROTO_S ( ( tdfint ) ) ;
650
extern diag_tag f_make_diag_tag(tdfint);
578
extern diag_tag f_dummy_diag_tag ;
651
extern diag_tag f_dummy_diag_tag;
579
extern void init_diag_tag PROTO_S ( ( void ) ) ;
652
extern void init_diag_tag(void);
580
 
653
 
581
/* CONSTRUCTS FOR DIAG_TAGDEF */
654
/* CONSTRUCTS FOR DIAG_TAGDEF */
582
extern diag_tagdef f_make_diag_tagdef PROTO_S ( ( tdfint, diag_type ) ) ;
655
extern diag_tagdef f_make_diag_tagdef(tdfint, diag_type);
583
extern diag_tagdef f_dummy_diag_tagdef ;
656
extern diag_tagdef f_dummy_diag_tagdef;
584
extern void init_diag_tagdef PROTO_S ( ( void ) ) ;
657
extern void init_diag_tagdef(void);
585
 
658
 
586
/* CONSTRUCTS FOR DIAG_TAGDEF_LIST */
659
/* CONSTRUCTS FOR DIAG_TAGDEF_LIST */
587
extern diag_tagdef_list new_diag_tagdef_list PROTO_S ( ( int ) ) ;
660
extern diag_tagdef_list new_diag_tagdef_list(int);
588
extern diag_tagdef_list add_diag_tagdef_list PROTO_S ( ( diag_tagdef_list, diag_tagdef, int ) ) ;
661
extern diag_tagdef_list add_diag_tagdef_list(diag_tagdef_list, diag_tagdef,
-
 
662
					     int);
589
extern void init_diag_tagdef_list PROTO_S ( ( void ) ) ;
663
extern void init_diag_tagdef_list(void);
590
 
664
 
591
/* CONSTRUCTS FOR DIAG_TQ */
665
/* CONSTRUCTS FOR DIAG_TQ */
592
extern diag_tq f_add_diag_const PROTO_S ( ( diag_tq ) ) ;
666
extern diag_tq f_add_diag_const(diag_tq);
593
extern diag_tq f_add_diag_volatile PROTO_S ( ( diag_tq ) ) ;
667
extern diag_tq f_add_diag_volatile(diag_tq);
594
extern diag_tq f_diag_tq_null ;
668
extern diag_tq f_diag_tq_null;
595
extern diag_tq f_dummy_diag_tq ;
669
extern diag_tq f_dummy_diag_tq;
596
extern void init_diag_tq PROTO_S ( ( void ) ) ;
670
extern void init_diag_tq(void);
597
 
671
 
598
/* CONSTRUCTS FOR DIAG_TYPE */
672
/* CONSTRUCTS FOR DIAG_TYPE */
599
extern diag_type f_diag_type_apply_token PROTO_S ( ( token, bitstream ) ) ;
673
extern diag_type f_diag_type_apply_token(token, bitstream);
600
extern diag_type f_diag_array PROTO_S ( ( diag_type, exp, exp, exp, diag_type ) ) ;
674
extern diag_type f_diag_array(diag_type, exp, exp, exp, diag_type);
601
extern diag_type f_diag_bitfield PROTO_S ( ( diag_type, nat ) ) ;
675
extern diag_type f_diag_bitfield(diag_type, nat);
602
extern diag_type f_diag_enum PROTO_S ( ( diag_type, tdfstring, enum_values_list ) ) ;
676
extern diag_type f_diag_enum(diag_type, tdfstring, enum_values_list);
603
extern diag_type f_diag_floating_variety PROTO_S ( ( floating_variety ) ) ;
677
extern diag_type f_diag_floating_variety(floating_variety);
604
extern diag_type f_diag_loc PROTO_S ( ( diag_type, diag_tq ) ) ;
678
extern diag_type f_diag_loc(diag_type, diag_tq);
605
extern diag_type f_diag_proc PROTO_S ( ( diag_type_list, bool, diag_type ) ) ;
679
extern diag_type f_diag_proc(diag_type_list, bool, diag_type);
606
extern diag_type f_diag_ptr PROTO_S ( ( diag_type, diag_tq ) ) ;
680
extern diag_type f_diag_ptr(diag_type, diag_tq);
607
extern diag_type f_diag_struct PROTO_S ( ( shape, tdfstring, diag_field_list ) ) ;
681
extern diag_type f_diag_struct(shape, tdfstring, diag_field_list);
608
extern diag_type f_diag_type_null ;
682
extern diag_type f_diag_type_null;
609
extern diag_type f_diag_union PROTO_S ( ( shape, tdfstring, diag_field_list ) ) ;
683
extern diag_type f_diag_union(shape, tdfstring, diag_field_list);
610
extern diag_type f_diag_variety PROTO_S ( ( variety ) ) ;
684
extern diag_type f_diag_variety(variety);
611
extern diag_type f_use_diag_tag PROTO_S ( ( diag_tag ) ) ;
685
extern diag_type f_use_diag_tag(diag_tag);
612
extern diag_type f_dummy_diag_type ;
686
extern diag_type f_dummy_diag_type;
613
extern void init_diag_type PROTO_S ( ( void ) ) ;
687
extern void init_diag_type(void);
614
 
688
 
615
/* CONSTRUCTS FOR DIAG_TYPE_LIST */
689
/* CONSTRUCTS FOR DIAG_TYPE_LIST */
616
extern diag_type_list new_diag_type_list PROTO_S ( ( int ) ) ;
690
extern diag_type_list new_diag_type_list(int);
617
extern diag_type_list add_diag_type_list PROTO_S ( ( diag_type_list, diag_type, int ) ) ;
691
extern diag_type_list add_diag_type_list(diag_type_list, diag_type, int);
618
extern void init_diag_type_list PROTO_S ( ( void ) ) ;
692
extern void init_diag_type_list(void);
619
 
693
 
620
/* CONSTRUCTS FOR DIAG_TYPE_UNIT */
694
/* CONSTRUCTS FOR DIAG_TYPE_UNIT */
621
extern diag_type_unit f_build_diagtype_unit PROTO_S ( ( tdfint, diag_tagdef_list ) ) ;
695
extern diag_type_unit f_build_diagtype_unit(tdfint, diag_tagdef_list);
622
extern diag_type_unit f_dummy_diag_type_unit ;
696
extern diag_type_unit f_dummy_diag_type_unit;
623
extern void init_diag_type_unit PROTO_S ( ( void ) ) ;
697
extern void init_diag_type_unit(void);
624
 
698
 
625
/* CONSTRUCTS FOR DIAG_UNIT */
699
/* CONSTRUCTS FOR DIAG_UNIT */
626
extern diag_unit f_build_diag_unit PROTO_S ( ( tdfint, diag_descriptor_list ) ) ;
700
extern diag_unit f_build_diag_unit(tdfint, diag_descriptor_list);
627
extern diag_unit f_dummy_diag_unit ;
701
extern diag_unit f_dummy_diag_unit;
628
extern void init_diag_unit PROTO_S ( ( void ) ) ;
702
extern void init_diag_unit(void);
629
 
703
 
630
/* CONSTRUCTS FOR ENUM_VALUES */
704
/* CONSTRUCTS FOR ENUM_VALUES */
631
extern enum_values f_make_enum_values PROTO_S ( ( exp, tdfstring ) ) ;
705
extern enum_values f_make_enum_values(exp, tdfstring);
632
extern enum_values f_dummy_enum_values ;
706
extern enum_values f_dummy_enum_values;
633
extern void init_enum_values PROTO_S ( ( void ) ) ;
707
extern void init_enum_values(void);
634
 
708
 
635
/* CONSTRUCTS FOR ENUM_VALUES_LIST */
709
/* CONSTRUCTS FOR ENUM_VALUES_LIST */
636
extern enum_values_list new_enum_values_list PROTO_S ( ( int ) ) ;
710
extern enum_values_list new_enum_values_list(int);
637
extern enum_values_list add_enum_values_list PROTO_S ( ( enum_values_list, enum_values, int ) ) ;
711
extern enum_values_list add_enum_values_list(enum_values_list, enum_values,
-
 
712
					     int);
638
extern void init_enum_values_list PROTO_S ( ( void ) ) ;
713
extern void init_enum_values_list(void);
639
 
714
 
640
/* CONSTRUCTS FOR ERROR_CODE */
715
/* CONSTRUCTS FOR ERROR_CODE */
641
extern error_code f_nil_access ;
716
extern error_code f_nil_access;
642
extern error_code f_overflow ;
717
extern error_code f_overflow;
643
extern error_code f_stack_overflow ;
718
extern error_code f_stack_overflow;
644
extern error_code f_dummy_error_code ;
719
extern error_code f_dummy_error_code;
645
extern void init_error_code PROTO_S ( ( void ) ) ;
720
extern void init_error_code(void);
646
 
721
 
647
/* CONSTRUCTS FOR ERROR_CODE_LIST */
722
/* CONSTRUCTS FOR ERROR_CODE_LIST */
648
extern error_code_list new_error_code_list PROTO_S ( ( int ) ) ;
723
extern error_code_list new_error_code_list(int);
649
extern error_code_list add_error_code_list PROTO_S ( ( error_code_list, error_code, int ) ) ;
724
extern error_code_list add_error_code_list(error_code_list, error_code, int);
650
extern void init_error_code_list PROTO_S ( ( void ) ) ;
725
extern void init_error_code_list(void);
651
 
726
 
652
/* CONSTRUCTS FOR ERROR_TREATMENT */
727
/* CONSTRUCTS FOR ERROR_TREATMENT */
653
extern error_treatment f_errt_apply_token PROTO_S ( ( token, bitstream ) ) ;
728
extern error_treatment f_errt_apply_token(token, bitstream);
654
extern error_treatment f_errt_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
729
extern error_treatment f_errt_cond(exp, bitstream, bitstream);
655
extern error_treatment f_continue ;
730
extern error_treatment f_continue;
656
extern error_treatment f_error_jump PROTO_S ( ( label ) ) ;
731
extern error_treatment f_error_jump(label);
657
extern error_treatment f_trap PROTO_S ( ( error_code_list ) ) ;
732
extern error_treatment f_trap(error_code_list);
658
extern error_treatment f_wrap ;
733
extern error_treatment f_wrap;
659
extern error_treatment f_impossible ;
734
extern error_treatment f_impossible;
660
extern error_treatment f_dummy_error_treatment ;
735
extern error_treatment f_dummy_error_treatment;
661
extern void init_error_treatment PROTO_S ( ( void ) ) ;
736
extern void init_error_treatment(void);
662
 
737
 
663
/* CONSTRUCTS FOR EXP */
738
/* CONSTRUCTS FOR EXP */
791
 
872
 
792
/* CONSTRUCTS FOR EXP_LIST */
873
/* CONSTRUCTS FOR EXP_LIST */
793
extern exp_list new_exp_list PROTO_S ( ( int ) ) ;
874
extern exp_list new_exp_list(int);
794
extern exp_list add_exp_list PROTO_S ( ( exp_list, exp, int ) ) ;
875
extern exp_list add_exp_list(exp_list, exp, int);
795
extern void init_exp_list PROTO_S ( ( void ) ) ;
876
extern void init_exp_list(void);
796
 
877
 
797
/* CONSTRUCTS FOR EXP_OPTION */
878
/* CONSTRUCTS FOR EXP_OPTION */
798
extern exp_option yes_exp_option PROTO_S ( ( exp ) ) ;
879
extern exp_option yes_exp_option(exp);
799
extern exp_option no_exp_option ;
880
extern exp_option no_exp_option;
800
extern void init_exp_option PROTO_S ( ( void ) ) ;
881
extern void init_exp_option(void);
801
 
882
 
802
/* CONSTRUCTS FOR EXTERN_LINK */
883
/* CONSTRUCTS FOR EXTERN_LINK */
803
extern extern_link f_make_extern_link PROTO_S ( ( linkextern_list ) ) ;
884
extern extern_link f_make_extern_link(linkextern_list);
804
extern extern_link f_dummy_extern_link ;
885
extern extern_link f_dummy_extern_link;
805
extern void init_extern_link PROTO_S ( ( void ) ) ;
886
extern void init_extern_link(void);
806
 
887
 
807
/* CONSTRUCTS FOR EXTERN_LINK_LIST */
888
/* CONSTRUCTS FOR EXTERN_LINK_LIST */
808
extern extern_link_list new_extern_link_list PROTO_S ( ( int ) ) ;
889
extern extern_link_list new_extern_link_list(int);
809
extern extern_link_list add_extern_link_list PROTO_S ( ( extern_link_list, extern_link, int ) ) ;
890
extern extern_link_list add_extern_link_list(extern_link_list, extern_link,
-
 
891
					     int);
810
extern void init_extern_link_list PROTO_S ( ( void ) ) ;
892
extern void init_extern_link_list(void);
811
 
893
 
812
/* CONSTRUCTS FOR EXTERNAL */
894
/* CONSTRUCTS FOR EXTERNAL */
813
extern external f_string_extern PROTO_S ( ( tdfident ) ) ;
895
extern external f_string_extern(tdfident);
814
extern external f_unique_extern PROTO_S ( ( unique ) ) ;
896
extern external f_unique_extern(unique);
815
extern external f_chain_extern PROTO_S ( ( tdfident, tdfint ) ) ;
897
extern external f_chain_extern(tdfident, tdfint);
816
extern external f_dummy_external ;
898
extern external f_dummy_external;
817
extern void init_external PROTO_S ( ( void ) ) ;
899
extern void init_external(void);
818
 
900
 
819
/* CONSTRUCTS FOR FILENAME */
901
/* CONSTRUCTS FOR FILENAME */
820
extern filename f_filename_apply_token PROTO_S ( ( token, bitstream ) ) ;
902
extern filename f_filename_apply_token(token, bitstream);
821
extern filename f_make_filename PROTO_S ( ( nat, tdfstring, tdfstring ) ) ;
903
extern filename f_make_filename(nat, tdfstring, tdfstring);
822
extern filename f_dummy_filename ;
904
extern filename f_dummy_filename;
823
extern void init_filename PROTO_S ( ( void ) ) ;
905
extern void init_filename(void);
824
 
906
 
825
/* CONSTRUCTS FOR FLOATING_VARIETY */
907
/* CONSTRUCTS FOR FLOATING_VARIETY */
826
extern floating_variety f_flvar_apply_token PROTO_S ( ( token, bitstream ) ) ;
908
extern floating_variety f_flvar_apply_token(token, bitstream);
827
extern floating_variety f_flvar_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
909
extern floating_variety f_flvar_cond(exp, bitstream, bitstream);
828
extern floating_variety f_flvar_parms PROTO_S ( ( nat, nat, nat, nat ) ) ;
910
extern floating_variety f_flvar_parms(nat, nat, nat, nat);
829
extern floating_variety f_complex_parms PROTO_S ( ( nat, nat, nat, nat ) ) ;
911
extern floating_variety f_complex_parms(nat, nat, nat, nat);
830
extern floating_variety f_float_of_complex PROTO_S ( ( shape ) ) ;
912
extern floating_variety f_float_of_complex(shape);
831
extern floating_variety f_complex_of_float PROTO_S ( ( shape ) ) ;
913
extern floating_variety f_complex_of_float(shape);
832
extern floating_variety f_dummy_floating_variety ;
914
extern floating_variety f_dummy_floating_variety;
833
extern void init_floating_variety PROTO_S ( ( void ) ) ;
915
extern void init_floating_variety(void);
834
 
916
 
835
/* CONSTRUCTS FOR GROUP */
917
/* CONSTRUCTS FOR GROUP */
836
extern group f_make_group PROTO_S ( ( unit_list ) ) ;
918
extern group f_make_group(unit_list);
837
extern group f_dummy_group ;
919
extern group f_dummy_group;
838
extern void init_group PROTO_S ( ( void ) ) ;
920
extern void init_group(void);
839
 
921
 
840
/* CONSTRUCTS FOR GROUP_LIST */
922
/* CONSTRUCTS FOR GROUP_LIST */
841
extern group_list new_group_list PROTO_S ( ( int ) ) ;
923
extern group_list new_group_list(int);
842
extern group_list add_group_list PROTO_S ( ( group_list, group, int ) ) ;
924
extern group_list add_group_list(group_list, group, int);
843
extern void init_group_list PROTO_S ( ( void ) ) ;
925
extern void init_group_list(void);
844
 
926
 
845
/* CONSTRUCTS FOR LABEL */
927
/* CONSTRUCTS FOR LABEL */
846
extern label f_label_apply_token PROTO_S ( ( token, bitstream ) ) ;
928
extern label f_label_apply_token(token, bitstream);
847
extern label f_make_label PROTO_S ( ( tdfint ) ) ;
929
extern label f_make_label(tdfint);
848
extern label f_dummy_label ;
930
extern label f_dummy_label;
849
extern void init_label PROTO_S ( ( void ) ) ;
931
extern void init_label(void);
850
 
932
 
851
/* CONSTRUCTS FOR LABEL_LIST */
933
/* CONSTRUCTS FOR LABEL_LIST */
852
extern label_list new_label_list PROTO_S ( ( int ) ) ;
934
extern label_list new_label_list(int);
853
extern label_list add_label_list PROTO_S ( ( label_list, label, int ) ) ;
935
extern label_list add_label_list(label_list, label, int);
854
extern void init_label_list PROTO_S ( ( void ) ) ;
936
extern void init_label_list(void);
855
 
937
 
856
/* CONSTRUCTS FOR LINK */
938
/* CONSTRUCTS FOR LINK */
857
extern link f_make_link PROTO_S ( ( tdfint, tdfint ) ) ;
939
extern link f_make_link(tdfint, tdfint);
858
extern link f_dummy_link ;
940
extern link f_dummy_link;
859
extern void init_link PROTO_S ( ( void ) ) ;
941
extern void init_link(void);
860
 
942
 
861
/* CONSTRUCTS FOR LINK_LIST */
943
/* CONSTRUCTS FOR LINK_LIST */
862
extern link_list new_link_list PROTO_S ( ( int ) ) ;
944
extern link_list new_link_list(int);
863
extern link_list add_link_list PROTO_S ( ( link_list, link, int ) ) ;
945
extern link_list add_link_list(link_list, link, int);
864
extern void init_link_list PROTO_S ( ( void ) ) ;
946
extern void init_link_list(void);
865
 
947
 
866
/* CONSTRUCTS FOR LINKEXTERN */
948
/* CONSTRUCTS FOR LINKEXTERN */
867
extern linkextern f_make_linkextern PROTO_S ( ( tdfint, external ) ) ;
949
extern linkextern f_make_linkextern(tdfint, external);
868
extern linkextern f_dummy_linkextern ;
950
extern linkextern f_dummy_linkextern;
869
extern void init_linkextern PROTO_S ( ( void ) ) ;
951
extern void init_linkextern(void);
870
 
952
 
871
/* CONSTRUCTS FOR LINKEXTERN_LIST */
953
/* CONSTRUCTS FOR LINKEXTERN_LIST */
872
extern linkextern_list new_linkextern_list PROTO_S ( ( int ) ) ;
954
extern linkextern_list new_linkextern_list(int);
873
extern linkextern_list add_linkextern_list PROTO_S ( ( linkextern_list, linkextern, int ) ) ;
955
extern linkextern_list add_linkextern_list(linkextern_list, linkextern, int);
874
extern void init_linkextern_list PROTO_S ( ( void ) ) ;
956
extern void init_linkextern_list(void);
875
 
957
 
876
/* CONSTRUCTS FOR LINKINFO */
958
/* CONSTRUCTS FOR LINKINFO */
877
extern linkinfo f_static_name_def PROTO_S ( ( exp, tdfstring ) ) ;
959
extern linkinfo f_static_name_def(exp, tdfstring);
878
extern linkinfo f_make_comment PROTO_S ( ( tdfstring ) ) ;
960
extern linkinfo f_make_comment(tdfstring);
879
extern linkinfo f_make_weak_defn PROTO_S ( ( exp, exp ) ) ;
961
extern linkinfo f_make_weak_defn(exp, exp);
880
extern linkinfo f_make_weak_symbol PROTO_S ( ( tdfstring, exp ) ) ;
962
extern linkinfo f_make_weak_symbol(tdfstring, exp);
881
extern linkinfo f_dummy_linkinfo ;
963
extern linkinfo f_dummy_linkinfo;
882
extern void init_linkinfo PROTO_S ( ( void ) ) ;
964
extern void init_linkinfo(void);
883
 
965
 
884
/* CONSTRUCTS FOR LINKINFO_LIST */
966
/* CONSTRUCTS FOR LINKINFO_LIST */
885
extern linkinfo_list new_linkinfo_list PROTO_S ( ( int ) ) ;
967
extern linkinfo_list new_linkinfo_list(int);
886
extern linkinfo_list add_linkinfo_list PROTO_S ( ( linkinfo_list, linkinfo, int ) ) ;
968
extern linkinfo_list add_linkinfo_list(linkinfo_list, linkinfo, int);
887
extern void init_linkinfo_list PROTO_S ( ( void ) ) ;
969
extern void init_linkinfo_list(void);
888
 
970
 
889
/* CONSTRUCTS FOR LINKINFO_PROPS */
971
/* CONSTRUCTS FOR LINKINFO_PROPS */
890
extern linkinfo_props f_make_linkinfos PROTO_S ( ( tdfint, linkinfo_list ) ) ;
972
extern linkinfo_props f_make_linkinfos(tdfint, linkinfo_list);
891
extern linkinfo_props f_dummy_linkinfo_props ;
973
extern linkinfo_props f_dummy_linkinfo_props;
892
extern void init_linkinfo_props PROTO_S ( ( void ) ) ;
974
extern void init_linkinfo_props(void);
893
 
975
 
894
/* CONSTRUCTS FOR LINKS */
976
/* CONSTRUCTS FOR LINKS */
895
extern links f_make_links PROTO_S ( ( link_list ) ) ;
977
extern links f_make_links(link_list);
896
extern links f_dummy_links ;
978
extern links f_dummy_links;
897
extern void init_links PROTO_S ( ( void ) ) ;
979
extern void init_links(void);
898
 
980
 
899
/* CONSTRUCTS FOR LINKS_LIST */
981
/* CONSTRUCTS FOR LINKS_LIST */
900
extern links_list new_links_list PROTO_S ( ( int ) ) ;
982
extern links_list new_links_list(int);
901
extern links_list add_links_list PROTO_S ( ( links_list, links, int ) ) ;
983
extern links_list add_links_list(links_list, links, int);
902
extern void init_links_list PROTO_S ( ( void ) ) ;
984
extern void init_links_list(void);
903
 
985
 
904
/* CONSTRUCTS FOR NAT */
986
/* CONSTRUCTS FOR NAT */
905
extern nat f_nat_apply_token PROTO_S ( ( token, bitstream ) ) ;
987
extern nat f_nat_apply_token(token, bitstream);
906
extern nat f_nat_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
988
extern nat f_nat_cond(exp, bitstream, bitstream);
907
extern nat f_computed_nat PROTO_S ( ( exp ) ) ;
989
extern nat f_computed_nat(exp);
908
extern nat f_error_val PROTO_S ( ( error_code ) ) ;
990
extern nat f_error_val(error_code);
909
extern nat f_make_nat PROTO_S ( ( tdfint ) ) ;
991
extern nat f_make_nat(tdfint);
910
extern nat f_dummy_nat ;
992
extern nat f_dummy_nat;
911
extern void init_nat PROTO_S ( ( void ) ) ;
993
extern void init_nat(void);
912
 
994
 
913
/* CONSTRUCTS FOR NAT_OPTION */
995
/* CONSTRUCTS FOR NAT_OPTION */
914
extern nat_option yes_nat_option PROTO_S ( ( nat ) ) ;
996
extern nat_option yes_nat_option(nat);
915
extern nat_option no_nat_option ;
997
extern nat_option no_nat_option;
916
extern void init_nat_option PROTO_S ( ( void ) ) ;
998
extern void init_nat_option(void);
917
 
999
 
918
/* CONSTRUCTS FOR NTEST */
1000
/* CONSTRUCTS FOR NTEST */
919
extern ntest f_ntest_apply_token PROTO_S ( ( token, bitstream ) ) ;
1001
extern ntest f_ntest_apply_token(token, bitstream);
920
extern ntest f_ntest_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
1002
extern ntest f_ntest_cond(exp, bitstream, bitstream);
921
extern ntest f_equal ;
1003
extern ntest f_equal;
922
extern ntest f_greater_than ;
1004
extern ntest f_greater_than;
923
extern ntest f_greater_than_or_equal ;
1005
extern ntest f_greater_than_or_equal;
924
extern ntest f_less_than ;
1006
extern ntest f_less_than;
925
extern ntest f_less_than_or_equal ;
1007
extern ntest f_less_than_or_equal;
926
extern ntest f_not_equal ;
1008
extern ntest f_not_equal;
927
extern ntest f_not_greater_than ;
1009
extern ntest f_not_greater_than;
928
extern ntest f_not_greater_than_or_equal ;
1010
extern ntest f_not_greater_than_or_equal;
929
extern ntest f_not_less_than ;
1011
extern ntest f_not_less_than;
930
extern ntest f_not_less_than_or_equal ;
1012
extern ntest f_not_less_than_or_equal;
931
extern ntest f_less_than_or_greater_than ;
1013
extern ntest f_less_than_or_greater_than;
932
extern ntest f_not_less_than_and_not_greater_than ;
1014
extern ntest f_not_less_than_and_not_greater_than;
933
extern ntest f_comparable ;
1015
extern ntest f_comparable;
934
extern ntest f_not_comparable ;
1016
extern ntest f_not_comparable;
935
extern ntest f_dummy_ntest ;
1017
extern ntest f_dummy_ntest;
936
extern void init_ntest PROTO_S ( ( void ) ) ;
1018
extern void init_ntest(void);
937
 
1019
 
938
/* CONSTRUCTS FOR OTAGEXP */
1020
/* CONSTRUCTS FOR OTAGEXP */
939
extern otagexp f_make_otagexp PROTO_S ( ( tag_option, exp ) ) ;
1021
extern otagexp f_make_otagexp(tag_option, exp);
940
extern otagexp f_dummy_otagexp ;
1022
extern otagexp f_dummy_otagexp;
941
extern void init_otagexp PROTO_S ( ( void ) ) ;
1023
extern void init_otagexp(void);
942
 
1024
 
943
/* CONSTRUCTS FOR OTAGEXP_LIST */
1025
/* CONSTRUCTS FOR OTAGEXP_LIST */
944
extern otagexp_list new_otagexp_list PROTO_S ( ( int ) ) ;
1026
extern otagexp_list new_otagexp_list(int);
945
extern otagexp_list add_otagexp_list PROTO_S ( ( otagexp_list, otagexp, int ) ) ;
1027
extern otagexp_list add_otagexp_list(otagexp_list, otagexp, int);
946
extern void init_otagexp_list PROTO_S ( ( void ) ) ;
1028
extern void init_otagexp_list(void);
947
 
1029
 
948
/* CONSTRUCTS FOR PROCPROPS */
1030
/* CONSTRUCTS FOR PROCPROPS */
949
extern procprops f_procprops_apply_token PROTO_S ( ( token, bitstream ) ) ;
1031
extern procprops f_procprops_apply_token(token, bitstream);
950
extern procprops f_procprops_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
1032
extern procprops f_procprops_cond(exp, bitstream, bitstream);
951
extern procprops f_add_procprops PROTO_S ( ( procprops, procprops ) ) ;
1033
extern procprops f_add_procprops(procprops, procprops);
952
extern procprops f_check_stack ;
1034
extern procprops f_check_stack;
953
extern procprops f_inline ;
1035
extern procprops f_inline;
954
extern procprops f_no_long_jump_dest ;
1036
extern procprops f_no_long_jump_dest;
955
extern procprops f_untidy ;
1037
extern procprops f_untidy;
956
extern procprops f_var_callees ;
1038
extern procprops f_var_callees;
957
extern procprops f_var_callers ;
1039
extern procprops f_var_callers;
958
extern procprops f_dummy_procprops ;
1040
extern procprops f_dummy_procprops;
959
extern void init_procprops PROTO_S ( ( void ) ) ;
1041
extern void init_procprops(void);
960
 
1042
 
961
/* CONSTRUCTS FOR PROCPROPS_OPTION */
1043
/* CONSTRUCTS FOR PROCPROPS_OPTION */
962
extern procprops_option yes_procprops_option PROTO_S ( ( procprops ) ) ;
1044
extern procprops_option yes_procprops_option(procprops);
963
extern procprops_option no_procprops_option ;
1045
extern procprops_option no_procprops_option;
964
extern void init_procprops_option PROTO_S ( ( void ) ) ;
1046
extern void init_procprops_option(void);
965
 
1047
 
966
/* CONSTRUCTS FOR ROUNDING_MODE */
1048
/* CONSTRUCTS FOR ROUNDING_MODE */
967
extern rounding_mode f_rounding_mode_apply_token PROTO_S ( ( token, bitstream ) ) ;
1049
extern rounding_mode f_rounding_mode_apply_token(token, bitstream);
968
extern rounding_mode f_rounding_mode_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
1050
extern rounding_mode f_rounding_mode_cond(exp, bitstream, bitstream);
969
extern rounding_mode f_round_as_state ;
1051
extern rounding_mode f_round_as_state;
970
extern rounding_mode f_to_nearest ;
1052
extern rounding_mode f_to_nearest;
971
extern rounding_mode f_toward_larger ;
1053
extern rounding_mode f_toward_larger;
972
extern rounding_mode f_toward_smaller ;
1054
extern rounding_mode f_toward_smaller;
973
extern rounding_mode f_toward_zero ;
1055
extern rounding_mode f_toward_zero;
974
extern rounding_mode f_dummy_rounding_mode ;
1056
extern rounding_mode f_dummy_rounding_mode;
975
extern void init_rounding_mode PROTO_S ( ( void ) ) ;
1057
extern void init_rounding_mode(void);
976
 
1058
 
977
/* CONSTRUCTS FOR SHAPE */
1059
/* CONSTRUCTS FOR SHAPE */
978
extern shape f_shape_apply_token PROTO_S ( ( token, bitstream ) ) ;
1060
extern shape f_shape_apply_token(token, bitstream);
979
extern shape f_shape_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
1061
extern shape f_shape_cond(exp, bitstream, bitstream);
980
extern shape f_bitfield PROTO_S ( ( bitfield_variety ) ) ;
1062
extern shape f_bitfield(bitfield_variety);
981
extern shape f_bottom ;
1063
extern shape f_bottom;
982
extern shape f_compound PROTO_S ( ( exp ) ) ;
1064
extern shape f_compound(exp);
983
extern shape f_floating PROTO_S ( ( floating_variety ) ) ;
1065
extern shape f_floating(floating_variety);
984
extern shape f_integer PROTO_S ( ( variety ) ) ;
1066
extern shape f_integer(variety);
985
extern shape f_nof PROTO_S ( ( nat, shape ) ) ;
1067
extern shape f_nof(nat, shape);
986
extern shape f_offset PROTO_S ( ( alignment, alignment ) ) ;
1068
extern shape f_offset(alignment, alignment);
987
extern shape f_pointer PROTO_S ( ( alignment ) ) ;
1069
extern shape f_pointer(alignment);
988
extern shape f_proc ;
1070
extern shape f_proc;
989
extern shape f_top ;
1071
extern shape f_top;
990
extern shape f_dummy_shape ;
1072
extern shape f_dummy_shape;
991
extern void init_shape PROTO_S ( ( void ) ) ;
1073
extern void init_shape(void);
992
 
1074
 
993
/* CONSTRUCTS FOR SHAPE_OPTION */
1075
/* CONSTRUCTS FOR SHAPE_OPTION */
994
extern shape_option yes_shape_option PROTO_S ( ( shape ) ) ;
1076
extern shape_option yes_shape_option(shape);
995
extern shape_option no_shape_option ;
1077
extern shape_option no_shape_option;
996
extern void init_shape_option PROTO_S ( ( void ) ) ;
1078
extern void init_shape_option(void);
997
 
1079
 
998
/* CONSTRUCTS FOR SIGNED_NAT */
1080
/* CONSTRUCTS FOR SIGNED_NAT */
999
extern signed_nat f_signed_nat_apply_token PROTO_S ( ( token, bitstream ) ) ;
1081
extern signed_nat f_signed_nat_apply_token(token, bitstream);
1000
extern signed_nat f_signed_nat_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
1082
extern signed_nat f_signed_nat_cond(exp, bitstream, bitstream);
1001
extern signed_nat f_computed_signed_nat PROTO_S ( ( exp ) ) ;
1083
extern signed_nat f_computed_signed_nat(exp);
1002
extern signed_nat f_make_signed_nat PROTO_S ( ( tdfbool, tdfint ) ) ;
1084
extern signed_nat f_make_signed_nat(tdfbool, tdfint);
1003
extern signed_nat f_snat_from_nat PROTO_S ( ( bool, nat ) ) ;
1085
extern signed_nat f_snat_from_nat(bool, nat);
1004
extern signed_nat f_dummy_signed_nat ;
1086
extern signed_nat f_dummy_signed_nat;
1005
extern void init_signed_nat PROTO_S ( ( void ) ) ;
1087
extern void init_signed_nat(void);
1006
 
1088
 
1007
/* CONSTRUCTS FOR SORTNAME */
1089
/* CONSTRUCTS FOR SORTNAME */
1008
extern sortname f_access ;
1090
extern sortname f_access;
1009
extern sortname f_al_tag ;
1091
extern sortname f_al_tag;
1010
extern sortname f_alignment_sort ;
1092
extern sortname f_alignment_sort;
1011
extern sortname f_bitfield_variety ;
1093
extern sortname f_bitfield_variety;
1012
extern sortname f_bool ;
1094
extern sortname f_bool;
1013
extern sortname f_error_treatment ;
1095
extern sortname f_error_treatment;
1014
extern sortname f_exp ;
1096
extern sortname f_exp;
1015
extern sortname f_floating_variety ;
1097
extern sortname f_floating_variety;
1016
extern sortname f_foreign_sort PROTO_S ( ( string ) ) ;
1098
extern sortname f_foreign_sort(string);
1017
extern sortname f_label ;
1099
extern sortname f_label;
1018
extern sortname f_nat ;
1100
extern sortname f_nat;
1019
extern sortname f_ntest ;
1101
extern sortname f_ntest;
1020
extern sortname f_procprops ;
1102
extern sortname f_procprops;
1021
extern sortname f_rounding_mode ;
1103
extern sortname f_rounding_mode;
1022
extern sortname f_shape ;
1104
extern sortname f_shape;
1023
extern sortname f_signed_nat ;
1105
extern sortname f_signed_nat;
1024
extern sortname f_string ;
1106
extern sortname f_string;
1025
extern sortname f_tag ;
1107
extern sortname f_tag;
1026
extern sortname f_transfer_mode ;
1108
extern sortname f_transfer_mode;
1027
extern sortname f_token PROTO_S ( ( sortname, sortname_list ) ) ;
1109
extern sortname f_token(sortname, sortname_list);
1028
extern sortname f_variety ;
1110
extern sortname f_variety;
1029
extern sortname f_dummy_sortname ;
1111
extern sortname f_dummy_sortname;
1030
extern void init_sortname PROTO_S ( ( void ) ) ;
1112
extern void init_sortname(void);
1031
 
1113
 
1032
/* CONSTRUCTS FOR SORTNAME_LIST */
1114
/* CONSTRUCTS FOR SORTNAME_LIST */
1033
extern sortname_list new_sortname_list PROTO_S ( ( int ) ) ;
1115
extern sortname_list new_sortname_list(int);
1034
extern sortname_list add_sortname_list PROTO_S ( ( sortname_list, sortname, int ) ) ;
1116
extern sortname_list add_sortname_list(sortname_list, sortname, int);
1035
extern void init_sortname_list PROTO_S ( ( void ) ) ;
1117
extern void init_sortname_list(void);
1036
 
1118
 
1037
/* CONSTRUCTS FOR SOURCEMARK */
1119
/* CONSTRUCTS FOR SOURCEMARK */
1038
extern sourcemark f_make_sourcemark PROTO_S ( ( filename, nat, nat ) ) ;
1120
extern sourcemark f_make_sourcemark(filename, nat, nat);
1039
extern sourcemark f_dummy_sourcemark ;
1121
extern sourcemark f_dummy_sourcemark;
1040
extern void init_sourcemark PROTO_S ( ( void ) ) ;
1122
extern void init_sourcemark(void);
1041
 
1123
 
1042
/* CONSTRUCTS FOR STRING */
1124
/* CONSTRUCTS FOR STRING */
1043
extern string f_string_apply_token PROTO_S ( ( token, bitstream ) ) ;
1125
extern string f_string_apply_token(token, bitstream);
1044
extern string f_string_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
1126
extern string f_string_cond(exp, bitstream, bitstream);
1045
extern string f_concat_string PROTO_S ( ( string, string ) ) ;
1127
extern string f_concat_string(string, string);
1046
extern string f_make_string PROTO_S ( ( tdfstring ) ) ;
1128
extern string f_make_string(tdfstring);
1047
extern string f_dummy_string ;
1129
extern string f_dummy_string;
1048
extern void init_string PROTO_S ( ( void ) ) ;
1130
extern void init_string(void);
1049
 
1131
 
1050
/* CONSTRUCTS FOR STRING_LIST */
1132
/* CONSTRUCTS FOR STRING_LIST */
1051
extern string_list new_string_list PROTO_S ( ( int ) ) ;
1133
extern string_list new_string_list(int);
1052
extern string_list add_string_list PROTO_S ( ( string_list, string, int ) ) ;
1134
extern string_list add_string_list(string_list, string, int);
1053
extern void init_string_list PROTO_S ( ( void ) ) ;
1135
extern void init_string_list(void);
1054
 
1136
 
1055
/* CONSTRUCTS FOR STRING_OPTION */
1137
/* CONSTRUCTS FOR STRING_OPTION */
1056
extern string_option yes_string_option PROTO_S ( ( string ) ) ;
1138
extern string_option yes_string_option(string);
1057
extern string_option no_string_option ;
1139
extern string_option no_string_option;
1058
extern void init_string_option PROTO_S ( ( void ) ) ;
1140
extern void init_string_option(void);
1059
 
1141
 
1060
/* CONSTRUCTS FOR TAG */
1142
/* CONSTRUCTS FOR TAG */
1061
extern tag f_tag_apply_token PROTO_S ( ( token, bitstream ) ) ;
1143
extern tag f_tag_apply_token(token, bitstream);
1062
extern tag f_make_tag PROTO_S ( ( tdfint ) ) ;
1144
extern tag f_make_tag(tdfint);
1063
extern tag f_dummy_tag ;
1145
extern tag f_dummy_tag;
1064
extern void init_tag PROTO_S ( ( void ) ) ;
1146
extern void init_tag(void);
1065
 
1147
 
1066
/* CONSTRUCTS FOR TAG_OPTION */
1148
/* CONSTRUCTS FOR TAG_OPTION */
1067
extern tag_option yes_tag_option PROTO_S ( ( tag ) ) ;
1149
extern tag_option yes_tag_option(tag);
1068
extern tag_option no_tag_option ;
1150
extern tag_option no_tag_option;
1069
extern void init_tag_option PROTO_S ( ( void ) ) ;
1151
extern void init_tag_option(void);
1070
 
1152
 
1071
/* CONSTRUCTS FOR TAGACC */
1153
/* CONSTRUCTS FOR TAGACC */
1072
extern tagacc f_make_tagacc PROTO_S ( ( tag, access_option ) ) ;
1154
extern tagacc f_make_tagacc(tag, access_option);
1073
extern tagacc f_dummy_tagacc ;
1155
extern tagacc f_dummy_tagacc;
1074
extern void init_tagacc PROTO_S ( ( void ) ) ;
1156
extern void init_tagacc(void);
1075
 
1157
 
1076
/* CONSTRUCTS FOR TAGACC_OPTION */
1158
/* CONSTRUCTS FOR TAGACC_OPTION */
1077
extern tagacc_option yes_tagacc_option PROTO_S ( ( tagacc ) ) ;
1159
extern tagacc_option yes_tagacc_option(tagacc);
1078
extern tagacc_option no_tagacc_option ;
1160
extern tagacc_option no_tagacc_option;
1079
extern void init_tagacc_option PROTO_S ( ( void ) ) ;
1161
extern void init_tagacc_option(void);
1080
 
1162
 
1081
/* CONSTRUCTS FOR TAGDEC */
1163
/* CONSTRUCTS FOR TAGDEC */
1082
extern tagdec f_make_id_tagdec PROTO_S ( ( tdfint, access_option, string_option, shape ) ) ;
1164
extern tagdec f_make_id_tagdec(tdfint, access_option, string_option, shape);
1083
extern tagdec f_make_var_tagdec PROTO_S ( ( tdfint, access_option, string_option, shape ) ) ;
1165
extern tagdec f_make_var_tagdec(tdfint, access_option, string_option, shape);
1084
extern tagdec f_common_tagdec PROTO_S ( ( tdfint, access_option, string_option, shape ) ) ;
1166
extern tagdec f_common_tagdec(tdfint, access_option, string_option, shape);
1085
extern tagdec f_dummy_tagdec ;
1167
extern tagdec f_dummy_tagdec;
1086
extern void init_tagdec PROTO_S ( ( void ) ) ;
1168
extern void init_tagdec(void);
1087
 
1169
 
1088
/* CONSTRUCTS FOR TAGDEC_LIST */
1170
/* CONSTRUCTS FOR TAGDEC_LIST */
1089
extern tagdec_list new_tagdec_list PROTO_S ( ( int ) ) ;
1171
extern tagdec_list new_tagdec_list(int);
1090
extern tagdec_list add_tagdec_list PROTO_S ( ( tagdec_list, tagdec, int ) ) ;
1172
extern tagdec_list add_tagdec_list(tagdec_list, tagdec, int);
1091
extern void init_tagdec_list PROTO_S ( ( void ) ) ;
1173
extern void init_tagdec_list(void);
1092
 
1174
 
1093
/* CONSTRUCTS FOR TAGDEC_PROPS */
1175
/* CONSTRUCTS FOR TAGDEC_PROPS */
1094
extern tagdec_props f_make_tagdecs PROTO_S ( ( tdfint, tagdec_list ) ) ;
1176
extern tagdec_props f_make_tagdecs(tdfint, tagdec_list);
1095
extern tagdec_props f_dummy_tagdec_props ;
1177
extern tagdec_props f_dummy_tagdec_props;
1096
extern void init_tagdec_props PROTO_S ( ( void ) ) ;
1178
extern void init_tagdec_props(void);
1097
 
1179
 
1098
/* CONSTRUCTS FOR TAGDEF */
1180
/* CONSTRUCTS FOR TAGDEF */
1099
extern void start_make_id_tagdef PROTO_S ( ( tdfint ) ) ;
1181
extern void start_make_id_tagdef(tdfint);
1100
extern tagdef f_make_id_tagdef PROTO_S ( ( tdfint, string_option, exp ) ) ;
1182
extern tagdef f_make_id_tagdef(tdfint, string_option, exp);
1101
extern void start_make_var_tagdef PROTO_S ( ( tdfint ) ) ;
1183
extern void start_make_var_tagdef(tdfint);
1102
extern tagdef f_make_var_tagdef PROTO_S ( ( tdfint, access_option, string_option, exp ) ) ;
1184
extern tagdef f_make_var_tagdef(tdfint, access_option, string_option, exp);
1103
extern void start_common_tagdef PROTO_S ( ( tdfint ) ) ;
1185
extern void start_common_tagdef(tdfint);
1104
extern tagdef f_common_tagdef PROTO_S ( ( tdfint, access_option, string_option, exp ) ) ;
1186
extern tagdef f_common_tagdef(tdfint, access_option, string_option, exp);
1105
extern tagdef f_dummy_tagdef ;
1187
extern tagdef f_dummy_tagdef;
1106
extern void init_tagdef PROTO_S ( ( void ) ) ;
1188
extern void init_tagdef(void);
1107
 
1189
 
1108
/* CONSTRUCTS FOR TAGDEF_LIST */
1190
/* CONSTRUCTS FOR TAGDEF_LIST */
1109
extern tagdef_list new_tagdef_list PROTO_S ( ( int ) ) ;
1191
extern tagdef_list new_tagdef_list(int);
1110
extern tagdef_list add_tagdef_list PROTO_S ( ( tagdef_list, tagdef, int ) ) ;
1192
extern tagdef_list add_tagdef_list(tagdef_list, tagdef, int);
1111
extern void init_tagdef_list PROTO_S ( ( void ) ) ;
1193
extern void init_tagdef_list(void);
1112
 
1194
 
1113
/* CONSTRUCTS FOR TAGDEF_PROPS */
1195
/* CONSTRUCTS FOR TAGDEF_PROPS */
1114
extern tagdef_props f_make_tagdefs PROTO_S ( ( tdfint, tagdef_list ) ) ;
1196
extern tagdef_props f_make_tagdefs(tdfint, tagdef_list);
1115
extern tagdef_props f_dummy_tagdef_props ;
1197
extern tagdef_props f_dummy_tagdef_props;
1116
extern void init_tagdef_props PROTO_S ( ( void ) ) ;
1198
extern void init_tagdef_props(void);
1117
 
1199
 
1118
/* CONSTRUCTS FOR TAGSHACC */
1200
/* CONSTRUCTS FOR TAGSHACC */
1119
extern tagshacc f_make_tagshacc PROTO_S ( ( shape, access_option, tag ) ) ;
1201
extern tagshacc f_make_tagshacc(shape, access_option, tag);
1120
extern tagshacc f_dummy_tagshacc ;
1202
extern tagshacc f_dummy_tagshacc;
1121
extern void init_tagshacc PROTO_S ( ( void ) ) ;
1203
extern void init_tagshacc(void);
1122
 
1204
 
1123
/* CONSTRUCTS FOR TAGSHACC_LIST */
1205
/* CONSTRUCTS FOR TAGSHACC_LIST */
1124
extern tagshacc_list new_tagshacc_list PROTO_S ( ( int ) ) ;
1206
extern tagshacc_list new_tagshacc_list(int);
1125
extern tagshacc_list add_tagshacc_list PROTO_S ( ( tagshacc_list, tagshacc, int ) ) ;
1207
extern tagshacc_list add_tagshacc_list(tagshacc_list, tagshacc, int);
1126
extern void init_tagshacc_list PROTO_S ( ( void ) ) ;
1208
extern void init_tagshacc_list(void);
1127
 
1209
 
1128
/* CONSTRUCTS FOR TDFIDENT_LIST */
1210
/* CONSTRUCTS FOR TDFIDENT_LIST */
1129
extern tdfident_list new_tdfident_list PROTO_S ( ( int ) ) ;
1211
extern tdfident_list new_tdfident_list(int);
1130
extern tdfident_list add_tdfident_list PROTO_S ( ( tdfident_list, tdfident, int ) ) ;
1212
extern tdfident_list add_tdfident_list(tdfident_list, tdfident, int);
1131
extern void init_tdfident_list PROTO_S ( ( void ) ) ;
1213
extern void init_tdfident_list(void);
1132
 
1214
 
1133
/* CONSTRUCTS FOR TDFINT_LIST */
1215
/* CONSTRUCTS FOR TDFINT_LIST */
1134
extern tdfint_list new_tdfint_list PROTO_S ( ( int ) ) ;
1216
extern tdfint_list new_tdfint_list(int);
1135
extern tdfint_list add_tdfint_list PROTO_S ( ( tdfint_list, tdfint, int ) ) ;
1217
extern tdfint_list add_tdfint_list(tdfint_list, tdfint, int);
1136
extern void init_tdfint_list PROTO_S ( ( void ) ) ;
1218
extern void init_tdfint_list(void);
1137
 
1219
 
1138
/* CONSTRUCTS FOR TOKDEC */
1220
/* CONSTRUCTS FOR TOKDEC */
1139
extern tokdec f_make_tokdec PROTO_S ( ( tdfint, string_option, sortname ) ) ;
1221
extern tokdec f_make_tokdec(tdfint, string_option, sortname);
1140
extern tokdec f_dummy_tokdec ;
1222
extern tokdec f_dummy_tokdec;
1141
extern void init_tokdec PROTO_S ( ( void ) ) ;
1223
extern void init_tokdec(void);
1142
 
1224
 
1143
/* CONSTRUCTS FOR TOKDEC_LIST */
1225
/* CONSTRUCTS FOR TOKDEC_LIST */
1144
extern tokdec_list new_tokdec_list PROTO_S ( ( int ) ) ;
1226
extern tokdec_list new_tokdec_list(int);
1145
extern tokdec_list add_tokdec_list PROTO_S ( ( tokdec_list, tokdec, int ) ) ;
1227
extern tokdec_list add_tokdec_list(tokdec_list, tokdec, int);
1146
extern void init_tokdec_list PROTO_S ( ( void ) ) ;
1228
extern void init_tokdec_list(void);
1147
 
1229
 
1148
/* CONSTRUCTS FOR TOKDEC_PROPS */
1230
/* CONSTRUCTS FOR TOKDEC_PROPS */
1149
extern tokdec_props f_make_tokdecs PROTO_S ( ( tokdec_list ) ) ;
1231
extern tokdec_props f_make_tokdecs(tokdec_list);
1150
extern tokdec_props f_dummy_tokdec_props ;
1232
extern tokdec_props f_dummy_tokdec_props;
1151
extern void init_tokdec_props PROTO_S ( ( void ) ) ;
1233
extern void init_tokdec_props(void);
1152
 
1234
 
1153
/* CONSTRUCTS FOR TOKDEF */
1235
/* CONSTRUCTS FOR TOKDEF */
1154
extern tokdef f_make_tokdef PROTO_S ( ( tdfint, string_option, bitstream ) ) ;
1236
extern tokdef f_make_tokdef(tdfint, string_option, bitstream);
1155
extern tokdef f_dummy_tokdef ;
1237
extern tokdef f_dummy_tokdef;
1156
extern void init_tokdef PROTO_S ( ( void ) ) ;
1238
extern void init_tokdef(void);
1157
 
1239
 
1158
/* CONSTRUCTS FOR TOKDEF_LIST */
1240
/* CONSTRUCTS FOR TOKDEF_LIST */
1159
extern tokdef_list new_tokdef_list PROTO_S ( ( int ) ) ;
1241
extern tokdef_list new_tokdef_list(int);
1160
extern tokdef_list add_tokdef_list PROTO_S ( ( tokdef_list, tokdef, int ) ) ;
1242
extern tokdef_list add_tokdef_list(tokdef_list, tokdef, int);
1161
extern void init_tokdef_list PROTO_S ( ( void ) ) ;
1243
extern void init_tokdef_list(void);
1162
 
1244
 
1163
/* CONSTRUCTS FOR TOKDEF_PROPS */
1245
/* CONSTRUCTS FOR TOKDEF_PROPS */
1164
extern tokdef_props f_make_tokdefs PROTO_S ( ( tdfint, tokdef_list ) ) ;
1246
extern tokdef_props f_make_tokdefs(tdfint, tokdef_list);
1165
extern tokdef_props f_dummy_tokdef_props ;
1247
extern tokdef_props f_dummy_tokdef_props;
1166
extern void init_tokdef_props PROTO_S ( ( void ) ) ;
1248
extern void init_tokdef_props(void);
1167
 
1249
 
1168
/* CONSTRUCTS FOR TOKEN */
1250
/* CONSTRUCTS FOR TOKEN */
1169
extern token f_token_apply_token PROTO_S ( ( token, bitstream ) ) ;
1251
extern token f_token_apply_token(token, bitstream);
1170
extern token f_make_tok PROTO_S ( ( tdfint ) ) ;
1252
extern token f_make_tok(tdfint);
1171
extern token f_use_tokdef PROTO_S ( ( bitstream ) ) ;
1253
extern token f_use_tokdef(bitstream);
1172
extern token f_dummy_token ;
1254
extern token f_dummy_token;
1173
extern void init_token PROTO_S ( ( void ) ) ;
1255
extern void init_token(void);
1174
 
1256
 
1175
/* CONSTRUCTS FOR TOKEN_DEFN */
1257
/* CONSTRUCTS FOR TOKEN_DEFN */
1176
extern token_defn f_token_definition PROTO_S ( ( sortname, tokformals_list ) ) ;
1258
extern token_defn f_token_definition(sortname, tokformals_list);
1177
extern token_defn f_dummy_token_defn ;
1259
extern token_defn f_dummy_token_defn;
1178
extern void init_token_defn PROTO_S ( ( void ) ) ;
1260
extern void init_token_defn(void);
1179
 
1261
 
1180
/* CONSTRUCTS FOR TOKEN_OPTION */
1262
/* CONSTRUCTS FOR TOKEN_OPTION */
1181
extern token_option yes_token_option PROTO_S ( ( token ) ) ;
1263
extern token_option yes_token_option(token);
1182
extern token_option no_token_option ;
1264
extern token_option no_token_option;
1183
extern void init_token_option PROTO_S ( ( void ) ) ;
1265
extern void init_token_option(void);
1184
 
1266
 
1185
/* CONSTRUCTS FOR TOKFORMALS */
1267
/* CONSTRUCTS FOR TOKFORMALS */
1186
extern tokformals f_make_tokformals PROTO_S ( ( sortname, tdfint ) ) ;
1268
extern tokformals f_make_tokformals(sortname, tdfint);
1187
extern tokformals f_dummy_tokformals ;
1269
extern tokformals f_dummy_tokformals;
1188
extern void init_tokformals PROTO_S ( ( void ) ) ;
1270
extern void init_tokformals(void);
1189
 
1271
 
1190
/* CONSTRUCTS FOR TOKFORMALS_LIST */
1272
/* CONSTRUCTS FOR TOKFORMALS_LIST */
1191
extern tokformals_list new_tokformals_list PROTO_S ( ( int ) ) ;
1273
extern tokformals_list new_tokformals_list(int);
1192
extern tokformals_list add_tokformals_list PROTO_S ( ( tokformals_list, tokformals, int ) ) ;
1274
extern tokformals_list add_tokformals_list(tokformals_list, tokformals, int);
1193
extern void init_tokformals_list PROTO_S ( ( void ) ) ;
1275
extern void init_tokformals_list(void);
1194
 
1276
 
1195
/* CONSTRUCTS FOR TRANSFER_MODE */
1277
/* CONSTRUCTS FOR TRANSFER_MODE */
1196
extern transfer_mode f_transfer_mode_apply_token PROTO_S ( ( token, bitstream ) ) ;
1278
extern transfer_mode f_transfer_mode_apply_token(token, bitstream);
1197
extern transfer_mode f_transfer_mode_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
1279
extern transfer_mode f_transfer_mode_cond(exp, bitstream, bitstream);
1198
extern transfer_mode f_add_modes PROTO_S ( ( transfer_mode, transfer_mode ) ) ;
1280
extern transfer_mode f_add_modes(transfer_mode, transfer_mode);
1199
extern transfer_mode f_overlap ;
1281
extern transfer_mode f_overlap;
1200
extern transfer_mode f_standard_transfer_mode ;
1282
extern transfer_mode f_standard_transfer_mode;
1201
extern transfer_mode f_trap_on_nil ;
1283
extern transfer_mode f_trap_on_nil;
1202
extern transfer_mode f_volatile ;
1284
extern transfer_mode f_volatile;
1203
extern transfer_mode f_complete ;
1285
extern transfer_mode f_complete;
1204
extern transfer_mode f_dummy_transfer_mode ;
1286
extern transfer_mode f_dummy_transfer_mode;
1205
extern void init_transfer_mode PROTO_S ( ( void ) ) ;
1287
extern void init_transfer_mode(void);
1206
 
1288
 
1207
/* CONSTRUCTS FOR UNIQUE */
1289
/* CONSTRUCTS FOR UNIQUE */
1208
extern unique f_make_unique PROTO_S ( ( tdfident_list ) ) ;
1290
extern unique f_make_unique(tdfident_list);
1209
extern unique f_dummy_unique ;
1291
extern unique f_dummy_unique;
1210
extern void init_unique PROTO_S ( ( void ) ) ;
1292
extern void init_unique(void);
1211
 
1293
 
1212
/* CONSTRUCTS FOR UNIT */
1294
/* CONSTRUCTS FOR UNIT */
1213
extern void start_make_unit PROTO_S ( ( tdfint_list ) ) ;
1295
extern void start_make_unit(tdfint_list);
1214
extern unit f_make_unit PROTO_S ( ( tdfint_list, links_list, bytestream ) ) ;
1296
extern unit f_make_unit(tdfint_list, links_list, bytestream);
1215
extern unit f_dummy_unit ;
1297
extern unit f_dummy_unit;
1216
extern void init_unit PROTO_S ( ( void ) ) ;
1298
extern void init_unit(void);
1217
 
1299
 
1218
/* CONSTRUCTS FOR UNIT_LIST */
1300
/* CONSTRUCTS FOR UNIT_LIST */
1219
extern unit_list new_unit_list PROTO_S ( ( int ) ) ;
1301
extern unit_list new_unit_list(int);
1220
extern unit_list add_unit_list PROTO_S ( ( unit_list, unit, int ) ) ;
1302
extern unit_list add_unit_list(unit_list, unit, int);
1221
extern void init_unit_list PROTO_S ( ( void ) ) ;
1303
extern void init_unit_list(void);
1222
 
1304
 
1223
/* CONSTRUCTS FOR VARIETY */
1305
/* CONSTRUCTS FOR VARIETY */
1224
extern variety f_var_apply_token PROTO_S ( ( token, bitstream ) ) ;
1306
extern variety f_var_apply_token(token, bitstream);
1225
extern variety f_var_cond PROTO_S ( ( exp, bitstream, bitstream ) ) ;
1307
extern variety f_var_cond(exp, bitstream, bitstream);
1226
extern variety f_var_limits PROTO_S ( ( signed_nat, signed_nat ) ) ;
1308
extern variety f_var_limits(signed_nat, signed_nat);
1227
extern variety f_var_width PROTO_S ( ( bool, nat ) ) ;
1309
extern variety f_var_width(bool, nat);
1228
extern variety f_dummy_variety ;
1310
extern variety f_dummy_variety;
1229
extern void init_variety PROTO_S ( ( void ) ) ;
1311
extern void init_variety(void);
1230
 
1312
 
1231
/* CONSTRUCTS FOR VERSION */
1313
/* CONSTRUCTS FOR VERSION */
1232
extern version f_make_version PROTO_S ( ( tdfint, tdfint ) ) ;
1314
extern version f_make_version(tdfint, tdfint);
1233
extern version f_user_info PROTO_S ( ( string ) ) ;
1315
extern version f_user_info(string);
1234
extern version f_dummy_version ;
1316
extern version f_dummy_version;
1235
extern void init_version PROTO_S ( ( void ) ) ;
1317
extern void init_version(void);
1236
 
1318
 
1237
/* CONSTRUCTS FOR VERSION_LIST */
1319
/* CONSTRUCTS FOR VERSION_LIST */
1238
extern version_list new_version_list PROTO_S ( ( int ) ) ;
1320
extern version_list new_version_list(int);
1239
extern version_list add_version_list PROTO_S ( ( version_list, version, int ) ) ;
1321
extern version_list add_version_list(version_list, version, int);
1240
extern void init_version_list PROTO_S ( ( void ) ) ;
1322
extern void init_version_list(void);
1241
 
1323
 
1242
/* CONSTRUCTS FOR VERSION_PROPS */
1324
/* CONSTRUCTS FOR VERSION_PROPS */
1243
extern version_props f_make_versions PROTO_S ( ( version_list ) ) ;
1325
extern version_props f_make_versions(version_list);
1244
extern version_props f_dummy_version_props ;
1326
extern version_props f_dummy_version_props;
1245
extern void init_version_props PROTO_S ( ( void ) ) ;
1327
extern void init_version_props(void);
1246
 
1328
 
1247
 
1329
 
1248
#endif
1330
#endif