[project @ 2001-02-23 09:48:14 by simonmar]

don't need to derive Show on the Package datatype now.

diff --git a/ghc/driver/Package.hs b/ghc/driver/Package.hs
index d842d12..dac54f2 100644 (file)
--- a/ghc/driver/Package.hs
+++ b/ghc/driver/Package.hs
@@ -15,7 +15,7 @@ data Package = Package {
                extra_cc_opts   :: [String],
                extra_ld_opts   :: [String]
                }
-  deriving (Read, Show)
+  deriving Read
 
 listPkgs :: [Package] -> String
 listPkgs pkgs = render (fsep (punctuate comma (map (text . name) pkgs)))