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 | 
