X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fhppa%2Falloc.lisp;h=0d41dcbff4463bcac72699b0719adb543ab190d8;hb=c75cf4e142aaf9a72433ea6db778d8111a0b1c83;hp=8ad6676b3f665caf88bf1d90deafba03825ec197;hpb=b9e94e326f79ab01e56cb437e424ce5ea489471f;p=sbcl.git

diff --git a/src/compiler/hppa/alloc.lisp b/src/compiler/hppa/alloc.lisp
index 8ad6676..0d41dcb 100644
--- a/src/compiler/hppa/alloc.lisp
+++ b/src/compiler/hppa/alloc.lisp
@@ -133,6 +133,8 @@
   (:args (value :to :save :scs (descriptor-reg any-reg)))
   (:temporary (:scs (non-descriptor-reg)) temp)
   (:results (result :scs (descriptor-reg)))
+  (:info stack-allocate-p)
+  (:ignore stack-allocate-p)
   (:generator 10
     (with-fixed-allocation
         (result temp value-cell-header-widetag value-cell-size))