Changeset 6189

Timestamp:

Apr 7, 2007, 8:55:48 PM (18 years ago)

Author:

Gary Byers

Message:

DEFSTATIC is now the preferred name for DEFGLOBAL.

File:

• trunk/ccl/level-1/l1-dcode.lisp (modified) (1 diff)

trunk/ccl/level-1/l1-dcode.lisp

@@ -515 +515 @@
                                (ash 1 $lfbits-method-bit)))))))
 
-(defglobal *generic-function-class-wrapper* nil)
-(defglobal *standard-generic-function-class-wrapper* nil)
+(defstatic *generic-function-class-wrapper* nil)
+(defstatic *standard-generic-function-class-wrapper* nil)
 
 (defun generic-function-p (thing)