Changeset 140


Ignore:
Timestamp:
Dec 19, 2003, 3:33:01 PM (21 years ago)
Author:
Gary Byers
Message:

Call MAP-OBJC-CLASS on (true) classes; MAP-OBJC-CLASS will handle the
metaclass.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/examples/process-objc-modules.lisp

    r135 r140  
    149149         module
    150150         #'(lambda (class)
     151             (unless (logtest #$CLS_META (pref class :objc_class.info))
     152               (map-objc-class class))
    151153             (process-class-methods class methodfun)))
    152154        (process-module-categories       
Note: See TracChangeset for help on using the changeset viewer.