Welcome to the CHICKEN Scheme pasting service
condition->list doesn't work pasted by certainty on Thu Jun 2 14:26:50 2011
(module justatest (foo) (import chicken scheme) (define (foo) (handle-exceptions exn (condition->list exn) (error "Just a test"))) ) (import justatest) (foo) ;; error ;; ;; ;; Warning: reference to possibly unbound identifier `condition->list' in: ;; Warning: foo ;; ;; Error: module unresolved: justatest ;; ;; Call history: ;; ;; <syntax> [foo] (k6 (##core#lambda () (condition->list exn))) ;; <syntax> [foo] (##core#lambda () (condition->list exn)) ;; <syntax> [foo] (##core#begin (condition->list exn)) ;; <syntax> [foo] (condition->list exn) ;; <syntax> [foo] (##core#lambda () (##sys#call-with-values (##core#lambda () (error "Just a test")) (##core#lambda ar...... ;; <syntax> [foo] (##core#begin (##sys#call-with-values (##core#lambda () (error "Just a test")) (##core#lambda args7 ... ;; <syntax> [foo] (##sys#call-with-values (##core#lambda () (error "Just a test")) (##core#lambda args7 (k6 (##core#la...... ;; <syntax> [foo] (##core#lambda () (error "Just a test")) ;; <syntax> [foo] (##core#begin (error "Just a test")) ;; <syntax> [foo] (error "Just a test") ;; <syntax> [foo] (##core#lambda args7 (k6 (##core#lambda () (##sys#apply ##sys#values args7)))) ;; <syntax> [foo] (##core#begin (k6 (##core#lambda () (##sys#apply ##sys#values args7)))) ;; <syntax> [foo] (k6 (##core#lambda () (##sys#apply ##sys#values args7))) ;; <syntax> [foo] (##core#lambda () (##sys#apply ##sys#values args7)) ;; <syntax> [foo] (##core#begin (##sys#apply ##sys#values args7)) ;; <syntax> [foo] (##sys#apply ##sys#values args7) <--
csi added by certainty on Thu Jun 2 14:27:29 2011
CHICKEN (c)2008-2011 The Chicken Team (c)2000-2007 Felix L. Winkelmann Version 4.7.0 linux-unix-gnu-x86 [ manyargs dload ptables ] compiled 2011-05-17 on box (Linux) ; loading /home/closure/.csirc ... ; loading /home/closure/lib/chicken/5/readline.import.so ... ; loading /home/closure/lib/chicken/5/scheme.import.so ... ; loading /home/closure/lib/chicken/5/chicken.import.so ... ; loading /home/closure/lib/chicken/5/foreign.import.so ... ; loading /home/closure/lib/chicken/5/ports.import.so ... ; loading /home/closure/lib/chicken/5/data-structures.import.so ... ; loading /home/closure/lib/chicken/5/posix.import.so ... ; loading /home/closure/lib/chicken/5/readline.so ... #;1> (load "test.scm") ; loading test.scm ... Warning: reference to possibly unbound identifier `condition->list' in: Warning: foo Error: module unresolved: justatest Call history: <syntax> [foo] (k24 (##core#lambda () (condition->list exn))) <syntax> [foo] (##core#lambda () (condition->list exn)) <syntax> [foo] (##core#begin (condition->list exn)) <syntax> [foo] (condition->list exn) <syntax> [foo] (##core#lambda () (##sys#call-with-values (##core#lambda () (error "Just a test")) (##core#lambda ar...... <syntax> [foo] (##core#begin (##sys#call-with-values (##core#lambda () (error "Just a test")) (##core#lambda args25...... <syntax> [foo] (##sys#call-with-values (##core#lambda () (error "Just a test")) (##core#lambda args25 (k24 (##core#...... <syntax> [foo] (##core#lambda () (error "Just a test")) <syntax> [foo] (##core#begin (error "Just a test")) <syntax> [foo] (error "Just a test") <syntax> [foo] (##core#lambda args25 (k24 (##core#lambda () (##sys#apply ##sys#values args25)))) <syntax> [foo] (##core#begin (k24 (##core#lambda () (##sys#apply ##sys#values args25)))) <syntax> [foo] (k24 (##core#lambda () (##sys#apply ##sys#values args25))) <syntax> [foo] (##core#lambda () (##sys#apply ##sys#values args25)) <syntax> [foo] (##core#begin (##sys#apply ##sys#values args25)) <syntax> [foo] (##sys#apply ##sys#values args25) <-- #;1> condition->list #<procedure (f_18819 x4064)> #;2>