mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-18 21:29:18 +02:00
Improve error output
This commit is contained in:
parent
05a29727ad
commit
64a464429a
1 changed files with 6 additions and 7 deletions
13
icyc.scm
13
icyc.scm
|
@ -15,13 +15,12 @@
|
|||
(with-exception-handler
|
||||
(lambda (obj)
|
||||
(display "Error: ")
|
||||
(write obj)
|
||||
; TODO:
|
||||
;(for-each
|
||||
; (lambda (o)
|
||||
; (display o)
|
||||
; (display " "))
|
||||
; obj)
|
||||
(for-each
|
||||
(lambda (o)
|
||||
(display o)
|
||||
(display " "))
|
||||
obj)
|
||||
(display "\n")
|
||||
(k #t))
|
||||
(lambda ()
|
||||
(repl)))))
|
||||
|
|
Loading…
Add table
Reference in a new issue