conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

no exit

This commit is contained in:
Yuichi Nishiwaki 2014-07-28 13:22:24 +09:00
parent 786cf9d894
commit dd52dee01c
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tools/main.scm
View File

@ -57,9 +57,7 @@
(display "> ") (display "> ")
(let ((expr (read))) (let ((expr (read)))
(if (eof-object? expr) (if (eof-object? expr)
(begin (newline) ; exit
(newline)
(exit 0))
(begin (begin
(call/cc (call/cc
(lambda (leave) (lambda (leave)