Changeset 14377

Timestamp:

Oct 27, 2010, 1:01:20 PM (14 years ago)

Author:

Gary Byers

Message:

*CLASS-INIT-KEYWORDS* needs to be an EQ hash table: ObjC class addresses
can change, but we can use class identity here.

File:

• trunk/source/objc-bridge/objc-support.lisp (modified) (1 diff)

trunk/source/objc-bridge/objc-support.lisp

@@ -108 +108 @@
 
 
-(defvar *class-init-keywords* (make-hash-table))
+(defvar *class-init-keywords* (make-hash-table :test #'eq))
 
 (defun process-init-message (message-info)