X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FcodeGen%2FCgExpr.lhs;fp=compiler%2FcodeGen%2FCgExpr.lhs;h=551a40b6330720a4320b666f5ba50179bcf36694;hp=e36b2ae23659ac5a13e3733f43847a1be1979fe5;hb=cd829ab3b15e6a7c30cedde2ca59fb5617aec32c;hpb=204e70a4a6b977116c77226f014ebed5407713c2

diff --git a/compiler/codeGen/CgExpr.lhs b/compiler/codeGen/CgExpr.lhs
index e36b2ae..551a40b 100644
--- a/compiler/codeGen/CgExpr.lhs
+++ b/compiler/codeGen/CgExpr.lhs
@@ -98,7 +98,7 @@ cgExpr (StgLit lit)
   = do  { cmm_lit <- cgLit lit
 	; performPrimReturn rep (CmmLit cmm_lit) }
   where
-    rep = typeCgRep (literalType lit)
+    rep = (typeCgRep) (literalType lit)
 \end{code}