Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-20 06:09:17 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Improve error output

Browse source
This commit is contained in:
Justin Ethier 2015-03-24 16:16:03 -04:00
parent 05a29727ad
commit 64a464429a
1 changed files with 6 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
icyc.scm
View file

@ -15,13 +15,12 @@
(with-exception-handler (with-exception-handler
(lambda (obj) (lambda (obj)
(display "Error: ") (display "Error: ")
(write obj) (for-each
; TODO: (lambda (o)
;(for-each (display o)
; (lambda (o) (display " "))
; (display o) obj)
; (display " ")) (display "\n")
; obj)
(k #t)) (k #t))
(lambda () (lambda ()
(repl))))) (repl)))))