diff options
| author | Ian Lynagh <igloo@earth.li> | 2008-06-21 14:45:28 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2008-06-21 14:45:28 +0000 |
| commit | 179a3a7bd67ccc816e3b934eff770fb49c4cc456 (patch) | |
| tree | ac5b175be0aac2f14c842dc04f94406209f514fe /rts/Prelude.h | |
| parent | 1c7a841f836d3be3e21af98dd7a84079ad1096b3 (diff) | |
| download | haskell-179a3a7bd67ccc816e3b934eff770fb49c4cc456.tar.gz | |
When raising NonTermination with the RTS, build the right value
We now use a nonTermination value in the base library to take take of
constructing the SomeException value, with the dictionaries etc, for us.
We'll probably need to do the same for some other exceptions too
Diffstat (limited to 'rts/Prelude.h')
| -rw-r--r-- | rts/Prelude.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/Prelude.h b/rts/Prelude.h index f237e59bea..2acd02dfd1 100644 --- a/rts/Prelude.h +++ b/rts/Prelude.h @@ -39,7 +39,7 @@ PRELUDE_CLOSURE(base_GHCziIOBase_stackOverflow_closure); PRELUDE_CLOSURE(base_GHCziIOBase_heapOverflow_closure); PRELUDE_CLOSURE(base_GHCziIOBase_BlockedOnDeadMVar_closure); PRELUDE_CLOSURE(base_GHCziIOBase_BlockedIndefinitely_closure); -PRELUDE_CLOSURE(base_GHCziIOBase_NonTermination_closure); +PRELUDE_CLOSURE(base_GHCziIOBase_nonTermination_closure); PRELUDE_CLOSURE(base_GHCziIOBase_NestedAtomically_closure); PRELUDE_CLOSURE(base_GHCziConc_ensureIOManagerIsRunning_closure); @@ -89,7 +89,7 @@ PRELUDE_INFO(base_GHCziStable_StablePtr_con_info); #define heapOverflow_closure DLL_IMPORT_DATA_REF(base_GHCziIOBase_heapOverflow_closure) #define BlockedOnDeadMVar_closure DLL_IMPORT_DATA_REF(base_GHCziIOBase_BlockedOnDeadMVar_closure) #define BlockedIndefinitely_closure DLL_IMPORT_DATA_REF(base_GHCziIOBase_BlockedIndefinitely_closure) -#define NonTermination_closure DLL_IMPORT_DATA_REF(base_GHCziIOBase_NonTermination_closure) +#define nonTermination_closure DLL_IMPORT_DATA_REF(base_GHCziIOBase_nonTermination_closure) #define NestedAtomically_closure DLL_IMPORT_DATA_REF(base_GHCziIOBase_NestedAtomically_closure) #define Czh_static_info DLL_IMPORT_DATA_REF(base_GHCziBase_Czh_static_info) |