Warning: Attempt to read property "date" on null in /usr/local/www/websvn.planix.org/blame.php on line 247

Warning: Attempt to read property "msg" on null in /usr/local/www/websvn.planix.org/blame.php on line 247
WebSVN – tendra.SVN – Blame – /branches/tendra4/src/tools/tnc/templ/tdf.h – Rev 2

Subversion Repositories tendra.SVN

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 7u83 1
/*
2
    		 Crown Copyright (c) 1997
3
 
4
    This TenDRA(r) Computer Program is subject to Copyright
5
    owned by the United Kingdom Secretary of State for Defence
6
    acting through the Defence Evaluation and Research Agency
7
    (DERA).  It is made available to Recipients with a
8
    royalty-free licence for its use, reproduction, transfer
9
    to other parties and amendment for any purpose not excluding
10
    product development provided that any such use et cetera
11
    shall be deemed to be acceptance of the following conditions:-
12
 
13
        (1) Its Recipients shall ensure that this Notice is
14
        reproduced upon any copies or amended versions of it;
15
 
16
        (2) Any amended version of it shall be clearly marked to
17
        show both the nature of and the organisation responsible
18
        for the relevant amendment or amendments;
19
 
20
        (3) Its onward transfer from a recipient to another
21
        party shall be deemed to be that party's acceptance of
22
        these conditions;
23
 
24
        (4) DERA gives no warranty or assurance as to its
25
        quality or suitability for any purpose and DERA accepts
26
        no liability whatsoever in relation to any use to which
27
        it may be put.
28
*/
29
 
30
 
31
@use bytestream
32
@use tokdec_props
33
@use tokdef_props
34
@use tagdec_props
35
@use tagdef_props
36
@use al_tagdef_props
37
@use version_props
38
@special external
39
@special token
40
@special tokdec
41
@special tokdef
42
@special tagdec
43
@special tagdef
44
@special al_tagdef
45
@special version
46
@special token_defn
47
@special sortname
48
#ifndef TDF_INCLUDED
49
#define TDF_INCLUDED
50
 
51
 
52
/* AUTOMATICALLY GENERATED BY %ZX VERSION %ZV FROM TDF %VA.%VB */
53
 
54
extern void init_constructs PROTO_S ( ( void ) ) ;
55
extern sortname find_sort PROTO_S ( ( char ) ) ;
56
 
57
@loop sort
58
@if sort.basic
59
@if sort.special
60
extern long de_%SN_bits PROTO_S ( ( void ) ) ;
61
@else
62
extern node *de_%SN PROTO_S ( ( void ) ) ;
63
@endif
64
@endif
65
@end
66
 
67
#ifdef ENC_TYPES_INCLUDED
68
@loop sort
69
@if sort.basic
70
@if sort.special
71
extern void enc_%SN_bits PROTO_S ( ( bitstream *, int ) ) ;
72
@else
73
@if sort.edge
74
extern void enc_%SN_bits PROTO_S ( ( bitstream *, int ) ) ;
75
@endif
76
@endif
77
@endif
78
@end
79
#endif
80
 
81
@loop sort
82
@if sort.basic
83
@if !sort.special
84
extern node *read_%SN PROTO_S ( ( long ) ) ;
85
@endif
86
@endif
87
@end
88
 
89
#define VERSION_capsule		%48t"TDFC"
90
#define VERSION_library		%48t"TDFL"
91
#define VERSION_major		%48t%VA
92
#define VERSION_minor		%48t%VB
93
 
94
@loop sort
95
@if sort.unit
96
#define LINK_%SN		%48t"%SU"
97
@endif
98
@end
99
#define LINK_tld_props		%48t"tld"
100
 
101
@loop sort
102
@if sort.link
103
#define LINK_%SN		%48t"%SL"
104
@endif
105
@end
106
 
107
@special !sortname
108
@loop sort
109
@if sort.eq.sortname
110
@loop sort.cons
111
@if cons.eq.alignment_sort
112
#define SORT_alignment		%48t%CE
113
@else
114
#define SORT_%CN		%48t%CE
115
@endif
116
@end
117
#define SORT_foreign		%48tENC_foreign_sort
118
#define SORT_callees		%48t%1SM
119
#define SORT_error_code		%48t%2SM
120
#define SORT_sortname		%48t0
121
#define SORT_unknown		%48t%u
122
#define SORT_repeat		%48t( -%u )
123
#define SORT_option		%48t( -%u )
124
#define SORT_completion		%48t( -%u )
125
#define SORT_small_tdfint	%48t( -%u )
126
@loop sort
127
@if sort.builtin
128
#define SORT_%SN		%48t( -%u )
129
@endif
130
@end
131
#define SORT_max		%48t%SM
132
#define SORT_no			%48t%3SM
133
@endif
134
@end
135
 
136
@loop sort
137
@if sort.basic
138
@loop sort.cons
139
#define ENC_%27CN	%48t%CE
140
@end
141
@if sort.eq.shape
142
#define ENC_shape_none	%48t%1SM
143
@endif
144
@endif
145
@end
146
 
147
 
148
#endif