summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Feuer <david.feuer@gmail.com>2017-01-10 13:41:31 -0500
committerBen Gamari <ben@smart-cactus.org>2017-01-10 13:41:38 -0500
commit5857dfb8873eac6e682802524e2c2d9b96bb42f4 (patch)
tree8b162313d089408f28b7e3b20abf60dbb53e1883
parenteee819943a0ea05af369fe3c728b865094e8fe33 (diff)
downloadhaskell-5857dfb8873eac6e682802524e2c2d9b96bb42f4.tar.gz
Remove tyConString
`tyConString` has been deprecated since GHC 7.4. It's time for it to go. Reviewers: austin, hvr, bgamari Reviewed By: bgamari Subscribers: thomie Differential Revision: https://phabricator.haskell.org/D2950 GHC Trac Issues: #13096
-rw-r--r--libraries/base/Data/Typeable.hs1
-rw-r--r--libraries/base/Data/Typeable/Internal.hs8
2 files changed, 1 insertions, 8 deletions
diff --git a/libraries/base/Data/Typeable.hs b/libraries/base/Data/Typeable.hs
index 1afc6a9563..d7225196de 100644
--- a/libraries/base/Data/Typeable.hs
+++ b/libraries/base/Data/Typeable.hs
@@ -68,7 +68,6 @@ module Data.Typeable
TyCon, -- abstract, instance of: Eq, Show, Typeable
-- For now don't export Module, to avoid name clashes
tyConFingerprint,
- tyConString,
tyConPackage,
tyConModule,
tyConName,
diff --git a/libraries/base/Data/Typeable/Internal.hs b/libraries/base/Data/Typeable/Internal.hs
index e19854ccd7..80b1717045 100644
--- a/libraries/base/Data/Typeable/Internal.hs
+++ b/libraries/base/Data/Typeable/Internal.hs
@@ -38,7 +38,7 @@ module Data.Typeable.Internal (
-- * TyCon
TyCon, -- Abstract
- tyConPackage, tyConModule, tyConName, tyConString, tyConFingerprint,
+ tyConPackage, tyConModule, tyConName, tyConFingerprint,
mkTyCon3, mkTyCon3#,
rnfTyCon,
@@ -103,12 +103,6 @@ trNameString :: TrName -> String
trNameString (TrNameS s) = unpackCString# s
trNameString (TrNameD s) = s
--- | Observe string encoding of a type representation
-{-# DEPRECATED tyConString "renamed to 'tyConName'; 'tyConModule' and 'tyConPackage' are also available." #-}
--- deprecated in 7.4
-tyConString :: TyCon -> String
-tyConString = tyConName
-
tyConFingerprint :: TyCon -> Fingerprint
tyConFingerprint (TyCon hi lo _ _)
= Fingerprint (W64# hi) (W64# lo)