Package: hothasktags
Version: 0.3.3-4
Severity: serious

> sbuild (Debian sbuild) 0.67.0 (26 Dec 2015) on dl580gen9-02.hlinux
...
> make[1]: Entering directory '/<<PKGBUILDDIR>>'
> ./Setup build
> Building hothasktags-0.3.3...
> Preprocessing executable 'hothasktags' for hothasktags-0.3.3...
> [1 of 1] Compiling Main             ( Main.hs, 
> dist/build/hothasktags/hothasktags-tmp/Main.o )
> 
> Main.hs:112:23:
>     Constructor `L.EVar' should have 2 arguments, but has been given 3
>     In the pattern: L.EVar _ _ (L.UnQual _ (L.Ident _ name'))
>     In an equation for `matchesSpec':
>         matchesSpec name (L.EVar _ _ (L.UnQual _ (L.Ident _ name')))
>           = name == name'
>     In an equation for `exported':
>         exported
>           mod@(L.Module _
>                         (Just (L.ModuleHead _ _ _ (Just (L.ExportSpecList _ 
> specs))))
>                         _
>                         _
>                         _)
>           name
>           = any (matchesSpec name) specs
>           where
>               matchesSpec name (L.EVar _ _ (L.UnQual _ (L.Ident _ name')))
>                 = name == name'
>               matchesSpec name (L.EAbs _ (L.UnQual _ (L.Ident _ name')))
>                 = name == name'
>               matchesSpec name (L.EThingAll _ (L.UnQual _ (L.Ident _ name')))
>                 = name == name' || (name `elem` thingMembers mod name')
>               matchesSpec
>                 name
>                 (L.EThingWith _ (L.UnQual _ (L.Ident _ name')) cnames)
>                 = name == name' || any (matchesCName name) cnames
>               matchesSpec _ (L.EModuleContents _ (L.ModuleName _ _)) = False
>               matchesSpec _ _ = False
>               matchesCName name (L.VarName _ (L.Ident _ name')) = name == 
> name'
>               matchesCName name (L.ConName _ (L.Ident _ name')) = name == 
> name'
>               matchesCName _ _ = False
> 
> Main.hs:155:19:
>     Constructor `L.IVar' should have 2 arguments, but has been given 3
>     In the pattern: L.IVar _ _ (L.Ident _ name)
>     In an equation for `specName':
>         specName (L.IVar _ _ (L.Ident _ name)) = [name]
>     In an equation for `extractImport':
>         extractImport
>           decl@(L.ImportDecl {L.importModule = L.ModuleName _ name,
>                               L.importSpecs = spec})
>           = Map.unions
>               [if L.importQualified decl then Map.empty else names,
>                Map.mapKeys ((name ++ ".") ++) names,
>                case L.importAs decl of {
>                  Nothing -> Map.empty
>                  Just (L.ModuleName _ name')
>                    -> Map.mapKeys ((name' ++ ".") ++) names },
>                ....]
>           where
>               names
>                 | Just (L.ImportSpecList _ True specs) <- spec
>                 = normalExports
>                   `Map.difference`
>                     (Map.fromList (map (flip (,) ()) (concatMap specName 
> specs)))
>                 | Just (L.ImportSpecList _ False specs) <- spec
>                 = Map.filterWithKey
>                     (\ k _ -> k `elem` concatMap specName specs) normalExports
>                 | otherwise = normalExports
>               normalExports = modExports db name
>               specName (L.IVar _ _ (L.Ident _ name)) = [name]
>               specName (L.IAbs _ (L.Ident _ name)) = [name]
>               specName (L.IThingAll _ (L.Ident _ name)) = [name]
>               specName (L.IThingWith _ (L.Ident _ name) cnames)
>                 = name : concatMap cname cnames
>               specName _ = []
>               cname (L.VarName _ (L.Ident _ name)) = [name]
>               cname (L.ConName _ (L.Ident _ name)) = [name]
>               cname _ = []
> debian/rules:10: recipe for target 'override_dh_auto_build' failed
> make[1]: *** [override_dh_auto_build] Error 1
> make[1]: Leaving directory '/<<PKGBUILDDIR>>'
> debian/rules:3: recipe for target 'build' failed
> make: *** [build] Error 2

-- 
Martin Michlmayr
Linux for HPE Helion, Hewlett Packard Enterprise

Reply via email to