Changeset 827

Timestamp:

Jun 5, 2004, 11:01:31 PM (20 years ago)

Author:

Gary Byers

Message:

Ensure TSP valid before asserting lisp-mode in ffi return.

File:

• trunk/ccl/lisp-kernel/spentry.s (modified) (1 diff)

trunk/ccl/lisp-kernel/spentry.s

@@ -3647 +3647 @@
         __(mr rcontext,imm2)
         __(li imm2,TCR_STATE_LISP)
+        __(ldr(tsp,tcr.save_tsp(rcontext)))
         __(str(imm2,tcr.valence(rcontext)))     
         __(ldr(allocptr,tcr.save_allocptr(rcontext)))
         __(ldr(allocbase,tcr.save_allocbase(rcontext)))
-        __(ldr(tsp,tcr.save_tsp(rcontext)))
         __(ldr(loc_pc,lisp_frame.savelr(sp)))
         __(mtlr loc_pc)