Index: /branches/ia32/lisp-kernel/x86-spentry32.s
===================================================================
--- /branches/ia32/lisp-kernel/x86-spentry32.s	(revision 8466)
+++ /branches/ia32/lisp-kernel/x86-spentry32.s	(revision 8467)
@@ -1134,5 +1134,6 @@
 _spentry(tcallsymslide)
 	__(movl %ebp,%imm0)
-	__(subl %nargs,%imm0)	/* new tos */
+	__(subl %nargs,%imm0)
+	__(addl $nargregs*node_size,%imm0)	/* new tos */
 	__(push %imm0)
 	__(push %arg_y)
@@ -1153,5 +1154,5 @@
 	__(pop %arg_y)
 	__(pop %esp)
-	__(push -node_size(%ebp))
+	__(push node_size(%ebp))
 	__(movl 0(%ebp),%ebp)
 	__(jump_fname)