summaryrefslogtreecommitdiff
path: root/rts/Exception.cmm
diff options
context:
space:
mode:
authorSimon Marlow <simonmarhaskell@gmail.com>2008-04-17 18:00:16 +0000
committerSimon Marlow <simonmarhaskell@gmail.com>2008-04-17 18:00:16 +0000
commita4e09e8f27b81e915b128ef244c7b0d082bfb89a (patch)
treeb76a87535876f90c91e2294dad113bb26006b11b /rts/Exception.cmm
parente7987f16175f88daa11f06f25d10161a95f84bc4 (diff)
downloadhaskell-a4e09e8f27b81e915b128ef244c7b0d082bfb89a.tar.gz
tso->link is now tso->_link (fix after merge with HEAD)
Diffstat (limited to 'rts/Exception.cmm')
-rw-r--r--rts/Exception.cmm2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Exception.cmm b/rts/Exception.cmm
index 75f2c15d93..cba5d48d72 100644
--- a/rts/Exception.cmm
+++ b/rts/Exception.cmm
@@ -222,7 +222,7 @@ killThreadzh_fast
*/
loop:
if (StgTSO_what_next(target) == ThreadRelocated::I16) {
- target = StgTSO_link(target);
+ target = StgTSO__link(target);
goto loop;
}
if (target == CurrentTSO) {