Commit | Line | Data |
---|---|---|
42d6e430 BJ |
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 |