Changeset 16205


Ignore:
Timestamp:
Sep 18, 2014, 7:50:34 PM (5 years ago)
Author:
plkrueger
Message:

Bug Fixes to Cocoa Tools contrib

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/cocoa-ide-contrib/krueger/InterfaceProjects/Utilities/ns-object-utils.lisp

    r16204 r16205  
    7272
    7373(defun retain-if-necessary (obj)
     74  (declare (special *unconverting*))
    7475  (when (and *unconverting* (ccl::objc-object-p obj)
    7576             (#/retain obj)))
     
    525526                   (slot-class (find-class slot-class-str nil))
    526527                   (objc-slot-val (#/objectForKey: obj-dict (lisp-to-temp-nsstring slot-str)))
    527                    (*retain-objc-objects* t)
    528528                   (slot-val (ns-to-lisp-object
    529529                              objc-slot-val
Note: See TracChangeset for help on using the changeset viewer.