From dd8c1ab22f0bf0eaa9028f1621ceac02aea96205 Mon Sep 17 00:00:00 2001
From: "andy@galois.com" <unknown>
Date: Wed, 25 Oct 2006 20:14:22 +0000
Subject: [PATCH] fixing type error inside Hpc inc; we had a 32 bit '1'.

---
 compiler/codeGen/CgHpc.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/codeGen/CgHpc.hs b/compiler/codeGen/CgHpc.hs
index 53d81c9..9620973 100644
--- a/compiler/codeGen/CgHpc.hs
+++ b/compiler/codeGen/CgHpc.hs
@@ -29,7 +29,7 @@ cgTickBox mod n = do
        stmtsC [ CmmStore tick_box
                          (CmmMachOp (MO_Add I64)
                                                [ CmmLoad tick_box I64
-                                               , CmmLit (mkIntCLit 1)
+                                               , CmmLit (CmmInt 1 I64)
                                                ])
               ]
 
-- 
1.7.10.4