1 /* SDCCglobl.h - global macros etc required by all files */
11 * Define host port dependant constants etc.
14 #define DOS_DIR_SEPARATOR_CHAR '\\'
15 #define DOS_DIR_SEPARATOR_STRING "\\"
16 #define UNIX_DIR_SEPARATOR_CHAR '/'
17 #define UNIX_DIR_SEPARATOR_STRING "/"
19 #if defined(__BORLANDC__) /* Borland Turbo C/Win32 Host */
21 #define NATIVE_WIN32 1
22 #define DIR_SEPARATOR_CHAR DOS_DIR_SEPARATOR_CHAR
23 #define DIR_SEPARATOR_STRING DOS_DIR_SEPARATOR_STRING
25 #elif defined(_MSC_VER) /* Miscosoft VC6/Win32 Host */
27 #define NATIVE_WIN32 1
29 #define DIR_SEPARATOR_CHAR DOS_DIR_SEPARATOR_CHAR
30 #define DIR_SEPARATOR_STRING DOS_DIR_SEPARATOR_STRING
32 #elif defined(__MINGW32__) /* MINGW32 DOS Host */
34 #define NATIVE_WIN32 1
35 #define DIR_SEPARATOR_CHAR DOS_DIR_SEPARATOR_CHAR
36 #define DIR_SEPARATOR_STRING DOS_DIR_SEPARATOR_STRING
38 #else /* Assume Un*x style system */
41 #define DIR_SEPARATOR_CHAR UNIX_DIR_SEPARATOR_CHAR
42 #define DIR_SEPARATOR_STRING UNIX_DIR_SEPARATOR_STRING
51 #define MAX_FNAME_LEN 128
52 #define MAX_REG_PARMS 1
56 #define max(a,b) (a > b ? a : b)
60 #define min(a,b) (a < b ? a : b)
72 #define CHARSIZE port->s.char_size
73 #define SHORTSIZE port->s.short_size
74 #define INTSIZE port->s.int_size
75 #define LONGSIZE port->s.long_size
76 #define PTRSIZE port->s.ptr_size
77 #define FPTRSIZE port->s.fptr_size
78 #define GPTRSIZE port->s.gptr_size
79 #define BITSIZE port->s.bit_size
80 #define FLOATSIZE port->s.float_size
81 #define MAXBASESIZE port->s.max_base_size
84 #define PRAGMA_SAVE "SAVE"
85 #define PRAGMA_RESTORE "RESTORE"
86 #define PRAGMA_NOINDUCTION "NOINDUCTION"
87 #define PRAGMA_NOINVARIANT "NOINVARIANT"
88 #define PRAGMA_NOLOOPREV "NOLOOPREVERSE"
89 #define PRAGMA_INDUCTION "INDUCTION"
90 #define PRAGMA_STACKAUTO "STACKAUTO"
91 #define PRAGMA_NOJTBOUND "NOJTBOUND"
92 #define PRAGMA_NOGCSE "NOGCSE"
93 #define PRAGMA_NOOVERLAY "NOOVERLAY"
94 #define PRAGMA_CALLEESAVES "CALLEE-SAVES"
95 #define PRAGMA_EXCLUDE "EXCLUDE"
96 #define PRAGMA_NOREGPARMS "NOREGPARMS"
103 #define MAX_INLINEASM 4*1024
104 #define DEFPOOLSTACK(type,size) \
106 type *type##FreeStack [size] ; \
107 int type##StackPtr = 0 ;
109 #define PUSH(x,y) x##FreeStack[x##StackPtr++] = y
110 #define PEEK(x) x##FreeStack[x##StackPtr-1]
111 #define POP(type) type##FreeStack[--type##StackPtr]
112 /* #define POP(x) (x##StackPtr ? x##FreeStack[--x##StackPtr] : \
113 (assert(x##StackPtr),0)) */
115 #define EMPTY(x) (x##StackPtr <= 1 ? 1 : 0)
117 #define EMPTY(x) (x##StackPtr == 0 ? 1 : 0)
121 #define COPYTYPE(start,end,from) (end = getSpec (start = from))
124 /* generalpurpose stack related macros */
125 #define STACK_DCL(stack,type,size) \
126 typedef type t_##stack ; \
127 t_##stack stack[size] ; \
128 t_##stack (*p_##stack) = stack + (size); \
130 /* define extern stack */
131 #define EXTERN_STACK_DCL(stack,type,size) \
132 typedef type t_##stack ; \
133 extern t_##stack stack[size] ; \
134 extern t_##stack *p_##stack;
136 #define STACK_FULL(stack) ((p_##stack) <= stack )
137 #define STACK_EMPTY(stack) ((p_##stack) >= (stack + \
138 sizeof(stack)/sizeof(*stack)) )
140 #define STACK_PUSH_(stack,x) (*--p_##stack = (x))
141 #define STACK_POP_(stack) (*p_##stack++)
143 #define STACK_PUSH(stack,x) (STACK_FULL(stack) \
144 ?((t_##stack)(long)(STACK_ERR(1))) \
145 : STACK_PUSH_(stack,x) )
147 #define STACK_POP(stack) (STACK_EMPTY(stack) \
148 ?((t_##stack)(long)(STACK_ERR(0))) \
149 : STACK_POP_(stack) )
151 #define STACK_PEEK(stack) (STACK_EMPTY(stack) \
152 ?((t_##stack) NULL) \
155 #define STACK_ERR(o) ( o \
156 ? fprintf(stderr,"stack Overflow\n")\
157 : fprintf(stderr,"stack underflow\n"))
159 /* optimization options */
162 unsigned global_cse:1;
163 unsigned ptrArithmetic:1;
168 unsigned loopInvariant:1;
169 unsigned loopInduction:1;
170 unsigned noJTabBoundary:1;
171 unsigned noLoopReverse:1;
175 Used in options.model.A bit each as port.supported_models is an OR
187 /* other command line options */
190 int model; /* see MODEL_* defines above */
191 int stackAuto:3; /* Stack Automatic */
192 int useXstack:3; /* use Xternal Stack */
193 int stack10bit:3; /* use 10 bit stack (flat24 model only) */
194 int genericPtr:1; /* use generic pointers */
195 int regExtend:1; /* don't use extended registers */
196 int dump_raw:1; /* dump after intermediate code generation */
197 int dump_gcse:1; /* dump after gcse */
198 int dump_loop:1; /* dump after loop optimizations */
199 int dump_kill:1; /* dump after dead code elimination */
200 int dump_range:1; /* dump after live range analysis */
201 int dump_pack:1; /* dump after register packing */
202 int dump_rassgn:1; /* dump after register assignment */
203 int cc_only:1; /* compile only flag */
204 int intlong_rent:1; /* integer & long support routines reentrant */
205 int float_rent:1; /* floating point routines are reentrant */
206 int out_fmt:1; /* 1 = motorola S19 format 0 = intel Hex format */
207 int cyclomatic:1; /* print cyclomatic information */
208 int noOverlay:1; /* don't overlay local variables & parameters */
209 int mainreturn:1; /* issue a return after main */
210 int nopeep:1; /* no peep hole optimization */
211 int asmpeep:1; /* pass inline assembler thru peep hole */
212 int debug:1; /* generate extra debug info */
213 int nodebug:1; /* Generate no debug info. */
214 int stackOnData:1; /* stack after data segment */
215 int noregparms:1; /* do not pass parameters in registers */
216 int c1mode:1; /* Act like c1 - no pre-proc, asm or link */
217 char *peep_file; /* additional rules for peep hole */
218 char *out_name; /* Asm output name for c1 mode */
219 int nostdlib:1; /* Don't use standard lib files */
220 int nostdinc:1; /* Don't use standard include files */
221 int verbose:1; /* Show what the compiler is doing */
222 int ANSIint:1; /* Use ANSI integer promotion rules in expressions. */
224 char *calleeSaves[128]; /* list of functions using callee save */
225 char *excludeRegs[32]; /* registers excluded from saving */
227 /* starting address of the segments */
228 int xstack_loc; /* initial location of external stack */
229 int stack_loc; /* initial value of internal stack pointer */
230 int xdata_loc; /* xternal ram starts at address */
231 int data_loc; /* interram start location */
232 int idata_loc; /* indirect address space */
233 int code_loc; /* code location start */
234 int iram_size; /* internal ram size (used only for error checking) */
237 /* forward definition for variables accessed globally */
238 extern char *currFname;
239 extern char *srcFileName; /* source file name without the extenstion */
240 extern char *moduleName; /* source file name without path & extension */
241 extern int currLineno; /* current line number */
242 extern int yylineno; /* line number of the current file SDCC.lex */
243 extern FILE *yyin; /* */
244 extern FILE *asmFile; /* assembly output file */
245 extern FILE *cdbFile; /* debugger symbol file */
246 extern int NestLevel; /* NestLevel SDCC.y */
247 extern int stackPtr; /* stack pointer SDCC.y */
248 extern int xstackPtr; /* external stack pointer SDCC.y */
249 extern int reentrant; /* /X flag has been sent SDCC.y */
250 extern char buffer[]; /* general buffer SDCCgen.c */
251 extern int currRegBank; /* register bank being used SDCCgens.c */
252 extern struct symbol *currFunc; /* current function SDCCgens.c */
253 extern int cNestLevel; /* block nest level SDCCval.c */
254 extern int currBlockno; /* sequentail block number */
255 extern struct optimize optimize;
256 extern struct options options;
257 extern int maxInterrupts;
259 /* Visible from SDCCmain.c */
260 extern int nrelFiles;
261 extern char *relFiles[128];
262 extern char *libFiles[128];
263 extern int nlibFiles;
266 void buildCmdLine(char *into, char **args, const char **cmds,
267 const char *p1, const char *p2,
268 const char *p3, const char **list);
269 int my_system (const char *cmd, char **cmd_argv);
272 void parseWithComma (char **, char *);
274 /** Creates a temporary file a'la tmpfile which avoids the bugs
275 in cygwin wrt c:\tmp.
276 Scans, in order: TMP, TEMP, TMPDIR, else uses tmpfile().
278 FILE *tempfile (void);
280 /** Creates a duplicate of the string 'sz' a'la strdup but using
283 char *gc_strdup (const char *sz);
285 /** An assert() macro that will go out through sdcc's error
288 #define wassertl(a,s) ((a) ? 0 : \
289 (werror (E_INTERNAL_ERROR,__FILE__,__LINE__, s), 0))
291 #define wassert(a) wassertl(a,"code generator internal error")