summaryrefslogtreecommitdiff
path: root/utils/genapply/GenApply.hs
diff options
context:
space:
mode:
Diffstat (limited to 'utils/genapply/GenApply.hs')
-rw-r--r--utils/genapply/GenApply.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/genapply/GenApply.hs b/utils/genapply/GenApply.hs
index 2ffa81bb76..b255b92d28 100644
--- a/utils/genapply/GenApply.hs
+++ b/utils/genapply/GenApply.hs
@@ -301,7 +301,7 @@ genMkPAP regstatus macro jump ticker disamb
loadSpWordOff "W_" (sp_stk_args+stack_args_size-3)
<> text " = stg_restore_cccs_info;" $$
loadSpWordOff "W_" (sp_stk_args+stack_args_size-2)
- <> text " = W_[CCCS];"
+ <> text " = CCCS;"
else empty) $$
loadSpWordOff "W_" (sp_stk_args+stack_args_size-1)
<> text " = "