Fix segfault in array copy primops on 32-bit

[ghc-hetmet.git] / compiler / codeGen / CgHeapery.lhs

diff --git a/compiler/codeGen/CgHeapery.lhs b/compiler/codeGen/CgHeapery.lhs
index bc3e108..3ff646c 100644 (file)
--- a/compiler/codeGen/CgHeapery.lhs
+++ b/compiler/codeGen/CgHeapery.lhs
@@ -34,8 +34,8 @@ import CgCallConv
 import ClosureInfo
 import SMRep
 
-import Cmm
-import CmmUtils
+import OldCmm
+import OldCmmUtils
 import Id
 import DataCon
 import TyCon
@@ -439,7 +439,7 @@ do_checks _ hp _ _
   = sorry (unlines [
             "Trying to allocate more than " ++ show (bLOCKS_PER_MBLOCK * bLOCK_SIZE) ++ " bytes.", 
             "",
-            "See: http://hackage.haskell.org/trac/ghc/ticket/4550",
+            "See: http://hackage.haskell.org/trac/ghc/ticket/4505",
             "Suggestion: read data from a file instead of having large static data",
             "structures in the code."])