diff options
Diffstat (limited to 'rts/StgMiscClosures.cmm')
| -rw-r--r-- | rts/StgMiscClosures.cmm | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/rts/StgMiscClosures.cmm b/rts/StgMiscClosures.cmm index fdd9f1565e..35e9a36eb9 100644 --- a/rts/StgMiscClosures.cmm +++ b/rts/StgMiscClosures.cmm @@ -512,52 +512,52 @@ CLOSURE(stg_NO_TREC_closure,stg_NO_TREC); See Note [SRTs] in compiler/cmm/CmmBuildInfoTable.hs ------------------------------------------------------------------------- */ -INFO_TABLE_CONSTR(stg_SRT_1, 1, 0, 0, CONSTR_1_0, "SRT_1", "SRT_1") +INFO_TABLE_CONSTR(stg_SRT_1, 1, 0, 0, SRT, "SRT_1", "SRT_1") { foreign "C" barf("SRT_1 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_2, 2, 0, 0, CONSTR_2_0, "SRT_2", "SRT_2") +INFO_TABLE_CONSTR(stg_SRT_2, 2, 0, 0, SRT, "SRT_2", "SRT_2") { foreign "C" barf("SRT_2 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_3, 3, 0, 0, CONSTR, "SRT_3", "SRT_3") +INFO_TABLE_CONSTR(stg_SRT_3, 3, 0, 0, SRT, "SRT_3", "SRT_3") { foreign "C" barf("SRT_3 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_4, 4, 0, 0, CONSTR, "SRT_4", "SRT_4") +INFO_TABLE_CONSTR(stg_SRT_4, 4, 0, 0, SRT, "SRT_4", "SRT_4") { foreign "C" barf("SRT_4 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_5, 5, 0, 0, CONSTR, "SRT_5", "SRT_5") +INFO_TABLE_CONSTR(stg_SRT_5, 5, 0, 0, SRT, "SRT_5", "SRT_5") { foreign "C" barf("SRT_5 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_6, 6, 0, 0, CONSTR, "SRT_6", "SRT_6") +INFO_TABLE_CONSTR(stg_SRT_6, 6, 0, 0, SRT, "SRT_6", "SRT_6") { foreign "C" barf("SRT_6 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_7, 7, 0, 0, CONSTR, "SRT_7", "SRT_7") +INFO_TABLE_CONSTR(stg_SRT_7, 7, 0, 0, SRT, "SRT_7", "SRT_7") { foreign "C" barf("SRT_7 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_8, 8, 0, 0, CONSTR, "SRT_8", "SRT_8") +INFO_TABLE_CONSTR(stg_SRT_8, 8, 0, 0, SRT, "SRT_8", "SRT_8") { foreign "C" barf("SRT_8 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_9, 9, 0, 0, CONSTR, "SRT_9", "SRT_9") +INFO_TABLE_CONSTR(stg_SRT_9, 9, 0, 0, SRT, "SRT_9", "SRT_9") { foreign "C" barf("SRT_9 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_10, 10, 0, 0, CONSTR, "SRT_10", "SRT_10") +INFO_TABLE_CONSTR(stg_SRT_10, 10, 0, 0, SRT, "SRT_10", "SRT_10") { foreign "C" barf("SRT_10 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_11, 11, 0, 0, CONSTR, "SRT_11", "SRT_11") +INFO_TABLE_CONSTR(stg_SRT_11, 11, 0, 0, SRT, "SRT_11", "SRT_11") { foreign "C" barf("SRT_11 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_12, 12, 0, 0, CONSTR, "SRT_12", "SRT_12") +INFO_TABLE_CONSTR(stg_SRT_12, 12, 0, 0, SRT, "SRT_12", "SRT_12") { foreign "C" barf("SRT_12 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_13, 13, 0, 0, CONSTR, "SRT_13", "SRT_13") +INFO_TABLE_CONSTR(stg_SRT_13, 13, 0, 0, SRT, "SRT_13", "SRT_13") { foreign "C" barf("SRT_13 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_14, 14, 0, 0, CONSTR, "SRT_14", "SRT_14") +INFO_TABLE_CONSTR(stg_SRT_14, 14, 0, 0, SRT, "SRT_14", "SRT_14") { foreign "C" barf("SRT_14 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_15, 15, 0, 0, CONSTR, "SRT_15", "SRT_15") +INFO_TABLE_CONSTR(stg_SRT_15, 15, 0, 0, SRT, "SRT_15", "SRT_15") { foreign "C" barf("SRT_15 object (%p) entered!", R1) never returns; } -INFO_TABLE_CONSTR(stg_SRT_16, 16, 0, 0, CONSTR, "SRT_16", "SRT_16") +INFO_TABLE_CONSTR(stg_SRT_16, 16, 0, 0, SRT, "SRT_16", "SRT_16") { foreign "C" barf("SRT_16 object (%p) entered!", R1) never returns; } /* --------------------------------------------------------------------------- Messages |