syndicate-lang
/
syndicate-2017
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Remove dead code

This commit is contained in:
Tony Garnock-Jones 2015-12-11 16:25:03 +13:00
parent b0d20f328a
commit cd6f5a0f59
1 changed files with 1 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
prospect/actor.rkt
View File

@ -159,14 +159,7 @@
(lambda reply-values
(call-with-continuation-prompt (lambda ()
(apply k reply-values)
(error 'reply-to "Script returned directly")
;; TODO: v
#;(with-handlers [((lambda (e) #t)
(lambda (exn)
(call-in-raw-context/abort
(lambda () (quit-instruction exn '())))))]
(apply k reply-values)
(error 'reply-to "Script returned directly")))
(error 'reply-to "Script returned directly"))
prompt)))
;; (-> Instruction) -> Nothing