forked from esnacc/esnacc-ng
-
Notifications
You must be signed in to change notification settings - Fork 0
/
snacc.h.in
175 lines (161 loc) · 4.35 KB
/
snacc.h.in
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
/*
* file: snacc.h
*
* INSERT_VDA_COMMENTS
*
* $Header: /baseline/SNACC/snacc.h,v 1.13 2004/03/22 20:04:00 gronej Exp $
* $Log: snacc.h,v $
* Revision 1.13 2004/03/22 20:04:00 gronej
* took IBM references out of the code (to the best of our knowledge, we don't use any of it anymore)
*
* Revision 1.12 2003/12/17 19:05:02 gronej
* SNACC baseline merged with PER v1_7 tag
*
* Revision 1.11.2.1 2003/11/05 14:58:53 gronej
* working PER code merged with esnacc_1_6
*
* Revision 1.11 2003/02/21 12:13:16 leonberp
* cleaned up project settings for 1.5 release
*
* Revision 1.10 2002/12/16 17:23:11 mcphersc
* DISABLED TCL
*
* Revision 1.9 2002/12/13 17:43:43 mcphersc
* Modified the defines for META and TCL for use with the configure script
*
* Revision 1.8 2002/12/13 17:31:56 mcphersc
* Modified TCL/META defines
*
* Revision 1.7 2002/12/10 14:21:19 mcphersc
* *** empty log message ***
*
* Revision 1.6 2002/12/10 13:41:10 mcphersc
* Added undefine of TCL for compiler code only.
*
* Revision 1.5 2002/09/04 18:33:43 vracarl
* got rid of c++ comments
*
* Revision 1.4 2002/05/10 16:25:43 leonberp
* latest changes for release 2.2
*
* Revision 1.3 2002/01/10 20:04:41 sfl
* Updates to Unix ./configure script so that config.h is named
* config_Used.h (similar to config_win32.h for windows). This allows the
* run-time libs and includes to use a unique include, but still be
* dynamically built for the individual platform.
*
* Revision 1.2 2000/10/24 14:54:37 rwc
* Updated to remove high-level warnings (level 4 on MSVC++) for an easier build.
* SOME warnings persist due to difficulty in modifying the SNACC compiler to
* properly build clean source; also some files are built by Lex/Yacc.
*
* Revision 1.1.1.1 2000/08/21 20:35:45 leonberp
* First CVS Version of SNACC.
*
* Revision 1.7 1997/04/07 13:13:18 wan
* Made more C++ readable (credits to Steve Walker)
*
* Revision 1.6 1997/02/28 13:39:35 wan
* Modifications collected for new version 1.3: Bug fixes, tk4.2.
*
* Revision 1.5 1997/02/15 20:38:48 rj
* In member functions, return *this after calling abort() for stupid compilers that don't seem to know about volatile abort() (they would otherwise abort with an error).
*
* Revision 1.4 1995/07/24 15:06:52 rj
* configure checks for mem* functions. define replacements using b* functions, if necessary.
*
*/
#ifndef SNACC_MAIN_H_
#define SNACC_MAIN_H_
#define memzero(p, len) memset(p, 0, len)
#ifdef __cplusplus
# ifdef VOLATILE_RETRUN
# define RETURN_THIS_FOR_COMPILERS_WITHOUT_VOLATILE_FUNCTIONS return *this;
# else
# define RETURN_THIS_FOR_COMPILERS_WITHOUT_VOLATILE_FUNCTIONS
# endif
#else
# ifndef FALSE
# define FALSE 0
# endif
# ifndef TRUE
# define TRUE 1
# endif
#endif
/*
* Inspired by gdb 4.0, for better or worse...
* (grabbed from Barry Brachman - MS)
*
* These macros munge C routine declarations such
* that they work for ANSI or non-ANSI C compilers
*/
#ifndef __USE_NON_ANSI_C__
# define PROTO(X) X
# define PARAMS(arglist, args) (args)
# define NOPARAMS() (void)
# define _AND_ ,
# define DOTS , ...
#else
# define PROTO(X) ()
# define PARAMS(arglist, args) arglist args;
# define NOPARAMS() ()
# define _AND_ ;
# define DOTS
# define void char
#endif
/*
* enable the snacc compiler's Tcl interface generating code?
* set it to 0 or 1.
*/
#ifndef NO_TCL
# define NO_TCL 0
#endif
/*
* enable code for meta code generation?
* the Tcl code needs it.
*/
#ifndef NO_META
# define NO_META NO_TCL
#endif
/*
* enable code for CORBA IDL generation?
*/
#ifndef IDL
# define IDL 1
#endif
#if COMPILER
/* If we have TCL on this system then add TCL to the compiler */
# if defined(HAVE_TCLNOT)
# define TCL HAVE_TCL
# define META 1
# endif
#elif defined (ENABLE_TCL) && defined (HAVE_TCL)
# define TCL 1
# define META 1
#endif
#ifdef ENABLE_META
# ifndef META
# define META 1
# endif
#endif
#define COMMA ,
#ifdef META
# define if_META(code) code
# if defined(TCL)
# define if_TCL(code) code
# endif
#else
# define if_META(code)
# define if_TCL(code)
#endif
#if __GNUC__
# define ESNACC_UNUSED __attribute__((__unused__))
#else
# define ESNACC_UNUSED
#endif
#if defined(_MSC_VER)
# define ESNACC_CONST_ULL(x) (x)
#else
# define ESNACC_CONST_ULL(x) (x##ULL)
#endif
#endif