summaryrefslogtreecommitdiff
path: root/ghc/compiler/codeGen
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/compiler/codeGen')
-rw-r--r--ghc/compiler/codeGen/CgPrimOp.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/ghc/compiler/codeGen/CgPrimOp.hs b/ghc/compiler/codeGen/CgPrimOp.hs
index 7de4516af7..c1264be62f 100644
--- a/ghc/compiler/codeGen/CgPrimOp.hs
+++ b/ghc/compiler/codeGen/CgPrimOp.hs
@@ -134,7 +134,8 @@ emitPrimOp [] WriteMutVarOp [mutv,var] live
stmtC (CmmCall (CmmForeignCall (CmmLit (CmmLabel mkDirty_MUT_VAR_Label))
CCallConv)
[{-no results-}]
- [(mutv,PtrHint)]
+ [(CmmReg (CmmGlobal BaseReg), PtrHint),
+ (mutv,PtrHint)]
(Just vols))
-- #define sizzeofByteArrayzh(r,a) \