[project @ 2002-01-08 10:42:56 by sewardj]

[ghc-hetmet.git] / ghc / compiler / absCSyn / AbsCUtils.lhs

diff --git a/ghc/compiler/absCSyn/AbsCUtils.lhs b/ghc/compiler/absCSyn/AbsCUtils.lhs
index b05c3c1..923005b 100644 (file)
--- a/ghc/compiler/absCSyn/AbsCUtils.lhs
+++ b/ghc/compiler/absCSyn/AbsCUtils.lhs
@@ -151,6 +151,7 @@ magicIdPrimRep CurCostCentre            = CostCentreRep
 magicIdPrimRep VoidReg             = VoidRep
 magicIdPrimRep CurrentTSO          = ThreadIdRep
 magicIdPrimRep CurrentNursery      = PtrRep
+magicIdPrimRep HpAlloc              = WordRep
 \end{code}
 
 %************************************************************************