diff options
Diffstat (limited to 'rts/Exception.cmm')
| -rw-r--r-- | rts/Exception.cmm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/rts/Exception.cmm b/rts/Exception.cmm index 39a2abad9a..c2f0dde675 100644 --- a/rts/Exception.cmm +++ b/rts/Exception.cmm @@ -14,7 +14,7 @@ #include "RaiseAsync.h" #ifdef __PIC__ -import base_GHCziBase_True_closure; +import ghczmprim_GHCziBool_True_closure; #endif /* ----------------------------------------------------------------------------- @@ -440,8 +440,8 @@ retry_pop_stack: Sp(5) = stg_raise_ret_info; Sp(4) = stg_noforceIO_info; // required for unregisterised Sp(3) = exception; // the AP_STACK - Sp(2) = base_GHCziBase_True_closure; // dummy breakpoint info - Sp(1) = base_GHCziBase_True_closure; // True <=> a breakpoint + Sp(2) = ghczmprim_GHCziBool_True_closure; // dummy breakpoint info + Sp(1) = ghczmprim_GHCziBool_True_closure; // True <=> a breakpoint R1 = ioAction; jump RET_LBL(stg_ap_pppv); } |