Changeset 15558


Ignore:
Timestamp:
Dec 31, 2012, 9:35:47 PM (6 years ago)
Author:
rme
Message:

In encode-objc-method-arglist, use with-standard-io-syntax so that
user customizations of the standard reader/printer variables won't
surprise us.

See ticket:1043.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/objc-bridge/objc-runtime.lisp

    r15540 r15558  
    22742274                                    arg-info))
    22752275               objc-forwarding-stack-offset)))
    2276       (format nil "~a~d~:{~a~d~}"
    2277               (encode-objc-type
    2278               (parse-foreign-type result-spec))
    2279               max-parm-end
    2280               arg-info))))
     2276      (with-standard-io-syntax
     2277        (format nil "~a~d~:{~a~d~}"
     2278                (encode-objc-type (parse-foreign-type result-spec))
     2279                max-parm-end
     2280                arg-info)))))
    22812281
    22822282#+x86-target
     
    23002300                    (setq offset (* target::node-size (ceiling (+ offset delta) target::node-size))))))))
    23012301    (let* ((max-parm-end offset))
    2302       (format nil "~a~d~:{~a~d~}"
    2303               (encode-objc-type
    2304               (parse-foreign-type result-spec))
    2305               max-parm-end
    2306               arg-info))))
     2302      (with-standard-io-syntax
     2303        (format nil "~a~d~:{~a~d~}"
     2304                (encode-objc-type (parse-foreign-type result-spec))
     2305                max-parm-end
     2306                arg-info)))))
    23072307
    23082308;;; In Apple Objc, a class's methods are stored in a (-1)-terminated
Note: See TracChangeset for help on using the changeset viewer.