Subversion Repositories tendra.SVN

Rev

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

Rev 2 Rev 7
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 49... Line 79...
49
#define TDF_INCLUDED
79
#define TDF_INCLUDED
50
 
80
 
51
 
81
 
52
/* AUTOMATICALLY GENERATED BY %ZX VERSION %ZV FROM TDF %VA.%VB */
82
/* AUTOMATICALLY GENERATED BY %ZX VERSION %ZV FROM TDF %VA.%VB */
53
 
83
 
54
extern void init_constructs PROTO_S ( ( void ) ) ;
84
extern void init_constructs(void);
55
extern sortname find_sort PROTO_S ( ( char ) ) ;
85
extern sortname find_sort(char);
56
 
86
 
57
@loop sort
87
@loop sort
58
@if sort.basic
88
@if sort.basic
59
@if sort.special
89
@if sort.special
60
extern long de_%SN_bits PROTO_S ( ( void ) ) ;
90
extern long de_%SN_bits(void);
61
@else
91
@else
62
extern node *de_%SN PROTO_S ( ( void ) ) ;
92
extern node *de_%SN(void);
63
@endif
93
@endif
64
@endif
94
@endif
65
@end
95
@end
66
 
96
 
67
#ifdef ENC_TYPES_INCLUDED
97
#ifdef ENC_TYPES_INCLUDED
68
@loop sort
98
@loop sort
69
@if sort.basic
99
@if sort.basic
70
@if sort.special
100
@if sort.special
71
extern void enc_%SN_bits PROTO_S ( ( bitstream *, int ) ) ;
101
extern void enc_%SN_bits(bitstream *, int);
72
@else
102
@else
73
@if sort.edge
103
@if sort.edge
74
extern void enc_%SN_bits PROTO_S ( ( bitstream *, int ) ) ;
104
extern void enc_%SN_bits(bitstream *, int);
75
@endif
105
@endif
76
@endif
106
@endif
77
@endif
107
@endif
78
@end
108
@end
79
#endif
109
#endif
80
 
110
 
81
@loop sort
111
@loop sort
82
@if sort.basic
112
@if sort.basic
83
@if !sort.special
113
@if !sort.special
84
extern node *read_%SN PROTO_S ( ( long ) ) ;
114
extern node *read_%SN(long);
85
@endif
115
@endif
86
@endif
116
@endif
87
@end
117
@end
88
 
118
 
89
#define VERSION_capsule		%48t"TDFC"
119
#define VERSION_capsule		%48t"TDFC"
Line 117... Line 147...
117
#define SORT_foreign		%48tENC_foreign_sort
147
#define SORT_foreign		%48tENC_foreign_sort
118
#define SORT_callees		%48t%1SM
148
#define SORT_callees		%48t%1SM
119
#define SORT_error_code		%48t%2SM
149
#define SORT_error_code		%48t%2SM
120
#define SORT_sortname		%48t0
150
#define SORT_sortname		%48t0
121
#define SORT_unknown		%48t%u
151
#define SORT_unknown		%48t%u
122
#define SORT_repeat		%48t( -%u )
152
#define SORT_repeat		%48t(-%u)
123
#define SORT_option		%48t( -%u )
153
#define SORT_option		%48t(-%u)
124
#define SORT_completion		%48t( -%u )
154
#define SORT_completion		%48t(-%u)
125
#define SORT_small_tdfint	%48t( -%u )
155
#define SORT_small_tdfint	%48t(-%u)
126
@loop sort
156
@loop sort
127
@if sort.builtin
157
@if sort.builtin
128
#define SORT_%SN		%48t( -%u )
158
#define SORT_%SN		%48t(-%u)
129
@endif
159
@endif
130
@end
160
@end
131
#define SORT_max		%48t%SM
161
#define SORT_max		%48t%SM
132
#define SORT_no			%48t%3SM
162
#define SORT_no			%48t%3SM
133
@endif
163
@endif