diff options
| author | David Waern <david.waern@gmail.com> | 2010-05-14 19:05:10 +0000 |
|---|---|---|
| committer | David Waern <david.waern@gmail.com> | 2010-05-14 19:05:10 +0000 |
| commit | 3c258e7377f8bf546b58a26a65e8da83c76acb43 (patch) | |
| tree | a755716cd9bfe2ab80d4992d950ed24ae5c12b15 /src/Main.hs | |
| parent | 59b188d7089a639f72b35c6d522b7cb4e9809545 (diff) | |
Wibble
Diffstat (limited to 'src/Main.hs')
| -rw-r--r-- | src/Main.hs | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/src/Main.hs b/src/Main.hs index d1a94fd8..3c746863 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -165,12 +165,7 @@ main = handleTopExceptions $ do renderStep packages [] -------------------------------------------------------------------------------- --- Rendering -------------------------------------------------------------------------------- - - --- | Render the interfaces with whatever backend is specified in the flags +-- | Render the interfaces with whatever backend is specified in the flags. render :: [Flag] -> [Interface] -> [InstalledInterface] -> IO () render flags ifaces installedIfaces = do @@ -274,6 +269,7 @@ dumpInterfaceFile ifaces homeLinks flags = -- Creating a GHC session ------------------------------------------------------------------------------- + -- | Start a GHC session with the -haddock flag set. Also turn off -- compilation and linking. Then run the given 'Ghc' action. withGhc :: String -> [String] -> (DynFlags -> Ghc a) -> IO a |