From 7bc3a65b467c4286377b9bded277d5a2f69160b3 Mon Sep 17 00:00:00 2001 From: Sylvain Henry Date: Wed, 22 Apr 2020 17:04:53 +0200 Subject: Remove SpecConstrAnnotation (#13681) This has been deprecated since 2013. Use GHC.Types.SPEC instead. Make GHC.Exts "not-home" for haddock Metric Decrease: haddock.base --- libraries/base/GHC/Exts.hs | 25 ++----------------------- 1 file changed, 2 insertions(+), 23 deletions(-) (limited to 'libraries/base') diff --git a/libraries/base/GHC/Exts.hs b/libraries/base/GHC/Exts.hs index a8ae03f903..894ffad509 100755 --- a/libraries/base/GHC/Exts.hs +++ b/libraries/base/GHC/Exts.hs @@ -2,6 +2,8 @@ {-# LANGUAGE MagicHash, UnboxedTuples, TypeFamilies, DeriveDataTypeable, MultiParamTypeClasses, FlexibleInstances, NoImplicitPrelude #-} +{-# OPTIONS_HADDOCK not-home #-} + ----------------------------------------------------------------------------- -- | -- Module : GHC.Exts @@ -83,9 +85,6 @@ module GHC.Exts -- * Event logging traceEvent, - -- * SpecConstr annotations - SpecConstrAnnotation(..), - -- * The call stack currentCallStack, @@ -111,7 +110,6 @@ import GHC.Stack import qualified Data.Coerce import Data.String import Data.OldList -import Data.Data import Data.Ord import Data.Version ( Version(..), makeVersion ) import qualified Debug.Trace @@ -159,25 +157,6 @@ traceEvent = Debug.Trace.traceEventIO {-# DEPRECATED traceEvent "Use 'Debug.Trace.traceEvent' or 'Debug.Trace.traceEventIO'" #-} -- deprecated in 7.4 -{- ********************************************************************** -* * -* SpecConstr annotation * -* * -********************************************************************** -} - --- Annotating a type with NoSpecConstr will make SpecConstr --- not specialise for arguments of that type. - --- This data type is defined here, rather than in the SpecConstr module --- itself, so that importing it doesn't force stupidly linking the --- entire ghc package at runtime - -data SpecConstrAnnotation = NoSpecConstr | ForceSpecConstr - deriving ( Data -- ^ @since 4.3.0.0 - , Eq -- ^ @since 4.3.0.0 - ) - - {- ********************************************************************** * * * The IsList class * -- cgit v1.2.1