Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Dylan Yudaken
GHC
Commits
7db4d71d
Commit
7db4d71d
authored
Aug 03, 2009
by
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
Changes
1
Hide whitespace changes
Inline
Side-by-side
rts/Exception.cmm
View file @
7db4d71d
...
...
@@ -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
;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment