Changeset 10417


Ignore:
Timestamp:
Aug 10, 2008, 11:03:07 AM (11 years ago)
Author:
gb
Message:

MAKE-LOAD-FORM method for CLASS-CELL has to quote class name.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/l1-clos.lisp

    r10376 r10417  
    16741674(defmethod make-load-form ((c class-cell) &optional env)
    16751675  (declare (ignore env))
    1676   `(find-class-cell ,(class-cell-name c)))
     1676  `(find-class-cell ',(class-cell-name c)))
    16771677
    16781678
Note: See TracChangeset for help on using the changeset viewer.