From: Simon Marlow <simonmar@microsoft.com>
Date: Thu, 9 Feb 2006 10:25:40 +0000 (+0000)
Subject: tiny panic msg fix
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=b179b6314739f9c17b611eb968f3b124a62bb75f;p=ghc-hetmet.git

tiny panic msg fix
---

diff --git a/ghc/compiler/cmm/PprC.hs b/ghc/compiler/cmm/PprC.hs
index 9fece36..15dba69 100644
--- a/ghc/compiler/cmm/PprC.hs
+++ b/ghc/compiler/cmm/PprC.hs
@@ -697,7 +697,7 @@ pprCall :: SDoc -> CCallConv -> [(CmmReg,MachHint)] -> [(CmmExpr,MachHint)]
 
 pprCall ppr_fn cconv results args vols
   | not (is_cish cconv)
-  = panic "pprForeignCall: unknown calling convention"
+  = panic "pprCall: unknown calling convention"
 
   | otherwise
   = save vols $$