suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix prompt for MrEd load handler

Browse Source 
svn: r5177

original commit: 91d68735fa7a02356c08d1181bca941213f95bca
This commit is contained in:
Matthew Flatt 2006-12-24 02:14:19 +00:00
parent c89d244c7c
commit 23fad5e470
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
collects/mred/private/snipfile.ss
View File

@ -213,7 +213,13 @@
(datum->syntax-object (datum->syntax-object
#f #f
(cons '#%top-interaction exp) (cons '#%top-interaction exp)
exp))))) exp)))
(default-continuation-prompt-tag)
(lambda args
(apply
abort-current-continuation
(default-continuation-prompt-tag)
args))))
(lambda x (loop x))))))))) (lambda x (loop x)))))))))
(lambda () (lambda ()
(close-input-port in-port))))) (close-input-port in-port)))))