Commit f451d5c1 authored by simonpj's avatar simonpj
Browse files

[project @ 2005-02-02 13:40:34 by simonpj]

Dump package config only with -v4
Dump module dependencies (ghc -M) with -v2
parent f4eaa144
-----------------------------------------------------------------------------
-- $Id: DriverMkDepend.hs,v 1.38 2005/01/27 14:38:29 simonmar Exp $
-- $Id: DriverMkDepend.hs,v 1.39 2005/02/02 13:40:34 simonpj Exp $
--
-- GHC Driver
--
......@@ -62,7 +62,7 @@ doMkDependHS dflags srcs
; let sorted = cmTopSort False mod_summaries
-- Print out the dependencies if wanted
; if verbosity dflags >= 3 then
; if verbosity dflags >= 2 then
hPutStrLn stderr (showSDoc (text "Module dependencies" $$ ppr sorted))
else return ()
......
{-# OPTIONS -fno-warn-incomplete-patterns -optc-DNON_POSIX_SOURCE #-}
-----------------------------------------------------------------------------
-- $Id: Main.hs,v 1.146 2005/02/02 13:27:07 simonpj Exp $
-- $Id: Main.hs,v 1.147 2005/02/02 13:40:34 simonpj Exp $
--
-- GHC Driver program
--
......@@ -322,7 +322,7 @@ showBanners mode dflags static_opts = do
hPutStr stderr ", for Haskell 98, compiled by GHC version "
hPutStrLn stderr cBooterVersion
when (verb >= 3) $
when (verb >= 4) $
dumpPackages dflags
when (verb >= 3) $
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment