aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock
diff options
context:
space:
mode:
authorDavid Waern <david.waern@gmail.com>2008-02-10 00:28:48 +0000
committerDavid Waern <david.waern@gmail.com>2008-02-10 00:28:48 +0000
commit1be50f5d768e6dadd1b9466e56fabd7ba91bc058 (patch)
treef04367daf1e294a8fd031acb5e180397ffb8e988 /src/Haddock
parent84c483d84479d7f759514281d0bb0483f6aa3beb (diff)
Fix some trivial warnings in H.InterfaceFile
Diffstat (limited to 'src/Haddock')
-rw-r--r--src/Haddock/InterfaceFile.hs11
1 files changed, 7 insertions, 4 deletions
diff --git a/src/Haddock/InterfaceFile.hs b/src/Haddock/InterfaceFile.hs
index 680e71b7..8a4f8d78 100644
--- a/src/Haddock/InterfaceFile.hs
+++ b/src/Haddock/InterfaceFile.hs
@@ -12,7 +12,7 @@ module Haddock.InterfaceFile (
) where
-import Haddock.DocName
+import Haddock.DocName ()
import Haddock.Types
import Haddock.Exception
@@ -45,11 +45,14 @@ data InterfaceFile = InterfaceFile {
}
-binaryInterfaceMagic = 0xD0Cface :: Word32
-binaryInterfaceVersion = 1 :: Word16
+binaryInterfaceMagic :: Word32
+binaryInterfaceMagic = 0xD0Cface
+binaryInterfaceVersion :: Word16
+binaryInterfaceVersion = 1
-initBinMemSize = (1024*1024) :: Int
+initBinMemSize :: Int
+initBinMemSize = 1024*1024
writeInterfaceFile :: FilePath -> InterfaceFile -> IO ()