Added arpl instruction

diff --git a/mach/i386/as/mach2.c b/mach/i386/as/mach2.c
index ad099af..18c16fc 100644 (file)
--- a/mach/i386/as/mach2.c
+++ b/mach/i386/as/mach2.c
@@ -17,8 +17,8 @@
 %token <y_word> RSYSTR
 %token <y_word> PREFIX
 %token <y_word> ADDOP
+%token <y_word> ARPLOP
 %token <y_word> BITTEST
-%token <y_word> BOUND
 %token <y_word> CALFOP
 %token <y_word> CALLOP
 %token <y_word> ENTER

diff --git a/mach/i386/as/mach3.c b/mach/i386/as/mach3.c
index 70a61e1..eca3888 100644 (file)
--- a/mach/i386/as/mach3.c
+++ b/mach/i386/as/mach3.c
@@ -279,6 +279,7 @@
 0,     TEST,           1,              "test",
 0,     XCHG,           0,              "xchgb",
 0,     XCHG,           1,              "xchg",
+0,     ARPLOP,         0143,           "arpl",
 
 /* Intel 80[23]87 coprocessor keywords */
 

diff --git a/mach/i386/as/mach4.c b/mach/i386/as/mach4.c
index dec6708..0197651 100644 (file)
--- a/mach/i386/as/mach4.c
+++ b/mach/i386/as/mach4.c
@@ -42,8 +42,6 @@ oper  :       NOOP_1
                        }
        |       BITTEST ea_ea
                        {       bittestop($1);}
-       |       BOUND R32 ',' mem
-                       {       emit1($1); ea_2($2<<3); }
        |       ADDOP ea_ea
                        {       addop($1);}
        |       ROLOP ea_ea
@@ -72,6 +70,8 @@ oper  :       NOOP_1
                        {       emit1($1); ea_2($2<<3);}
        |       LEAOP2 R32 ',' mem
                        {       emit1(0xF); emit1($1); ea_2($2<<3);}
+       |       ARPLOP mem ',' R32
+                       {       emit1($1); ea_2($4<<3);}
        |       LSHFT   ea_1 ',' R32 ',' ea_2
                        {       extshft($1, $4);}
        |       EXTEND R32 ',' ea_2