X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fmain%2FDriverFlags.hs;h=998ed4dbc6aa089be5bde9f6facd75ed326bffe5;hb=e47c7704a86a74638de357b53c398c8d0dec92be;hp=fa1fa4719ba47bade742698a9070b3568d1058d9;hpb=ec17c12e714993a407c8dda235dfea6ac327626f;p=ghc-hetmet.git

diff --git a/ghc/compiler/main/DriverFlags.hs b/ghc/compiler/main/DriverFlags.hs
index fa1fa47..998ed4d 100644
--- a/ghc/compiler/main/DriverFlags.hs
+++ b/ghc/compiler/main/DriverFlags.hs
@@ -1,7 +1,7 @@
 {-# OPTIONS -#include "hschooks.h" #-}
 
 -----------------------------------------------------------------------------
--- $Id: DriverFlags.hs,v 1.40 2001/01/19 15:26:37 simonmar Exp $
+-- $Id: DriverFlags.hs,v 1.41 2001/01/28 17:15:33 simonmar Exp $
 --
 -- Driver flags
 --
@@ -9,7 +9,14 @@
 --
 -----------------------------------------------------------------------------
 
-module DriverFlags where
+module DriverFlags ( 
+	processArgs, OptKind(..), static_flags, dynamic_flags, 
+	v_InitDynFlags, v_DynFlags, getDynFlags, dynFlag, 
+	getOpts, getVerbFlag, addCmdlineHCInclude,
+	buildStaticHscOpts, 
+	runSomething,
+	machdepCCOpts
+  ) where
 
 #include "HsVersions.h"
 
@@ -38,7 +45,7 @@ import Char
 --
 --     * parse the initial list of flags and remove any flags understood
 --	 by the driver only.  Determine whether we're in multi-compilation
---	 or single-compilation mode.
+--	 or single-compilation mode (done in Main.main).
 --
 --     * gather the list of "static" hsc flags, and assign them to the global
 --	 static hsc flags variable.