Subversion Repositories tendra.SVN

Rev

Rev 2 | Go to most recent revision | Details | Compare with Previous | 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 
/* AUTOMATICALLY GENERATED BY %ZX VERSION %ZV FROM TDF %VA.%VB */
32 
 
33 
#ifndef EXTERNS_INCLUDED
34 
#define EXTERNS_INCLUDED
35 
 
36 
@use all
37 
@special exp
38 
@loop sort
39 
@if !sort.builtin
40 
 
41 
/* CONSTRUCTS FOR %ST */
42 
@if sort.simple
43 
@loop sort.cons
44 
@if cons.params
45 
@loop cons.param
46 
@if param.break
47 
@if param.first
48 
extern void start_%CN PROTO_S ( ( void ) ) ;
49 
@else
50 
extern void start_%CN PROTO_S ( (%
51 
@loop param.prev
52 
 %PSN,%
53 
@end
54 
%b ) ) ;
55 
@endif
56 
@endif
57 
@end
58 
extern %SN f_%CN PROTO_S ( (%
59 
@loop cons.param
60 
 %PSN,%
61 
@end
62 
%b ) ) ;
63 
@else
64 
@if sort.special
65 
extern %SN f_%CN PROTO_S ( ( void ) ) ;
66 
@else
67 
extern %SN f_%CN ;
68 
@endif
69 
@endif
70 
@end
71 
extern %SN f_dummy_%SN ;
72 
@else
73 
@if sort.option
74 
extern %SN yes_%SN PROTO_S ( ( %SSN ) ) ;
75 
extern %SN no_%SN ;
76 
@else
77 
extern %SN new_%SN PROTO_S ( ( int ) ) ;
78 
extern %SN add_%SN PROTO_S ( ( %SN, %SSN, int ) ) ;
79 
@endif
80 
@endif
81 
extern void init_%SN PROTO_S ( ( void ) ) ;
82 
@endif
83 
@end
84 
 
85 
 
86 
#endif