diff options
| author | Jose Pedro Magalhaes <jpm@cs.uu.nl> | 2011-05-04 17:27:49 +0200 |
|---|---|---|
| committer | Jose Pedro Magalhaes <jpm@cs.uu.nl> | 2011-05-04 17:27:49 +0200 |
| commit | fed25228aec3f3bd2f91c50d67043d83efb1af18 (patch) | |
| tree | 93a04929f466dd5db2a2fc62705726382911bf41 /compiler/deSugar/DsArrows.lhs | |
| parent | 91a75b9af1015b053e6904f4ff7bf36c5b1e0ad1 (diff) | |
| download | haskell-fed25228aec3f3bd2f91c50d67043d83efb1af18.tar.gz | |
Remove HsNumTy and TypePati.
They belonged to the old generic deriving mechanism, so they can go. Adapted a lot of code as a consequence.
Diffstat (limited to 'compiler/deSugar/DsArrows.lhs')
| -rw-r--r-- | compiler/deSugar/DsArrows.lhs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/compiler/deSugar/DsArrows.lhs b/compiler/deSugar/DsArrows.lhs index 58bf6b88e7..4f553e53f3 100644 --- a/compiler/deSugar/DsArrows.lhs +++ b/compiler/deSugar/DsArrows.lhs @@ -1061,7 +1061,6 @@ collectl (L _ pat) bndrs go (SigPatIn pat _) = collectl pat bndrs go (SigPatOut pat _) = collectl pat bndrs - go (TypePat _) = bndrs go (CoPat _ pat _) = collectl (noLoc pat) bndrs go (ViewPat _ pat _) = collectl pat bndrs go p@(QuasiQuotePat {}) = pprPanic "collectl/go" (ppr p) |