Changeset 4957

Timestamp:

Aug 18, 2006, 8:42:56 AM (18 years ago)

Author:

Gary Byers

Message:

Backend now has a lisp-context-register slot.

File:

• trunk/ccl/compiler/backend.lisp (modified) (1 diff)

trunk/ccl/compiler/backend.lisp

@@ -57 +57 @@
   (platform-syscall-mask 0)
   (define-callback nil)
-  (defcallback-body nil))
+  (defcallback-body nil)
+  (lisp-context-register 0))
 
 (defmethod print-object ((b backend) s)