Changeset 2474 for trunk


Ignore:
Timestamp:
Sep 5, 2005, 5:39:29 AM (16 years ago)
Author:
gb
Message:

Don't try to reference STACK-PTR when tracing in DEFCALLBACK-BODY; it
may never have been bound. (Should probably try to separate the
traced case from the non-traced case better in all of this.)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/lib/macros.lisp

    r2453 r2474  
    25692569                     (let ,lets
    25702570                       (trace-tab)
    2571                        (format *trace-output* "CALLING ~A sp=~X~%" ',name ,stack-ptr)
     2571                       (format *trace-output* "CALLING ~A ~%" ',name)
    25722572                       ,@(let (result)
    25732573                              (dolist (l trace-args)
Note: See TracChangeset for help on using the changeset viewer.