Bell 32V development

[unix-history] / usr / src / cmd / pcc / mac2defs

diff --git a/usr/src/cmd/pcc/mac2defs b/usr/src/cmd/pcc/mac2defs
index 59476ee..6b75d71 100644 (file)
--- a/usr/src/cmd/pcc/mac2defs
+++ b/usr/src/cmd/pcc/mac2defs
@@ -1,51 +1,51 @@
-/*     PDP11 Registers */
+/*     VAX-11/780 Registers */

 
        /* scratch registers */
 # define R0 0
 # define R1 1
 
        /* scratch registers */
 # define R0 0
 # define R1 1

-
-       /* register variables */

 # define R2 2
 # define R3 3
 # define R4 4
 # define R2 2
 # define R3 3
 # define R4 4

+# define R5 5
+
+       /* register variables */
+# define R6 6
+# define R7 7
+# define R8 8
+# define R9 9
+# define R10 10
+# define R11 11

 
        /* special purpose */
 
        /* special purpose */

-# define R5 5  /* frame pointer */
-# define SP 6  /* stack pointer */
-# define PC 7  /* program counter */
+# define AP 12         /* argument pointer */
+# define FP 13         /* frame pointer */
+# define SP 14 /* stack pointer */
+# define PC 15 /* program counter */

 
        /* floating registers */
 
 
        /* floating registers */
 

-# define FR0 8
-# define FR1 9
-# define FR2 10
-# define FR3 11
-# define FR4 12
-# define FR5 13
+       /* there are no floating point registers on the VAX */

 
 

-# define SAVEREGION 8 /* number of bytes for save area */
+extern int fregs;
+extern int maxargs;

 
 

-# define BYTEOFF(x) ((x)&01)
+# define BYTEOFF(x) ((x)&03)

 # define wdal(k) (BYTEOFF(k)==0)
 # define BITOOR(x) ((x)>>3)  /* bit offset to oreg offset */
 
 # define wdal(k) (BYTEOFF(k)==0)
 # define BITOOR(x) ((x)>>3)  /* bit offset to oreg offset */
 

-# define REGSZ 14
+# define REGSZ 16

 
 

-# define TMPREG R5
+# define TMPREG FP

 
 

+# define R2REGS   /* permit double indexing */

 
 # define STOARG(p)     /* just evaluate the arguments, and be done with it... */
 # define STOFARG(p)
 # define STOSTARG(p)
 # define genfcall(a,b) gencall(a,b)
 
 
 # define STOARG(p)     /* just evaluate the arguments, and be done with it... */
 # define STOFARG(p)
 # define STOSTARG(p)
 # define genfcall(a,b) gencall(a,b)
 

+# define NESTCALL

 
 

-       /* shape for constants between -128 and 127 */
-# define SCCON (SPECIAL+100)
-       /* shape for constants between 0 and 32767 */
-# define SICON (SPECIAL+101)
-
-# define MYREADER(p) myreader(p)
-extern int fltused;
-       /* calls can be nested on the PDP-11 */
-# define NESTCALLS
+# define MYREADER(p) walkf(p, optim2)
+int optim2();
+# define special(a, b) 0