diff options
| author | Ryan Scott <ryan.gl.scott@gmail.com> | 2016-05-24 09:22:04 -0400 |
|---|---|---|
| committer | Ryan Scott <ryan.gl.scott@gmail.com> | 2016-05-24 09:22:04 -0400 |
| commit | 95dfdceb8b4dcc54a366949577d9ee389bad5bc3 (patch) | |
| tree | 02f300a1867a6129f296a66d1e0cb8aefdfde529 /compiler/utils/UniqDFM.hs | |
| parent | 9d06ef1ae451a145607301dc7556931b537a7d83 (diff) | |
| download | haskell-95dfdceb8b4dcc54a366949577d9ee389bad5bc3.tar.gz | |
Remove 'deriving Typeable' statements
Summary:
Deriving `Typeable` has been a no-op since GHC 7.10, and now that we
require 7.10+ to build GHC, we can remove all the redundant `deriving Typeable`
statements in GHC.
Test Plan: ./validate
Reviewers: goldfire, austin, hvr, bgamari
Reviewed By: austin, hvr, bgamari
Subscribers: thomie
Differential Revision: https://phabricator.haskell.org/D2260
Diffstat (limited to 'compiler/utils/UniqDFM.hs')
| -rw-r--r-- | compiler/utils/UniqDFM.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/compiler/utils/UniqDFM.hs b/compiler/utils/UniqDFM.hs index 91fb0ecbec..d8efde8fe5 100644 --- a/compiler/utils/UniqDFM.hs +++ b/compiler/utils/UniqDFM.hs @@ -60,7 +60,6 @@ import Unique ( Uniquable(..), Unique, getKey ) import Outputable import qualified Data.IntMap as M -import Data.Typeable import Data.Data import Data.List (sortBy) import Data.Function (on) @@ -109,7 +108,7 @@ data TaggedVal val = TaggedVal val {-# UNPACK #-} !Int -- ^ insertion time - deriving (Data, Typeable) + deriving Data taggedFst :: TaggedVal val -> val taggedFst (TaggedVal v _) = v @@ -132,7 +131,7 @@ data UniqDFM ele = -- be distinct within a single map {-# UNPACK #-} !Int -- Upper bound on the values' insertion -- time. See Note [Overflow on plusUDFM] - deriving (Data, Typeable, Functor) + deriving (Data, Functor) emptyUDFM :: UniqDFM elt emptyUDFM = UDFM M.empty 0 |