diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2007-08-24 10:18:03 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2007-08-24 10:18:03 +0000 |
| commit | 9a11883c00f70f767edf567ca6c4ab8731032e20 (patch) | |
| tree | 390b4422014f92db5efe2ef99791d87d71db2e57 /rts | |
| parent | 0d88de0b114a391712bc117d42928b49fba4d66a (diff) | |
| download | haskell-9a11883c00f70f767edf567ca6c4ab8731032e20.tar.gz | |
FIX #1519, crash in biographical profiling
In eval_thunk_selector(), when filling the slop for a closure we've
just updated, we were using the wrong info table. This bug appears to
have been in 6.6, too.
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/sm/Evac.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/Evac.c b/rts/sm/Evac.c index d437e3f786..d533e5d2bf 100644 --- a/rts/sm/Evac.c +++ b/rts/sm/Evac.c @@ -905,7 +905,7 @@ selector_loop: #ifdef PROFILING // For the purposes of LDV profiling, we have destroyed // the original selector thunk. - SET_INFO(p, info_ptr); + SET_INFO(selectee, info_ptr); LDV_RECORD_DEAD_FILL_SLOP_DYNAMIC(selectee); #endif ((StgInd *)selectee)->indirectee = val; |