Index: /branches/arm/lisp-kernel/arm-spentry.s
===================================================================
--- /branches/arm/lisp-kernel/arm-spentry.s	(revision 13853)
+++ /branches/arm/lisp-kernel/arm-spentry.s	(revision 13854)
@@ -399,5 +399,5 @@
 1:
 	__(vpop1(arg_y))
-	__(Cons(arg_z,arg_z,arg_z))
+	__(Cons(arg_z,arg_y,arg_z))
 	__(subs nargs,nargs,#fixnum_one)
 2:
@@ -1054,4 +1054,5 @@
         __(add temp2,temp2,#node_size)
         __(mov imm0,temp2,lsl #num_subtag_bits-word_shift)
+        __(add temp2,temp2,#node_size)
         __(orr imm0,imm0,#subtag_u32_vector)
         __(stack_allocate_zeroed_ivector(imm0,temp2))
