diff options
author | Alan Zimmerman <alan.zimm@gmail.com> | 2018-04-18 23:55:14 +0200 |
---|---|---|
committer | Alan Zimmerman <alan.zimm@gmail.com> | 2018-04-27 15:38:46 +0200 |
commit | c3823cba2147c74b2c727b5458b9e95350496988 (patch) | |
tree | e9afa7f5fd6b1a3f2f1a2ee87d659342803e6a2d /utils | |
parent | 313720a453889ddd05da02f4f2c31eb3bc3734d2 (diff) | |
download | haskell-c3823cba2147c74b2c727b5458b9e95350496988.tar.gz |
TTG : complete for balance of hsSyn AST
Summary:
- remove PostRn/PostTc fields
- remove the HsVect In/Out distinction for Type, Class and Instance
- remove PlaceHolder in favour of NoExt
- Simplify OutputableX constraint
Updates haddock submodule
Test Plan: ./validate
Reviewers: goldfire, bgamari
Subscribers: goldfire, thomie, mpickering, carter
Differential Revision: https://phabricator.haskell.org/D4625
Diffstat (limited to 'utils')
-rw-r--r-- | utils/ghctags/Main.hs | 5 | ||||
m--------- | utils/haddock | 0 |
2 files changed, 3 insertions, 2 deletions
diff --git a/utils/ghctags/Main.hs b/utils/ghctags/Main.hs index 5e96f35e74..febbd79492 100644 --- a/utils/ghctags/Main.hs +++ b/utils/ghctags/Main.hs @@ -264,8 +264,9 @@ boundValues mod group = , n <- map found ns ] fors = concat $ map forBound (hs_fords group) where forBound lford = case unLoc lford of - ForeignImport n _ _ _ -> [found n] + ForeignImport _ n _ _ -> [found n] ForeignExport { } -> [] + XForeignDecl { } -> [] in vals ++ tys ++ fors where found = foundOfLName mod @@ -298,7 +299,7 @@ boundThings modname lbinding = AsPat _ id p -> patThings p (thing id : tl) ParPat _ p -> patThings p tl BangPat _ p -> patThings p tl - ListPat _ ps _ _ -> foldr patThings tl ps + ListPat _ ps -> foldr patThings tl ps TuplePat _ ps _ -> foldr patThings tl ps PArrPat _ ps -> foldr patThings tl ps ConPatIn _ conargs -> conArgs conargs tl diff --git a/utils/haddock b/utils/haddock -Subproject 0d903e5e7ea877cbf6e8a7a84c9c8b6ef8c78ef +Subproject 271a9cb0c7a070deef8df2d4fb54ebe47a0bf56 |