[project @ 2004-11-10 13:24:06 by simonmar]
[ghc-hetmet.git] / ghc / utils / ghc-pkg / Package.hs
index b4df186..bd9e226 100644 (file)
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: Package.hs,v 1.3 2002/06/12 22:04:27 wolfgang Exp $
+-- $Id: Package.hs,v 1.6 2002/12/18 16:29:34 simonmar Exp $
 --
 -- Package configuration defn.
 -----------------------------------------------------------------------------
@@ -17,12 +17,17 @@ module Package (
 #endif
 
 #ifdef WANT_PRETTY
+#if __GLASGOW_HASKELL__ >= 504 && !defined(INTERNAL_PRETTY)
+import Text.PrettyPrint
+#else
 import Pretty
 #endif
+#endif
 
 data PackageConfig
    = Package {
        name            :: String,
+       auto            :: Bool,
        import_dirs     :: [String],
        source_dirs     :: [String],
        library_dirs    :: [String],
@@ -41,6 +46,7 @@ data PackageConfig
 defaultPackageConfig
    = Package {
        name = error "defaultPackage",
+       auto = False,
        import_dirs     = [],
        source_dirs     = [],
        library_dirs    = [],
@@ -72,6 +78,7 @@ dumpPkgGuts pkg =
    text "Package" $$ nest 3 (braces (
       sep (punctuate comma [
          text "name = " <> text (show (name pkg)),
+        text "auto = " <> text (show (auto pkg)),
          dumpField "import_dirs"     (import_dirs     pkg),
          dumpField "source_dirs"     (source_dirs     pkg),
          dumpField "library_dirs"    (library_dirs    pkg),