X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Frename%2FRnBinds.lhs;h=13d4b33fad550dd62c94da1938eb24b5479e60c1;hp=ee30f46607beac164ac8ab4008f5c2fba1f8c524;hb=c9d713bca9ce31fed25d7201464bad48f0dbc647;hpb=02fa8eafaae87b1d2e8b6f1f34b7d6b1af1da58f diff --git a/compiler/rename/RnBinds.lhs b/compiler/rename/RnBinds.lhs index ee30f46..13d4b33 100644 --- a/compiler/rename/RnBinds.lhs +++ b/compiler/rename/RnBinds.lhs @@ -721,7 +721,7 @@ renameSig _ (SpecInstSig ty) -- {-# SPECIALISE #-} pragmas can refer to imported Ids -- so, in the top-level case (when mb_names is Nothing) -- we use lookupOccRn. If there's both an imported and a local 'f' --- then the SPECIALISE pragma is ambiguous, unlike alll other signatures +-- then the SPECIALISE pragma is ambiguous, unlike all other signatures renameSig mb_names sig@(SpecSig v ty inl) = do { new_v <- case mb_names of Just {} -> lookupSigOccRn mb_names sig v