Commit 5065cf49 authored by Herbert Valerio Riedel's avatar Herbert Valerio Riedel 🕺

base: Update `@since 4.8.2` annotations (re #11026)

This missed to perform in f8ba4b55
parent 130ca3eb
......@@ -19,7 +19,7 @@
-- and in terms of API. You will almost certainly want to import this
-- module @qualified@.
--
-- @since 4.8.2.0
-- @since 4.9.0.0
----------------------------------------------------------------------------
module Data.List.NonEmpty (
......@@ -118,7 +118,7 @@ infixr 5 :|, <|
-- | Non-empty (and non-strict) list type.
--
-- @since 4.8.2.0
-- @since 4.9.0.0
data NonEmpty a = a :| [a]
deriving ( Eq, Ord, Show, Read, Data, Generic, Generic1 )
......
......@@ -31,7 +31,7 @@
--
-- > import Data.Semigroup
--
-- @since 4.8.2.0
-- @since 4.9.0.0
----------------------------------------------------------------------------
module Data.Semigroup (
Semigroup(..)
......@@ -86,7 +86,7 @@ infixr 6 <>
-- | The class of semigroups (types with an associative binary operation).
--
-- @since 4.8.2.0
-- @since 4.9.0.0
class Semigroup a where
-- | An associative operation.
--
......
......@@ -186,7 +186,7 @@ errorCallWithCallStackException s stk
-- | Pretty print 'SrcLoc'
--
-- @since 4.8.2.0
-- @since 4.9.0.0
showSrcLoc :: SrcLoc -> String
showSrcLoc SrcLoc {..}
= foldr (++) ""
......@@ -198,7 +198,7 @@ showSrcLoc SrcLoc {..}
-- | Pretty print 'CallStack'
--
-- @since 4.8.2.0
-- @since 4.9.0.0
showCallStack :: CallStack -> String
showCallStack (CallStack stk@(_:_))
= unlines ("CallStack:" : map (indent . showCallSite) stk)
......@@ -214,7 +214,7 @@ showCallStack _ = error "CallStack cannot be empty!"
-- | Remove the most recent callsite from the 'CallStack'
--
-- @since 4.8.2.0
-- @since 4.9.0.0
popCallStack :: CallStack -> CallStack
popCallStack (CallStack (_:rest)) = CallStack rest
popCallStack _ = error "CallStack cannot be empty!"
......
......@@ -348,7 +348,7 @@ unsafeUnmask (IO io) = IO $ unmaskAsyncExceptions# io
-- When called outside 'mask', or inside 'uninterruptibleMask', this
-- function has no effect.
--
-- /Since: 4.8.2.0/
-- @since 4.9.0.0
interruptible :: IO a -> IO a
interruptible act = do
st <- getMaskingState
......
......@@ -96,11 +96,11 @@ latin1_checked_EF cfm =
-- -----------------------------------------------------------------------------
-- ASCII
-- | @since 4.8.2.0
-- | @since 4.9.0.0
ascii :: TextEncoding
ascii = mkAscii ErrorOnCodingFailure
-- | @since 4.8.2.0
-- | @since 4.9.0.0
mkAscii :: CodingFailureMode -> TextEncoding
mkAscii cfm = TextEncoding { textEncodingName = "ASCII",
mkTextDecoder = ascii_DF cfm,
......
......@@ -55,18 +55,18 @@ import GHC.Word
-- | @'Time'@ is defined as a @'StgWord64'@ in @stg/Types.h@
--
-- @since 4.8.2.0
-- @since 4.9.0.0
type RtsTime = Word64
-- | @'nat'@ defined in @rts/Types.h@
--
-- @since 4.8.2.0
-- @since 4.9.0.0
type RtsNat = #{type unsigned int}
-- | Should we produce a summary of the garbage collector statistics after the
-- program has exited?
--
-- @since 4.8.2.0
-- @since 4.9.0.0
data GiveGCStats
= NoGCStats
| CollectGCStats
......@@ -164,7 +164,7 @@ data DebugFlags = DebugFlags
-- | Should the RTS produce a cost-center summary?
--
-- @since 4.8.2.0
-- @since 4.9.0.0
data DoCostCentres
= CostCentresNone
| CostCentresSummary
......@@ -198,7 +198,7 @@ data CCFlags = CCFlags
-- | What sort of heap profile are we collecting?
--
-- @since 4.8.2.0
-- @since 4.9.0.0
data DoHeapProfile
= NoHeapProfiling
| HeapByCCS
......@@ -252,7 +252,7 @@ data ProfFlags = ProfFlags
-- | Is event tracing enabled?
--
-- @since 4.8.2.0
-- @since 4.9.0.0
data DoTrace
= TraceNone -- ^ no tracing
| TraceEventLog -- ^ send tracing events to the event log
......
......@@ -71,13 +71,13 @@ import GHC.Integer ()
-- function that was called, the 'SrcLoc' is the call-site. The list is
-- ordered with the most recently called function at the head.
--
-- @since 4.8.2.0
-- @since 4.9.0.0
data CallStack = CallStack { getCallStack :: [([Char], SrcLoc)] }
-- See Note [Overview of implicit CallStacks]
-- | A single location in the source code.
--
-- @since 4.8.2.0
-- @since 4.9.0.0
data SrcLoc = SrcLoc
{ srcLocPackage :: [Char]
, srcLocModule :: [Char]
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment