diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2022-10-17 13:54:22 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2022-10-18 13:32:30 -0400 |
| commit | 4dc14be1c7ea79652f7d6dd5af95d31c87e01e45 (patch) | |
| tree | f611c931693721f171ad321966e2689772bec5af /rts/Interpreter.c | |
| parent | c1e5719aa500cb9e0f2549eb9b9e2255038ac35d (diff) | |
| download | haskell-wip/drop-long-reg.tar.gz | |
cmm: Drop LongReg GlobalRegswip/drop-long-reg
This register is not mapped to a machine register on any platform that
we currently support. Consequently, it doesn't really make sense to
carry around the infrastructure for this register.
Diffstat (limited to 'rts/Interpreter.c')
| -rw-r--r-- | rts/Interpreter.c | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/rts/Interpreter.c b/rts/Interpreter.c index 581238c36a..57fba55b35 100644 --- a/rts/Interpreter.c +++ b/rts/Interpreter.c @@ -1337,19 +1337,6 @@ run_BCO: goto nextInsn; } - case bci_PUSH_ALTS_L: { - int o_bco = BCO_GET_LARGE_ARG; - SpW(-2) = (W_)&stg_ctoi_L1_info; - SpW(-1) = BCO_PTR(o_bco); - Sp_subW(2); -#if defined(PROFILING) - Sp_subW(2); - SpW(1) = (W_)cap->r.rCCCS; - SpW(0) = (W_)&stg_restore_cccs_info; -#endif - goto nextInsn; - } - case bci_PUSH_ALTS_V: { int o_bco = BCO_GET_LARGE_ARG; SpW(-2) = (W_)&stg_ctoi_V_info; |