X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fassembly%2Fhppa%2Farray.lisp;h=84638ab34dd38717e2639b92945d03ca528bd7a7;hb=9dfd024c6fe1337ae7b76f0fd68b8f3208a6c987;hp=d4dc1396b792aef80ffccb3ef3908558a0189044;hpb=8a19c6876412b8ad1cf729297c2a373d63a0d0ec;p=sbcl.git

diff --git a/src/assembly/hppa/array.lisp b/src/assembly/hppa/array.lisp
index d4dc139..84638ab 100644
--- a/src/assembly/hppa/array.lisp
+++ b/src/assembly/hppa/array.lisp
@@ -5,13 +5,13 @@
      (:policy :fast-safe)
      (:translate allocate-vector)
      (:arg-types positive-fixnum
-		 positive-fixnum
-		 positive-fixnum))
+                 positive-fixnum
+                 positive-fixnum))
     ((:arg type any-reg a0-offset)
      (:arg length any-reg a1-offset)
      (:arg words any-reg a2-offset)
      (:res result descriptor-reg a0-offset)
-     
+
      (:temp ndescr non-descriptor-reg nl0-offset)
      (:temp vector descriptor-reg a3-offset))
   (pseudo-atomic ()
@@ -58,7 +58,7 @@
      (:policy :fast-safe)
      (:arg-types * positive-fixnum)
      (:result-types positive-fixnum))
-    
+
     ((:arg string descriptor-reg a0-offset)
      (:arg length any-reg a1-offset)
      (:res result any-reg a0-offset)