|
|
1.1 ! root 1: /* VAX-11/780 Registers */ ! 2: ! 3: /* scratch registers */ ! 4: # define R0 0 ! 5: # define R1 1 ! 6: # define R2 2 ! 7: # define R3 3 ! 8: # define R4 4 ! 9: # define R5 5 ! 10: ! 11: /* register variables */ ! 12: # define R6 6 ! 13: # define R7 7 ! 14: # define R8 8 ! 15: # define R9 9 ! 16: # define R10 10 ! 17: # define R11 11 ! 18: ! 19: /* special purpose */ ! 20: # define AP 12 /* argument pointer */ ! 21: # define FP 13 /* frame pointer */ ! 22: # define SP 14 /* stack pointer */ ! 23: # define PC 15 /* program counter */ ! 24: ! 25: /* floating registers */ ! 26: ! 27: /* there are no floating point registers on the VAX */ ! 28: ! 29: extern int fregs; ! 30: extern int maxargs; ! 31: ! 32: # define BYTEOFF(x) ((x)&03) ! 33: # define wdal(k) (BYTEOFF(k)==0) ! 34: /* # define BITOOR(x) ((x)>>3) /* bit offset to oreg offset */ ! 35: extern long BITOOR(); ! 36: ! 37: # define REGSZ 16 ! 38: ! 39: # define TMPREG FP ! 40: ! 41: # define R2REGS /* permit double indexing */ ! 42: ! 43: # define STOARG(p) /* just evaluate the arguments, and be done with it... */ ! 44: # define STOFARG(p) ! 45: # define STOSTARG(p) ! 46: # define genfcall(a,b) gencall(a,b) ! 47: ! 48: # define NESTCALLS ! 49: ! 50: # define MYREADER(p) myreader(p) ! 51: int optim2(); ! 52: # define special(a, b) 0
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.