1.0.24.12: adding and fixing the HPUX/HPPA build target

[sbcl.git] / src / compiler / hppa / arith.lisp

diff --git a/src/compiler/hppa/arith.lisp b/src/compiler/hppa/arith.lisp
index c1d4a4d..8d9ae19 100644 (file)
--- a/src/compiler/hppa/arith.lisp
+++ b/src/compiler/hppa/arith.lisp
@@ -43,13 +43,13 @@
   (:temporary (:scs (any-reg) :type fixnum :to (:result 0))
               temp)
   (:translate lognot)
-  (:generator 2
+  (:generator 1
     (inst li (fixnumize -1) temp)
     (inst xor x temp res)))
 
 (define-vop (fast-lognot/signed signed-unop)
   (:translate lognot)
-  (:generator 1
+  (:generator 2
     (inst uaddcm zero-tn x res)))
 \f
 ;;;; Binary fixnum operations.