From 172b85497dc0da68176fa90c993abd9bcdc6b96f Mon Sep 17 00:00:00 2001
From: "Ben.Lippmeier@anu.edu.au" <unknown>
Date: Sat, 2 Jan 2010 23:50:53 +0000
Subject: [PATCH] Follow PackageTarget changes in pprCEntity

---
 compiler/hsSyn/HsDecls.lhs |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/compiler/hsSyn/HsDecls.lhs b/compiler/hsSyn/HsDecls.lhs
index 273cc98..0312dcb 100644
--- a/compiler/hsSyn/HsDecls.lhs
+++ b/compiler/hsSyn/HsDecls.lhs
@@ -942,6 +942,8 @@ instance Outputable ForeignImport where
         ptext (sLit "static") <+> pp_hdr <+> char '&' <> ppr lbl
       pprCEntity (CFunction (StaticTarget lbl)) = 
         ptext (sLit "static") <+> pp_hdr <+> ppr lbl
+      pprCEntity (CFunction (PackageTarget lbl _)) =
+        ptext (sLit "static") <+> pp_hdr <+> ppr lbl
       pprCEntity (CFunction (DynamicTarget)) =
         ptext (sLit "dynamic")
       pprCEntity (CWrapper) = ptext (sLit "wrapper")
-- 
1.7.10.4