Welcome to the CHICKEN Scheme pasting service
trying break ,c ,f ,g added by klovett on Fri Nov 8 16:44:42 2024
#;1> (import trace) ; loading /usr/local/chicken/5/lib/chicken/11/trace.import.so ... ; loading /usr/local/chicken/5/lib/chicken/11/trace.so ... ; loading /usr/local/chicken/5/lib/chicken/11/advice.so ... ; loading /usr/local/chicken/5/lib/chicken/11/srfi-1.so ... ; loading /usr/local/chicken/5/lib/chicken/11/miscmacros.so ... #;2> (define (foo x) (print 'foo '- x)) #;3> (break foo) ; setting break-point in foo #;4> (foo 1) Error: (foo) *** breakpoint ***: (foo 1) Call history: <stdin>:5 (foo 1) <stdin>:5 (foo 1) <-- #;4> ,c 1: <stdin>:5 (foo 1) *0: <stdin>:5 (foo 1) #;4> ,f 0 1: <stdin>:5 (foo 1) *0: <stdin>:5 (foo 1) #;4> ,g x no such variable: x #;4> ,f 1 *1: <stdin>:5 (foo 1) 0: <stdin>:5 (foo 1) #;4> ,f x no such frame #;4> ,g x no environment in frame #;4> (define (bar y) (foo y)) #;5> (unbreak foo) ; removing break-point in f_677 #;6> (break foo) ; setting break-point in foo #;7> (bar 2) Error: (foo) *** breakpoint ***: (foo 2) Call history: <stdin>:15 (bar 2) <stdin>:15 (bar 2) <stdin>:12 [bar] (foo y) <-- #;7> ,g x no environment in frame #;7> ,g y no environment in frame #;7> ,c 2: <stdin>:15 (bar 2) 1: <stdin>:15 (bar 2) *0:[] <stdin>:12 [bar] (foo y) --- y25: 2 #;7> ,f 1 2: <stdin>:15 (bar 2) *1: <stdin>:15 (bar 2) 0:[] <stdin>:12 [bar] (foo y) #;7> ,g y no such variable: y #;7> ,f 2 *2: <stdin>:15 (bar 2) 1: <stdin>:15 (bar 2) 0:[] <stdin>:12 [bar] (foo y) #;7> ,g y no environment in frame #;7> ,f 1 2: <stdin>:15 (bar 2) *1: <stdin>:15 (bar 2) 0:[] <stdin>:12 [bar] (foo y) #;7> ,g y no such variable: y #;7> ,f 0 2: <stdin>:15 (bar 2) 1: <stdin>:15 (bar 2) *0:[] <stdin>:12 [bar] (foo y) --- y25: 2 #;7> ,g y ; getting y25 2 #;8>