Changeset 14295
- Timestamp:
- 12/06/12 07:11:38 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.1.x/contrib/jfli/jfli.lisp
r14258 r14295 364 364 (setf class 365 365 #+abcl 366 ( sys::ensure-class class-sym :direct-superclasses (mapcar #'(lambda (c) (find-class (class-symbol c))) supers))))366 (mop::ensure-class class-sym :direct-superclasses (mapcar #'(lambda (c) (find-class (class-symbol c))) supers)))) 367 367 (setf (get class-sym :ensured) t) 368 368 class))))
Note: See TracChangeset
for help on using the changeset viewer.