X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Frename%2FRnIfaces.lhs;h=a56da3b240449171dee2e7471161d1c2596c8657;hb=bac531aaf56c7558eda70531e9565f753d21f848;hp=b7af688af7e8f47a2ff2001974d43fd12879590e;hpb=90fa6b84fdc99ba99c0b7df9691ca69d50b62530;p=ghc-hetmet.git diff --git a/ghc/compiler/rename/RnIfaces.lhs b/ghc/compiler/rename/RnIfaces.lhs index b7af688..a56da3b 100644 --- a/ghc/compiler/rename/RnIfaces.lhs +++ b/ghc/compiler/rename/RnIfaces.lhs @@ -67,7 +67,7 @@ import List ( nub ) @getInterfaceExports@ is called only for directly-imported modules. \begin{code} -getInterfaceExports :: ModuleName -> WhereFrom -> RnMG (Module, Avails) +getInterfaceExports :: ModuleName -> WhereFrom -> RnMG (Module, [(ModuleName,Avails)]) getInterfaceExports mod_name from = getHomeIfaceTableRn `thenRn` \ hit -> case lookupModuleEnvByName hit mod_name of {