summaryrefslogtreecommitdiff
path: root/rts/Exception.cmm
diff options
context:
space:
mode:
authorEdward Z. Yang <ezyang@cs.stanford.edu>2014-10-20 15:57:13 -0700
committerEdward Z. Yang <ezyang@cs.stanford.edu>2014-10-20 16:28:42 -0700
commit89a8d817f0c2951ec305c286a526205d06bf9221 (patch)
tree5295cab951600148bd83f1cae0ae5250816dc257 /rts/Exception.cmm
parent0202b7cefbaf76dc53d43562dbc84a52debe2eb2 (diff)
downloadhaskell-89a8d817f0c2951ec305c286a526205d06bf9221.tar.gz
Revert "Rename _closure to _static_closure, apply naming consistently."
This reverts commit 35672072b4091d6f0031417bc160c568f22d0469. Conflicts: compiler/main/DriverPipeline.hs
Diffstat (limited to 'rts/Exception.cmm')
-rw-r--r--rts/Exception.cmm6
1 files changed, 3 insertions, 3 deletions
diff --git a/rts/Exception.cmm b/rts/Exception.cmm
index 8533e3e35e..bc55911687 100644
--- a/rts/Exception.cmm
+++ b/rts/Exception.cmm
@@ -13,7 +13,7 @@
#include "Cmm.h"
#include "RaiseAsync.h"
-import ghczmprim_GHCziTypes_True_static_closure;
+import ghczmprim_GHCziTypes_True_closure;
/* -----------------------------------------------------------------------------
Exception Primitives
@@ -527,8 +527,8 @@ retry_pop_stack:
Sp(5) = exception;
Sp(4) = stg_raise_ret_info;
Sp(3) = exception; // the AP_STACK
- Sp(2) = STATIC_CLOSURE(ghczmprim_GHCziTypes_True); // dummy breakpoint info
- Sp(1) = STATIC_CLOSURE(ghczmprim_GHCziTypes_True); // True <=> a breakpoint
+ Sp(2) = ghczmprim_GHCziTypes_True_closure; // dummy breakpoint info
+ Sp(1) = ghczmprim_GHCziTypes_True_closure; // True <=> a breakpoint
R1 = ioAction;
jump RET_LBL(stg_ap_pppv) [R1];
}