diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2012-11-14 10:12:56 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2012-11-16 11:26:19 +0000 |
| commit | 97dc57c6e2bdbddd0a0170a283149a570a07179c (patch) | |
| tree | cfc8e60fe5df4349254a8e23950a7ca9daee5aa5 /rts/sm/Sanity.c | |
| parent | 6e4f6c624fcd72dca11d7856f1a1914a01c22718 (diff) | |
| download | haskell-97dc57c6e2bdbddd0a0170a283149a570a07179c.tar.gz | |
fix bug in previous commit, 65e46f144f3d8b18de7264b0b099086153c68d6c
Diffstat (limited to 'rts/sm/Sanity.c')
| -rw-r--r-- | rts/sm/Sanity.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c index a760e571b4..fb6a857f9e 100644 --- a/rts/sm/Sanity.c +++ b/rts/sm/Sanity.c @@ -510,7 +510,7 @@ checkTSO(StgTSO *tso) } next = tso->_link; - info = (const StgInfoTable*) tso->header.info; + info = (const StgInfoTable*) tso->_link->header.info; ASSERT(next == END_TSO_QUEUE || info == &stg_MVAR_TSO_QUEUE_info || |