1 /*-------------------------------------------------------------------------
2 SDCCsymt.h - Header file for Symbols table related structures and MACRO's.
3 Written By - Sandeep Dutta . sandeep.dutta@usa.net (1998)
5 This program is free software; you can redistribute it and/or modify it
6 under the terms of the GNU General Public License as published by the
7 Free Software Foundation; either version 2, or (at your option) any
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19 In other words, you are welcome to use, share and improve this program.
20 You are forbidden to forbid anyone else to use, share and improve
21 what you give them. Help stamp out software-hoarding!
22 -------------------------------------------------------------------------*/
27 #define MAX_NEST_LEVEL 256
28 #define SDCC_SYMNAME_MAX 64
29 #define SDCC_NAME_MAX 3*SDCC_SYMNAME_MAX // big enough for _<func>_<var>_etc
30 #include "SDCChasht.h"
31 #include "SDCCglobl.h"
55 // values for first byte of generic pointer.
59 #define GPTYPE_XSTACK 3
60 #define GPTYPE_GPTR 4 // Never used?
61 #define GPTYPE_IDATA 5
63 #define HASHTAB_SIZE 256
65 /* hash table bucket */
68 void *sym; /* pointer to the object */
69 char name[SDCC_NAME_MAX + 1]; /* name of this symbol */
70 int level; /* nest level for this symbol */
71 int block; /* belongs to which block */
72 struct bucket *prev; /* ptr 2 previous bucket */
73 struct bucket *next; /* ptr 2 next bucket */
77 typedef struct structdef
79 char tag[SDCC_NAME_MAX + 1]; /* tag part of structure */
80 unsigned char level; /* Nesting level */
81 struct symbol *fields; /* pointer to fields */
82 unsigned size; /* sizeof the table in bytes */
86 /* noun definitions */
122 /* specifier is the last in the type-chain */
123 typedef struct specifier
125 NOUN noun; /* CHAR INT STRUCTURE LABEL */
126 STORAGE_CLASS sclass; /* REGISTER,AUTO,FIX,CONSTANT */
127 struct memmap *oclass; /* output storage class */
128 unsigned _long:1; /* 1=long */
129 unsigned _short:1; /* 1=short int */
130 unsigned _unsigned:1; /* 1=unsigned, 0=signed */
131 unsigned _signed:1; /* just for sanity checks only*/
132 unsigned _static:1; /* 1=static keyword found */
133 unsigned _extern:1; /* 1=extern found */
134 unsigned _absadr:1; /* absolute address specfied */
135 unsigned _volatile:1; /* is marked as volatile */
136 unsigned _const:1; /* is a constant */
137 unsigned _typedef:1; /* is typedefed */
138 unsigned _isregparm:1; /* is the first parameter */
139 unsigned _isenum:1; /* is an enumerated type */
140 unsigned _addr; /* address of symbol */
141 unsigned _stack; /* stack offset for stacked v */
142 unsigned _bitStart; /* bit start position */
143 int _bitLength; /* bit length */
144 int argreg; /* reg no for regparm */
146 { /* Values if constant or enum */
147 TYPE_WORD v_int; /* 2 bytes: int and char values */
148 char *v_char; /* character string */
149 TYPE_UWORD v_uint; /* 2 bytes: unsigned int const value */
150 TYPE_DWORD v_long; /* 4 bytes: long constant value */
151 TYPE_UDWORD v_ulong; /* 4 bytes: unsigned long constant val */
152 double v_float; /* floating point constant value */
153 struct symbol *v_enum; /* ptr 2 enum_list if enum==1 */
156 struct structdef *v_struct; /* structure pointer */
160 /* types of declarators */
163 POINTER = 0, /* pointer to near data */
164 FPOINTER, /* pointer to far data */
165 CPOINTER, /* pointer to code space */
166 GPOINTER, /* _generic pointer */
167 PPOINTER, /* paged area pointer */
168 IPOINTER, /* pointer to upper 128 bytes */
169 UPOINTER, /* unknown pointer used only when parsing */
170 EEPPOINTER, /* pointer to eeprom */
176 typedef struct declarator
178 DECLARATOR_TYPE dcl_type; /* POINTER,ARRAY or FUNCTION */
179 unsigned int num_elem; /* # of elems if type==array */
180 unsigned ptr_const:1; /* pointer is constant */
181 unsigned ptr_volatile:1; /* pointer is volatile */
182 struct sym_link *tspec; /* pointer type specifier */
190 #define DECLSPEC2TXT(select) (select==DECLARATOR?"DECLARATOR":select==SPECIFIER?"SPECIFIER":"UNKNOW")
192 typedef struct sym_link
194 SYM_LINK_CLASS class; /* DECLARATOR or SPECIFIER */
195 unsigned tdef:1; /* current link created by */
196 /* typedef if this flag is set */
199 specifier s; /* if CLASS == SPECIFIER */
200 declarator d; /* if CLASS == DECLARATOR */
203 /* function attributes */
205 struct value *args; /* the defined arguments */
206 unsigned hasVargs:1; /* functions has varargs */
207 unsigned calleeSaves:1; /* functions uses callee save */
208 unsigned hasbody:1; /* function body defined */
209 unsigned hasFcall:1; /* does it call other functions */
210 unsigned reent:1; /* function is reentrant */
211 unsigned naked:1; /* naked function */
213 unsigned nonbanked:1; /* function has the nonbanked attribute */
214 unsigned banked:1; /* function has the banked attribute */
215 unsigned critical:1; /* critical function */
216 unsigned intrtn:1; /* this is an interrupt routin */
217 unsigned rbank:1; /* seperate register bank */
218 unsigned intno; /* 1=Interrupt svc routine */
219 unsigned regbank; /* register bank 2b used */
220 unsigned builtin; /* is a builtin function */
221 unsigned javaNative; /* is a JavaNative Function (TININative ONLY) */
222 unsigned overlay; /* force parameters & locals into overlay segment */
223 unsigned hasStackParms; /* function has parameters on stack */
226 struct sym_link *next; /* next element on the chain */
230 typedef struct symbol
232 char name[SDCC_SYMNAME_MAX + 1]; /* Input Variable Name */
233 char rname[SDCC_NAME_MAX + 1]; /* internal name */
235 short level; /* declration lev,fld offset */
236 short block; /* sequential block # of defintion */
238 unsigned implicit:1; /* implicit flag */
239 unsigned undefined:1; /* undefined variable */
240 unsigned _isparm:1; /* is a parameter */
241 unsigned ismyparm:1; /* is parameter of the function being generated */
242 unsigned isitmp:1; /* is an intermediate temp */
243 unsigned islbl:1; /* is a temporary label */
244 unsigned isref:1; /* has been referenced */
245 unsigned isind:1; /* is a induction variable */
246 unsigned isinvariant:1; /* is a loop invariant */
247 unsigned cdef:1; /* compiler defined symbol */
248 unsigned addrtaken:1; /* address of the symbol was taken */
249 unsigned isreqv:1; /* is the register quivalent of a symbol */
250 unsigned udChked:1; /* use def checking has been already done */
252 /* following flags are used by the backend
253 for code generation and can be changed
254 if a better scheme for backend is thought of */
255 unsigned isLiveFcall:1; /* is live at or across a function call */
256 unsigned isspilt:1; /* has to be spilt */
257 unsigned spillA:1; /* spilt be register allocator */
258 unsigned remat:1; /* can be remateriazed */
259 unsigned isptr:1; /* is a pointer */
260 unsigned uptr:1; /* used as a pointer */
261 unsigned isFree:1; /* used by register allocator */
262 unsigned islocal:1; /* is a local variable */
263 unsigned blockSpil:1; /* spilt at block level */
264 unsigned remainSpil:1; /* spilt because not used in remainder */
265 unsigned stackSpil:1; /* has been spilt on temp stack location */
266 unsigned onStack:1; /* this symbol allocated on the stack */
267 unsigned iaccess:1; /* indirect access */
268 unsigned ruonly:1; /* used in return statement only */
269 unsigned spildir:1; /* spilt in direct space */
270 unsigned ptrreg:1; /* this symbol assigned to a ptr reg */
271 unsigned noSpilLoc:1; /* cannot be assigned a spil location */
272 unsigned isstrlit; /* is a string literal and it's usage count */
273 unsigned accuse; /* can be left in the accumulator
274 On the Z80 accuse is devided into
275 ACCUSE_A and ACCUSE_HL as the idea
278 unsigned dptr; /* 8051 variants with multiple DPTRS
279 currently implemented in DS390 only
281 int allocreq ; /* allocation is required for this variable */
282 int stack; /* offset on stack */
283 int xstack; /* offset on xternal stack */
284 short nRegs; /* number of registers required */
285 short regType; /* type of register required */
287 struct regs *regs[4]; /* can have at the most 4 registers */
288 struct asmop *aop; /* asmoperand for this symbol */
289 struct iCode *fuse; /* furthest use */
290 struct iCode *rematiCode; /* rematerialse with which instruction */
291 struct operand *reqv; /* register equivalent of a local variable */
294 struct symbol *spillLoc; /* register spil location */
295 struct set *itmpStack; /* symbols spilt @ this stack location */
298 short bitVar; /* this is a bit variable */
299 unsigned offset; /* offset from top if struct */
301 int lineDef; /* defined line number */
302 int lastLine; /* for functions the last line */
303 struct sym_link *type; /* 1st link to declator chain */
304 struct sym_link *etype; /* last link to declarator chn */
305 struct symbol *next; /* crosslink to next symbol */
306 struct symbol *localof; /* local variable of which function */
307 struct initList *ival; /* ptr to initializer if any */
308 struct bitVect *defs; /* bit vector for definitions */
309 struct bitVect *uses; /* bit vector for uses */
310 struct bitVect *regsUsed; /* for functions registers used */
311 int liveFrom; /* live from iCode sequence number */
312 int liveTo; /* live to sequence number */
313 int used; /* no. of times this was used */
314 int recvSize; /* size of first argument */
315 struct bitVect *clashes; /* overlaps with what other symbols */
319 extern sym_link *validateLink(sym_link *l,
325 /* Easy Access Macros */
326 #define DCL_TYPE(l) validateLink(l, "DCL_TYPE", #l, DECLARATOR, __FILE__, __LINE__)->select.d.dcl_type
327 #define DCL_ELEM(l) validateLink(l, "DCL_ELEM", #l, DECLARATOR, __FILE__, __LINE__)->select.d.num_elem
328 #define DCL_PTR_CONST(l) validateLink(l, "DCL_PTR_CONST", #l, DECLARATOR, __FILE__, __LINE__)->select.d.ptr_const
329 #define DCL_PTR_VOLATILE(l) validateLink(l, "DCL_PTR_VOLATILE", #l, DECLARATOR, __FILE__, __LINE__)->select.d.ptr_volatile
330 #define DCL_TSPEC(l) validateLink(l, "DCL_TSPEC", #l, DECLARATOR, __FILE__, __LINE__)->select.d.tspec
332 #define FUNC_DEBUG //assert(IS_FUNC(x));
333 #define FUNC_HASVARARGS(x) (x->funcAttrs.hasVargs)
334 #define IFFUNC_HASVARARGS(x) (IS_FUNC(x) && FUNC_HASVARARGS(x))
335 #define FUNC_ARGS(x) (x->funcAttrs.args)
336 #define IFFUNC_ARGS(x) (IS_FUNC(x) && FUNC_ARGS(x))
337 #define FUNC_HASFCALL(x) (x->funcAttrs.hasFcall)
338 #define IFFUNC_HASFCALL(x) (IS_FUNC(x) && FUNC_HASFCALL(x))
339 #define FUNC_HASBODY(x) (x->funcAttrs.hasbody)
340 #define IFFUNC_HASBODY(x) (IS_FUNC(x) && FUNC_HASBODY(x))
341 #define FUNC_CALLEESAVES(x) (x->funcAttrs.calleeSaves)
342 #define IFFUNC_CALLEESAVES(x) (IS_FUNC(x) && FUNC_CALLEESAVES(x))
343 #define FUNC_ISISR(x) (x->funcAttrs.intrtn)
344 #define IFFUNC_ISISR(x) (IS_FUNC(x) && FUNC_ISISR(x))
345 #define IFFUNC_RBANK(x) (IS_FUNC(x) && FUNC_RBANK(x))
346 #define FUNC_INTNO(x) (x->funcAttrs.intno)
347 #define FUNC_REGBANK(x) (x->funcAttrs.regbank)
348 #define FUNC_HASSTACKPARM(x) (x->funcAttrs.hasStackParms)
350 #define FUNC_ISREENT(x) (x->funcAttrs.reent)
351 #define IFFUNC_ISREENT(x) (IS_FUNC(x) && FUNC_ISREENT(x))
352 #define FUNC_ISNAKED(x) (x->funcAttrs.naked)
353 #define IFFUNC_ISNAKED(x) (IS_FUNC(x) && FUNC_ISNAKED(x))
354 #define FUNC_NONBANKED(x) (x->funcAttrs.nonbanked)
355 #define IFFUNC_NONBANKED(x) (IS_FUNC(x) && FUNC_NONBANKED(x))
356 #define FUNC_BANKED(x) (x->funcAttrs.banked)
357 #define IFFUNC_BANKED(x) (IS_FUNC(x) && FUNC_BANKED(x))
358 #define FUNC_ISCRITICAL(x) (x->funcAttrs.critical)
359 #define IFFUNC_ISCRITICAL(x) (IS_FUNC(x) && FUNC_ISCRITICAL(x))
360 #define FUNC_ISBUILTIN(x) (x->funcAttrs.builtin)
361 #define IFFUNC_ISBUILTIN(x) (IS_FUNC(x) && FUNC_ISBUILTIN(x))
362 #define FUNC_ISJAVANATIVE(x) (x->funcAttrs.javaNative)
363 #define IFFUNC_ISJAVANATIVE(x) (IS_FUNC(x) && FUNC_ISJAVANATIVE(x))
364 #define FUNC_ISOVERLAY(x) (x->funcAttrs.overlay)
365 #define IFFUNC_ISOVERLAY(x) (IS_FUNC(x) && FUNC_ISOVERLAY(x))
367 #define IFFUNC_ISBANKEDCALL(x) (!IFFUNC_NONBANKED(x) && \
368 (options.model == MODEL_LARGE || \
369 options.model == MODEL_MEDIUM || \
372 #define SPEC_NOUN(x) validateLink(x, "SPEC_NOUN", #x, SPECIFIER, __FILE__, __LINE__)->select.s.noun
373 #define SPEC_LONG(x) validateLink(x, "SPEC_LONG", #x, SPECIFIER, __FILE__, __LINE__)->select.s._long
374 #define SPEC_USIGN(x) validateLink(x, "SPEC_USIGN", #x, SPECIFIER, __FILE__, __LINE__)->select.s._unsigned
375 #define SPEC_SCLS(x) validateLink(x, "SPEC_SCLS", #x, SPECIFIER, __FILE__, __LINE__)->select.s.sclass
376 #define SPEC_ENUM(x) validateLink(x, "SPEC_ENUM", #x, SPECIFIER, __FILE__, __LINE__)->select.s._isenum
377 #define SPEC_OCLS(x) validateLink(x, "SPEC_OCLS", #x, SPECIFIER, __FILE__, __LINE__)->select.s.oclass
378 #define SPEC_STAT(x) validateLink(x, "SPEC_STAT", #x, SPECIFIER, __FILE__, __LINE__)->select.s._static
379 #define SPEC_EXTR(x) validateLink(x, "SPEC_EXTR", #x, SPECIFIER, __FILE__, __LINE__)->select.s._extern
380 #define SPEC_CODE(x) validateLink(x, "SPEC_CODE", #x, SPECIFIER, __FILE__, __LINE__)->select.s._codesg
381 #define SPEC_ABSA(x) validateLink(x, "SPEC_ABSA", #x, SPECIFIER, __FILE__, __LINE__)->select.s._absadr
382 #define SPEC_BANK(x) validateLink(x, "SPEC_BANK", #x, SPECIFIER, __FILE__, __LINE__)->select.s._regbank
383 #define SPEC_ADDR(x) validateLink(x, "SPEC_ADDR", #x, SPECIFIER, __FILE__, __LINE__)->select.s._addr
384 #define SPEC_STAK(x) validateLink(x, "SPEC_STAK", #x, SPECIFIER, __FILE__, __LINE__)->select.s._stack
385 #define SPEC_CVAL(x) validateLink(x, "SPEC_CVAL", #x, SPECIFIER, __FILE__, __LINE__)->select.s.const_val
386 #define SPEC_BSTR(x) validateLink(x, "SPEC_BSTR", #x, SPECIFIER, __FILE__, __LINE__)->select.s._bitStart
387 #define SPEC_BLEN(x) validateLink(x, "SPEC_BLEN", #x, SPECIFIER, __FILE__, __LINE__)->select.s._bitLength
389 /* Sleaze: SPEC_ISR_SAVED_BANKS is only used on
390 * function type symbols, which obviously cannot
391 * be of BIT type. Therefore, we recycle the
392 * _bitStart field instead of defining a new field.
394 #define SPEC_ISR_SAVED_BANKS(x) validateLink(x, "SPEC_NOUN", #x, SPECIFIER, __FILE__, __LINE__)->select.s._bitStart
395 #define SPEC_VOLATILE(x) validateLink(x, "SPEC_NOUN", #x, SPECIFIER, __FILE__, __LINE__)->select.s._volatile
396 #define SPEC_CONST(x) validateLink(x, "SPEC_NOUN", #x, SPECIFIER, __FILE__, __LINE__)->select.s._const
397 #define SPEC_STRUCT(x) validateLink(x, "SPEC_NOUN", #x, SPECIFIER, __FILE__, __LINE__)->select.s.v_struct
398 #define SPEC_TYPEDEF(x) validateLink(x, "SPEC_NOUN", #x, SPECIFIER, __FILE__, __LINE__)->select.s._typedef
399 #define SPEC_REGPARM(x) validateLink(x, "SPEC_NOUN", #x, SPECIFIER, __FILE__, __LINE__)->select.s._isregparm
400 #define SPEC_ARGREG(x) validateLink(x, "SPEC_NOUN", #x, SPECIFIER, __FILE__, __LINE__)->select.s.argreg
402 /* type check macros */
403 #define IS_DECL(x) ( x && x->class == DECLARATOR )
404 #define IS_SPEC(x) ( x && x->class == SPECIFIER )
405 #define IS_ARRAY(x) (IS_DECL(x) && DCL_TYPE(x) == ARRAY)
406 #define IS_DATA_PTR(x) (IS_DECL(x) && DCL_TYPE(x) == POINTER)
407 #define IS_PTR(x) (IS_DECL(x) && (DCL_TYPE(x) == POINTER || \
408 DCL_TYPE(x) == FPOINTER || \
409 DCL_TYPE(x) == GPOINTER || \
410 DCL_TYPE(x) == IPOINTER || \
411 DCL_TYPE(x) == PPOINTER || \
412 DCL_TYPE(x) == EEPPOINTER || \
413 DCL_TYPE(x) == CPOINTER || \
414 DCL_TYPE(x) == UPOINTER ))
415 #define IS_PTR_CONST(x) (IS_PTR(x) && DCL_PTR_CONST(x))
416 #define IS_FARPTR(x) (IS_DECL(x) && DCL_TYPE(x) == FPOINTER)
417 #define IS_CODEPTR(x) (IS_DECL(x) && DCL_TYPE(x) == CPOINTER)
418 #define IS_GENPTR(x) (IS_DECL(x) && DCL_TYPE(x) == GPOINTER)
419 #define IS_FUNC(x) (IS_DECL(x) && DCL_TYPE(x) == FUNCTION)
420 #define IS_LONG(x) (IS_SPEC(x) && x->select.s._long)
421 #define IS_UNSIGNED(x) (IS_SPEC(x) && x->select.s._unsigned)
422 #define IS_TYPEDEF(x)(IS_SPEC(x) && x->select.s._typedef)
423 #define IS_CONSTANT(x) (!x ? 0 : \
425 x->select.s._const : \
426 x->select.d.ptr_const)
427 #define IS_STRUCT(x) (IS_SPEC(x) && x->select.s.noun == V_STRUCT)
428 #define IS_ABSOLUTE(x) (IS_SPEC(x) && x->select.s._absadr )
429 #define IS_REGISTER(x) (IS_SPEC(x) && SPEC_SCLS(x) == S_REGISTER)
430 #define IS_RENT(x) (IS_SPEC(x) && x->select.s._reent )
431 #define IS_STATIC(x) (IS_SPEC(x) && SPEC_STAT(x))
432 #define IS_INT(x) (IS_SPEC(x) && x->select.s.noun == V_INT)
433 #define IS_VOID(x) (IS_SPEC(x) && x->select.s.noun == V_VOID)
434 #define IS_CHAR(x) (IS_SPEC(x) && x->select.s.noun == V_CHAR)
435 #define IS_EXTERN(x) (IS_SPEC(x) && x->select.s._extern)
436 #define IS_VOLATILE(x) (!x ? 0 : \
438 x->select.s._volatile : \
439 x->select.d.ptr_volatile)
440 #define IS_INTEGRAL(x) (IS_SPEC(x) && (x->select.s.noun == V_INT || \
441 x->select.s.noun == V_CHAR || \
442 x->select.s.noun == V_BIT || \
443 x->select.s.noun == V_SBIT ))
444 #define IS_BITFIELD(x) (IS_SPEC(x) && (x->select.s.noun == V_BIT))
445 #define IS_BITVAR(x) (IS_SPEC(x) && (x->select.s.noun == V_BIT || \
446 x->select.s.noun == V_SBIT ))
447 #define IS_FLOAT(x) (IS_SPEC(x) && x->select.s.noun == V_FLOAT)
448 #define IS_ARITHMETIC(x) (IS_INTEGRAL(x) || IS_FLOAT(x))
449 #define IS_AGGREGATE(x) (IS_ARRAY(x) || IS_STRUCT(x))
450 #define IS_LITERAL(x) (IS_SPEC(x) && x->select.s.sclass == S_LITERAL)
451 #define IS_CODE(x) (IS_SPEC(x) && SPEC_SCLS(x) == S_CODE)
452 #define IS_REGPARM(x) (IS_SPEC(x) && SPEC_REGPARM(x))
454 /* forward declaration for the global vars */
455 extern bucket *SymbolTab[];
456 extern bucket *StructTab[];
457 extern bucket *TypedefTab[];
458 extern bucket *LabelTab[];
459 extern bucket *enumTab[];
460 extern symbol *__fsadd;
461 extern symbol *__fssub;
462 extern symbol *__fsmul;
463 extern symbol *__fsdiv;
464 extern symbol *__fseq;
465 extern symbol *__fsneq;
466 extern symbol *__fslt;
467 extern symbol *__fslteq;
468 extern symbol *__fsgt;
469 extern symbol *__fsgteq;
471 /* Dims: mul/div/mod, BYTE/WORD/DWORD, SIGNED/UNSIGNED */
472 extern symbol *__muldiv[3][3][2];
473 /* Dims: BYTE/WORD/DWORD SIGNED/UNSIGNED */
474 extern sym_link *__multypes[3][2];
475 /* Dims: to/from float, BYTE/WORD/DWORD, SIGNED/USIGNED */
476 extern symbol *__conv[2][3][2];
477 /* Dims: shift left/shift right, BYTE/WORD/DWORD, SIGNED/UNSIGNED */
478 extern symbol *__rlrr[2][3][2];
480 #define CHARTYPE __multypes[0][0]
481 #define UCHARTYPE __multypes[0][1]
482 #define INTTYPE __multypes[1][0]
483 #define UINTTYPE __multypes[1][1]
484 #define LONGTYPE __multypes[2][0]
485 #define ULONGTYPE __multypes[2][1]
488 extern sym_link *floatType;
492 /* forward definitions for the symbol table related functions */
494 symbol *newSymbol (char *, int);
495 sym_link *newLink (SYM_LINK_CLASS);
496 sym_link *newFloatLink ();
497 structdef *newStruct (char *);
498 void addDecl (symbol *, int, sym_link *);
499 sym_link *mergeSpec (sym_link *, sym_link *, char *name);
500 symbol *reverseSyms (symbol *);
501 sym_link *reverseLink (sym_link *);
502 symbol *copySymbol (symbol *);
503 symbol *copySymbolChain (symbol *);
504 void printSymChain (symbol *, int);
505 void printStruct (structdef *, int);
506 char *genSymName (int);
507 sym_link *getSpec (sym_link *);
508 char *genSymName (int);
509 int compStructSize (int, structdef *);
510 sym_link *copyLinkChain (sym_link *);
511 int checkDecl (symbol *, int);
512 void checkBasic (sym_link *, sym_link *);
513 value *checkPointerIval (sym_link *, value *);
514 value *checkStructIval (symbol *, value *);
515 value *checkArrayIval (sym_link *, value *);
516 value *checkIval (sym_link *, value *);
517 unsigned int getSize (sym_link *);
518 unsigned int bitsForType (sym_link *);
519 sym_link *newIntLink ();
520 sym_link *newCharLink ();
521 sym_link *newLongLink ();
522 int compareType (sym_link *, sym_link *);
523 int checkFunction (symbol *, symbol *);
524 void cleanUpLevel (bucket **, int);
525 void cleanUpBlock (bucket **, int);
526 int funcInChain (sym_link *);
527 void addSymChain (symbol *);
528 sym_link *structElemType (sym_link *, value *);
529 symbol *getStructElement (structdef *, symbol *);
530 sym_link *computeType (sym_link *, sym_link *);
531 void processFuncArgs (symbol *);
532 int isSymbolEqual (symbol *, symbol *);
533 int powof2 (unsigned long);
534 void printTypeChain (sym_link *, FILE *);
535 void initCSupport ();
536 void initBuiltIns ();
537 void pointerTypes (sym_link *, sym_link *);
538 void cdbStructBlock (int);
540 bucket *newBucket ();
541 void addSym (bucket **, void *, char *, int, int, int checkType);
542 void deleteSym (bucket **, void *, char *);
543 void *findSym (bucket **, void *, const char *);
544 void *findSymWithLevel (bucket **, struct symbol *);
545 void *findSymWithBlock (bucket **, struct symbol *, int);
546 void changePointer (symbol * sym);
547 void checkTypeSanity(sym_link *etype, char *name);
548 sym_link *typeFromStr (char *) ;
551 extern char *nounName(sym_link *); /* noun strings */
552 extern void printFromToType (sym_link *, sym_link *);