Index: /branches/arm/lisp-kernel/arm-exceptions.c
===================================================================
--- /branches/arm/lisp-kernel/arm-exceptions.c	(revision 13923)
+++ /branches/arm/lisp-kernel/arm-exceptions.c	(revision 13924)
@@ -667,7 +667,8 @@
     update_area_active((area **)&tcr->vs_area, (BytePtr) ptr_from_lispobj(xpGPR(xp, vsp)));
   } else {
-    /* In ff-call.  No need to update cs_area */
+    /* In ff-call. */
     cur_allocptr = (void *) (tcr->save_allocptr);
     update_area_active((area **)&tcr->vs_area, (BytePtr) tcr->save_vsp);
+    update_area_active((area **)&tcr->cs_area, (BytePtr) tcr->last_lisp_frame);
   }