diff options
| -rw-r--r-- | compiler/parser/RdrHsSyn.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/parser/RdrHsSyn.hs b/compiler/parser/RdrHsSyn.hs index 7e61172d84..9b534d4b04 100644 --- a/compiler/parser/RdrHsSyn.hs +++ b/compiler/parser/RdrHsSyn.hs @@ -1411,7 +1411,7 @@ checkImportSpec ie@(L _ specs) = mkImpExpSubSpec :: [Located (Maybe RdrName)] -> P ([AddAnn], ImpExpSubSpec) mkImpExpSubSpec [] = return ([], ImpExpList []) mkImpExpSubSpec [L l Nothing] = - return ([\s -> addAnnotation l AnnDotdot s], ImpExpAll) + return ([\s -> addAnnotation s AnnDotdot l], ImpExpAll) mkImpExpSubSpec xs = if (any (isNothing . unLoc) xs) then return $ ([], ImpExpAllWith xs) |