Changeset 13833

Timestamp:

Jun 16, 2010, 1:48:09 AM (10 years ago)

Author:

gb

Message:

Fix instruction encoding of a few UUOs, ands, mul[s].

File:

• branches/arm/compiler/ARM/arm-asm.lisp (modified) (3 diffs)

branches/arm/compiler/ARM/arm-asm.lisp

@@ -187 +187 @@
      (:prefer-separate-cond))
    (define-arm-instruction uuo-debug-trap ()
-     #x07f002f0
+     #x07f003f0
      #x0fffffff 
      (:prefer-separate-cond))
    (define-arm-instruction uuo-interrupt-now ()
-     #x07f003f0
+     #x07f004f0
      #x0fffffff
      (:prefer-separate-cond))
    (define-arm-instruction uuo-suspend-now ()
-     #x07f004f0
+     #x07f005f0
      #x0fffffff
      (:prefer-separate-cond))
@@ -288 +288 @@
      ())
    (define-arm-instruction ands (:rd :rn :shifter)
-     #x01000000
-     ((#x03000000 . #x0ff00000)
-      (#x01000000 . #x0ff00010)
-      (#x01000010 . #x0ff00090))
+     #x00100000
+     ((#x02100000 . #x0ff00000)
+      (#x00100000 . #x0ff00010)
+      (#x00100010 . #x0ff00090))
      ())
    (define-arm-instruction eor (:rd :rn :shifter)
@@ -511 +511 @@
      ())
 
-   (define-arm-instruction mul (:rd :rm :rs)
+   (define-arm-instruction mul (:rn :rm :rs)
      #x00000090
      #x0ff000f0
      ())
-   (define-arm-instruction muls (:rd :rm :rs)
+   (define-arm-instruction muls (:rn :rm :rs)
      #x00100090
      #x0ff000f0