aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock/InterfaceFile.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Haddock/InterfaceFile.hs')
-rw-r--r--src/Haddock/InterfaceFile.hs10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/Haddock/InterfaceFile.hs b/src/Haddock/InterfaceFile.hs
index 228efa71..6441c503 100644
--- a/src/Haddock/InterfaceFile.hs
+++ b/src/Haddock/InterfaceFile.hs
@@ -9,7 +9,7 @@ module Haddock.InterfaceFile (
InterfaceFile(..),
writeInterfaceFile,
readInterfaceFile,
- hmod2interface
+ iface2interface
) where
@@ -55,10 +55,10 @@ instance Binary InterfaceFile where
env <- get bh
return (InterfaceFile (Map.fromList env))
-hmod2interface hmod = InterfaceMod {
- imModule = hmod_mod hmod,
- imFilename = hmod_orig_filename hmod,
- imExportItems = hmod_rn_export_items hmod
+iface2interface iface = InterfaceMod {
+ imModule = ifaceMod iface,
+ imFilename = ifaceOrigFilename iface,
+ imExportItems = ifaceRnExportItems iface
}
binaryInterfaceMagic = 0xD0Cface :: Word32