Commit 18f1d72e authored by Simon Marlow's avatar Simon Marlow
Browse files

A sanity check

parent 5c3ea9fb
......@@ -614,6 +614,8 @@ allocate (Capability *cap, lnat n)
}
p = bd->free;
bd->free += n;
IF_DEBUG(sanity, ASSERT(*((StgWord8*)p) == 0xaa));
return p;
}
......
Markdown is supported
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