Commit a35a6325 authored by simonmar's avatar simonmar
Browse files

[project @ 2003-10-22 11:11:59 by simonmar]

thread_stack(RET_BCO): Grab the pointer to the BCO *before* threading
it.  Fixes crashes when using compacting GC with GHCi.

I noticed while debugging this that compacting GC is horrendously slow
now, which might have something to do with the new eval/apply PAP
layouts.  That's something to investigate later.
parent 2f177529
/* -----------------------------------------------------------------------------
* $Id: GCCompact.c,v 1.16 2003/04/22 16:25:10 simonmar Exp $
* $Id: GCCompact.c,v 1.17 2003/10/22 11:11:59 simonmar Exp $
*
* (c) The GHC Team 2001
*
......@@ -317,8 +317,8 @@ thread_stack(StgPtr p, StgPtr stack_end)
nat size;
p++;
thread(p);
bco = (StgBCO *)*p;
thread(p);
p++;
size = BCO_BITMAP_SIZE(bco);
thread_large_bitmap(p, BCO_BITMAP(bco), size);
......
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