Index: /branches/arm/lisp-kernel/arm-subprims.s
===================================================================
--- /branches/arm/lisp-kernel/arm-subprims.s	(revision 13800)
+++ /branches/arm/lisp-kernel/arm-subprims.s	(revision 13801)
@@ -40,4 +40,5 @@
 	__(bl _SPmkcatch1v)     /* preserves nfn, at the moment */
 	__(b local_label(test))	/* cleanup address, not really a branch */
+        __(ldr nfn,[vsp,#0])
 	__(set_nargs(0))
         __(funcall_nfn())