Added *REG addressing mode, fixed a bug

diff --git a/mach/pdp/as/mach4.c b/mach/pdp/as/mach4.c
index 2921e44..ec83c0c 100644 (file)
--- a/mach/pdp/as/mach4.c
+++ b/mach/pdp/as/mach4.c
@@ -88,6 +88,8 @@ opr2
 op2
        : ari
                { $$ = ( RDEFMODE | $1); }
+       | '*' REG
+               { $$ = ( RDEFMODE | $2); }
        | ainc
                { $$ = ( AIMODE | $1 ); }
        | adec

diff --git a/mach/pdp/as/mach5.c b/mach/pdp/as/mach5.c
index 5e066d0..ea232ea 100644 (file)
--- a/mach/pdp/as/mach5.c
+++ b/mach/pdp/as/mach5.c
@@ -73,7 +73,7 @@ ejump(opc, exp) expr_t exp; {
                        emit2((opc^0400) | 04);
                }
 
-               exp_1.val = exp.val;
+               exp_1 = exp;
                im1flag = 1;
                jump(0100,067);
 # ifdef THREE_PASS