| 1 | # define makecc(val,i) lastcon |= val<<(8*i); /* pdp-11 womp next char */ |
| 2 | |
| 3 | # define ARGINIT 288 /* initial offset for arguments */ |
| 4 | # define AUTOINIT 0 /* initial automatic offset */ |
| 5 | extern int SZCHAR; |
| 6 | extern int SZINT; |
| 7 | extern int SZFLOAT; |
| 8 | extern int SZDOUBLE; |
| 9 | extern int SZLONG; |
| 10 | extern int SZSHORT; |
| 11 | extern int SZPOINT; |
| 12 | extern int ALCHAR; |
| 13 | extern int ALINT; |
| 14 | extern int ALFLOAT; |
| 15 | extern int ALDOUBLE; |
| 16 | extern int ALLONG; |
| 17 | extern int ALSHORT; |
| 18 | extern int ALPOINT; |
| 19 | extern int ALSTRUCT; |
| 20 | # define SAVEADJUST 0 /* bits of adjustment required for stackframe */ |
| 21 | |
| 22 | |
| 23 | /* type (INT OR LONG) big enough to hold pointers */ |
| 24 | |
| 25 | |
| 26 | /* size in which constants are converted */ |
| 27 | /* should be long if feasable */ |
| 28 | |
| 29 | # define CONSZ long |
| 30 | # define CONFMT "%Ld" |
| 31 | # define CONOFMT "%Lo" |
| 32 | |
| 33 | /* size in which offsets are kept |
| 34 | /* should be large enough to cover address space in bits |
| 35 | */ |
| 36 | |
| 37 | # define OFFSZ long |
| 38 | |
| 39 | /* character set macro */ |
| 40 | |
| 41 | # define CCTRANS(x) x |
| 42 | |
| 43 | /* register cookie for stack pointer */ |
| 44 | |
| 45 | # define STKREG 9 |
| 46 | |
| 47 | /* maximum and minimum register variable values */ |
| 48 | |
| 49 | # define MAXRVAR 1000 |
| 50 | # define MINRVAR 1 |
| 51 | |
| 52 | /* many macro definitions for functions irrelevant to lint */ |
| 53 | |
| 54 | # define locctr(n) 0 |
| 55 | # define getlab() 10 |
| 56 | # define genswitch( x,y) |
| 57 | # define bccode() |
| 58 | # define cendarg() |
| 59 | # define incode(a,s) (inoff += (s)) |
| 60 | # define fincode(a,s) (inoff += (s) ) |
| 61 | # define vfdzero(n) (inoff += (n)) |
| 62 | # define aobeg() |
| 63 | # define aoend() |
| 64 | |
| 65 | # ifndef unix |
| 66 | # define NOFORTRAN {extern int pflag; if(pflag) werror( "fortran keyword nonportable" );} |
| 67 | # else |
| 68 | # define NOFORTRAN { werror( "fortran keyword nonportable" ); } |
| 69 | # endif |
| 70 | |
| 71 | # define LINT |