diff options
Diffstat (limited to 'src/Haddock/InterfaceFile.hs')
-rw-r--r-- | src/Haddock/InterfaceFile.hs | 10 |
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 |