Changeset 33730 in project


Ignore:
Timestamp:
11/04/16 21:21:35 (3 years ago)
Author:
felix winkelmann
Message:

trace 1.0: bugfix by Peter Bex/Matt? Welland for recent feature extensions

Location:
release/4/trace
Files:
1 edited
3 copied

Legend:

Unmodified
Added
Removed
  • release/4/trace/tags/1.0/trace.scm

    r33687 r33730  
    7373    (when (trace-call-sites)
    7474      (display "     called from " port)
    75       (let* ((cooked-data (car (get-call-chain)))
     75      (let* ((cooked-data (last (get-call-chain)))
    7676             (mode (vector-ref cooked-data 0))
    7777             (expr/form (vector-ref cooked-data 1))
  • release/4/trace/trunk/trace.scm

    r33687 r33730  
    7373    (when (trace-call-sites)
    7474      (display "     called from " port)
    75       (let* ((cooked-data (car (get-call-chain)))
     75      (let* ((cooked-data (last (get-call-chain)))
    7676             (mode (vector-ref cooked-data 0))
    7777             (expr/form (vector-ref cooked-data 1))
Note: See TracChangeset for help on using the changeset viewer.