0.9.2.43:
[sbcl.git] / src / compiler / alpha / memory.lisp
index 426d580..fef2a83 100644 (file)
@@ -41,7 +41,7 @@
     (loadw value object (+ base offset) lowtag)))
 (define-vop (slot-set)
   (:args (object :scs (descriptor-reg))
-        (value :scs (descriptor-reg any-reg null zero)))
+         (value :scs (descriptor-reg any-reg null zero)))
   (:variant-vars base lowtag)
   (:info offset)
   (:generator 4