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
obsidiansystems
GHC
Commits
32578fc5
Commit
32578fc5
authored
Feb 16, 2010
by
Simon Marlow
Browse files
disable a false assertion, with a comment to explain why
parent
c44aaa10
Changes
1
Show whitespace changes
Inline
Side-by-side
rts/Capability.h
View file @
32578fc5
...
@@ -294,7 +294,8 @@ recordMutableCap (StgClosure *p, Capability *cap, nat gen)
...
@@ -294,7 +294,8 @@ recordMutableCap (StgClosure *p, Capability *cap, nat gen)
bdescr
*
bd
;
bdescr
*
bd
;
// We must own this Capability in order to modify its mutable list.
// We must own this Capability in order to modify its mutable list.
ASSERT
(
cap
->
running_task
==
myTask
());
// ASSERT(cap->running_task == myTask());
// NO: assertion is violated by performPendingThrowTos()
bd
=
cap
->
mut_lists
[
gen
];
bd
=
cap
->
mut_lists
[
gen
];
if
(
bd
->
free
>=
bd
->
start
+
BLOCK_SIZE_W
)
{
if
(
bd
->
free
>=
bd
->
start
+
BLOCK_SIZE_W
)
{
bdescr
*
new_bd
;
bdescr
*
new_bd
;
...
...
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