trace logic

[Dmi]

Code Select Expand

dmi@stone:~$ cat >a.lsp
(define (func1)
 (trace true)
 (print "in func1"))

(define (func2)
 (print "in func2"))

(func1)
(func2)
dmi@stone:~$ newlisp a.lsp
in func1
-----

(define (func2 )
  #(print "in func2")#)


[-> 2 ] s|tep n|ext c|ont q|uit >

It was expected that "trace" condition will affect (print "in func1"), but it was arised too late. Probably, (trace) works not in the current function, but in next user-defined which _will_ be called...