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/rename/RnPat.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/rename/RnPat.lhs')
| -rw-r--r-- | compiler/rename/RnPat.lhs | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/compiler/rename/RnPat.lhs b/compiler/rename/RnPat.lhs index 76be4519d3..844a1f90c2 100644 --- a/compiler/rename/RnPat.lhs +++ b/compiler/rename/RnPat.lhs @@ -367,10 +367,6 @@ rnPatAndThen mk (TuplePat pats boxed _) ; pats' <- rnLPatsAndThen mk pats ; return (TuplePat pats' boxed placeHolderType) } -rnPatAndThen _ (TypePat ty) - = do { ty' <- liftCpsFV $ rnHsTypeFVs (text "In a type pattern") ty - ; return (TypePat ty') } - #ifndef GHCI rnPatAndThen _ p@(QuasiQuotePat {}) = pprPanic "Can't do QuasiQuotePat without GHCi" (ppr p) |