diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2013-02-14 13:04:30 +0000 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2013-02-14 13:04:30 +0000 |
| commit | 6518ebe334a1afc6d585dfe1841bb629df83b607 (patch) | |
| tree | c29a78d2fd937a0d9982da6ba1d4c2d4fc93c0d4 /utils | |
| parent | 3234a4ade7204c4206831b4c1dc4a8b23624cc6b (diff) | |
| download | haskell-6518ebe334a1afc6d585dfe1841bb629df83b607.tar.gz | |
Follow changes to HsPat
Diffstat (limited to 'utils')
| -rw-r--r-- | utils/ghctags/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/ghctags/Main.hs b/utils/ghctags/Main.hs index 07fd5723fc..514f2998c0 100644 --- a/utils/ghctags/Main.hs +++ b/utils/ghctags/Main.hs @@ -292,7 +292,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 |