Commit 7db4d71d authored by Simon Marlow's avatar Simon Marlow
Browse files

rts_stop_on_exception is a C int, not a W_

amazing this hasn't caused any problems before now
parent 38b739b7
......@@ -428,7 +428,7 @@ retry_pop_stack:
// deadlock if an exception is raised in InteractiveUI,
// for exmplae. Perhaps the stop_on_exception flag should
// be per-thread.
W_[rts_stop_on_exception] = 0;
CInt[rts_stop_on_exception] = 0;
("ptr" ioAction) = foreign "C" deRefStablePtr (W_[rts_breakpoint_io_action] "ptr") [];
Sp = Sp - WDS(7);
Sp(6) = exception;
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment