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

Fix missing exn propagation

This commit is contained in:
Tony Garnock-Jones 2015-12-03 12:53:32 -08:00
parent 506d74ed42
commit 3087658f01
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
prospect/core.rkt
View File

@ -179,8 +179,8 @@
[#f w]
[(and q (quit exn final-actions))
(trace-process-step-result e pid behavior old-state exn q)
(enqueue-actions (disable-process pid #f w) pid (append final-actions
(list 'quit)))]
(enqueue-actions (disable-process pid exn w) pid (append final-actions
(list 'quit)))]
[(and t (transition new-state new-actions))
(trace-process-step-result e pid behavior old-state #f t)
(enqueue-actions (mark-pid-runnable (update-state w pid new-state) pid)