diff options
author | Ian Lynagh <igloo@earth.li> | 2008-07-30 12:01:34 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2008-07-30 12:01:34 +0000 |
commit | aa9a4f1053d3c554629a2ec25955e7530c95b892 (patch) | |
tree | 7d9839bc410e92c7b0a6e35713fbbf03673338be /rts/PrimOps.cmm | |
parent | 179a3a7bd67ccc816e3b934eff770fb49c4cc456 (diff) | |
download | haskell-aa9a4f1053d3c554629a2ec25955e7530c95b892.tar.gz |
Follow extensible exception changes
Diffstat (limited to 'rts/PrimOps.cmm')
-rw-r--r-- | rts/PrimOps.cmm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/PrimOps.cmm b/rts/PrimOps.cmm index 99d71abbf2..b8d8ccc5a9 100644 --- a/rts/PrimOps.cmm +++ b/rts/PrimOps.cmm @@ -49,7 +49,7 @@ import __gmpz_com; import pthread_mutex_lock; import pthread_mutex_unlock; #endif -import base_GHCziIOBase_NestedAtomically_closure; +import base_ControlziException_nestedAtomically_closure; import EnterCriticalSection; import LeaveCriticalSection; @@ -1251,7 +1251,7 @@ atomicallyzh_fast /* Nested transactions are not allowed; raise an exception */ if (old_trec != NO_TREC) { - R1 = base_GHCziIOBase_NestedAtomically_closure; + R1 = base_ControlziException_nestedAtomically_closure; jump raisezh_fast; } |