diff options
author | David Waern <unknown> | 2007-08-17 11:41:05 +0000 |
---|---|---|
committer | David Waern <unknown> | 2007-08-17 11:41:05 +0000 |
commit | 93d806105dd027f4d31a76e2bd2410001fe10b29 (patch) | |
tree | 600c614474eee1bd402f67578bb32777dd84f8df /src/Haddock | |
parent | d0093c2f3274cf393dfddbc183c60cb35b8d5c3b (diff) |
Add top module comment to all files
Diffstat (limited to 'src/Haddock')
-rw-r--r-- | src/Haddock/DevHelp.hs | 6 | ||||
-rw-r--r-- | src/Haddock/Exception.hs | 7 | ||||
-rw-r--r-- | src/Haddock/HH.hs | 6 | ||||
-rw-r--r-- | src/Haddock/HH2.hs | 6 | ||||
-rw-r--r-- | src/Haddock/InterfaceFile.hs | 8 | ||||
-rw-r--r-- | src/Haddock/ModuleTree.hs | 6 | ||||
-rw-r--r-- | src/Haddock/Options.hs | 2 | ||||
-rw-r--r-- | src/Haddock/Types.hs | 2 | ||||
-rw-r--r-- | src/Haddock/Utils/GHC.hs | 6 | ||||
-rw-r--r-- | src/Haddock/Version.hs | 4 |
10 files changed, 47 insertions, 6 deletions
diff --git a/src/Haddock/DevHelp.hs b/src/Haddock/DevHelp.hs index afcbd1c3..3401a7b4 100644 --- a/src/Haddock/DevHelp.hs +++ b/src/Haddock/DevHelp.hs @@ -1,3 +1,9 @@ +-- +-- Haddock - A Haskell Documentation Tool +-- +-- (c) Simon Marlow 2003 +-- + module Haddock.DevHelp(ppDevHelpFile) where import Haddock.ModuleTree diff --git a/src/Haddock/Exception.hs b/src/Haddock/Exception.hs index df6d3236..385f36a9 100644 --- a/src/Haddock/Exception.hs +++ b/src/Haddock/Exception.hs @@ -1,3 +1,10 @@ +-- +-- Haddock - A Haskell Documentation Tool +-- +-- (c) Simon Marlow 2003 +-- + + module Haddock.Exception ( HaddockException, throwE diff --git a/src/Haddock/HH.hs b/src/Haddock/HH.hs index a41d7297..dc8f37e0 100644 --- a/src/Haddock/HH.hs +++ b/src/Haddock/HH.hs @@ -1,3 +1,9 @@ +-- +-- Haddock - A Haskell Documentation Tool +-- +-- (c) Simon Marlow 2003 +-- + module Haddock.HH(ppHHContents, ppHHIndex, ppHHProject) where ppHHContents = error "not yet" diff --git a/src/Haddock/HH2.hs b/src/Haddock/HH2.hs index 945734e6..7f88ed51 100644 --- a/src/Haddock/HH2.hs +++ b/src/Haddock/HH2.hs @@ -1,3 +1,9 @@ +-- +-- Haddock - A Haskell Documentation Tool +-- +-- (c) Simon Marlow 2003 +-- + module Haddock.HH2(ppHH2Contents, ppHH2Index, ppHH2Files, ppHH2Collection) where ppHH2Contents = error "not yet" diff --git a/src/Haddock/InterfaceFile.hs b/src/Haddock/InterfaceFile.hs index 9b8e0b3e..246c6dba 100644 --- a/src/Haddock/InterfaceFile.hs +++ b/src/Haddock/InterfaceFile.hs @@ -1,3 +1,10 @@ +-- +-- Haddock - A Haskell Documentation Tool +-- +-- (c) Simon Marlow 2003 +-- + + module Haddock.InterfaceFile ( InterfaceFile(..), writeInterfaceFile, @@ -5,6 +12,7 @@ module Haddock.InterfaceFile ( hmod2interface ) where + import Haddock.Types import Haddock.Exception diff --git a/src/Haddock/ModuleTree.hs b/src/Haddock/ModuleTree.hs index e4c72880..f73cf2ee 100644 --- a/src/Haddock/ModuleTree.hs +++ b/src/Haddock/ModuleTree.hs @@ -1,3 +1,9 @@ +-- +-- Haddock - A Haskell Documentation Tool +-- +-- (c) Simon Marlow 2003 +-- + module Haddock.ModuleTree ( ModuleTree(..), mkModuleTree ) where import Haddock.Types ( DocName ) diff --git a/src/Haddock/Options.hs b/src/Haddock/Options.hs index 5e420ccc..2b459f8d 100644 --- a/src/Haddock/Options.hs +++ b/src/Haddock/Options.hs @@ -3,8 +3,6 @@ -- -- (c) Simon Marlow 2003 -- --- Ported to use the GHC API by David Waern during "Summer of Code" 2006 --- module Haddock.Options ( diff --git a/src/Haddock/Types.hs b/src/Haddock/Types.hs index 03818fa4..b1ce11f1 100644 --- a/src/Haddock/Types.hs +++ b/src/Haddock/Types.hs @@ -3,8 +3,6 @@ -- -- (c) Simon Marlow 2003 -- --- Ported to use the GHC API by David Waern 2006 --- module Haddock.Types where diff --git a/src/Haddock/Utils/GHC.hs b/src/Haddock/Utils/GHC.hs index 4799734e..8393cbb2 100644 --- a/src/Haddock/Utils/GHC.hs +++ b/src/Haddock/Utils/GHC.hs @@ -1,3 +1,9 @@ +-- +-- Haddock - A Haskell Documentation Tool +-- +-- (c) Simon Marlow 2003 +-- + module Haddock.Utils.GHC where import Debug.Trace diff --git a/src/Haddock/Version.hs b/src/Haddock/Version.hs index 04d567af..cdfc4658 100644 --- a/src/Haddock/Version.hs +++ b/src/Haddock/Version.hs @@ -5,8 +5,8 @@ -- module Haddock.Version ( - projectName, projectVersion, projectUrl - ) where + projectName, projectVersion, projectUrl +) where import Paths_haddock ( version ) import Data.Version ( showVersion ) |