diff options
| author | Herbert Valerio Riedel <hvr@gnu.org> | 2016-02-06 11:33:14 +0100 |
|---|---|---|
| committer | Herbert Valerio Riedel <hvr@gnu.org> | 2016-02-06 11:33:48 +0100 |
| commit | 8aa9f35e4c5e14410bc76ab08ef73f1abe700189 (patch) | |
| tree | c50fd48c8bd533c5458aae9d4956e2bab91843c7 /libraries/base/GHC/Exception.hs | |
| parent | 70980b115e33e32b9730825aeebf20fae1859101 (diff) | |
| download | haskell-8aa9f35e4c5e14410bc76ab08ef73f1abe700189.tar.gz | |
Fix @since annotations for renamed pretty{CallStack,SrcLoc}
Diffstat (limited to 'libraries/base/GHC/Exception.hs')
| -rw-r--r-- | libraries/base/GHC/Exception.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libraries/base/GHC/Exception.hs b/libraries/base/GHC/Exception.hs index 187ff88e33..ad50cec3ba 100644 --- a/libraries/base/GHC/Exception.hs +++ b/libraries/base/GHC/Exception.hs @@ -202,7 +202,7 @@ showCCSStack stk = "CallStack (from -prof):" : map (" " ++) (reverse stk) -- | Pretty print a 'SrcLoc'. -- --- @since 4.8.1.0 +-- @since 4.9.0.0 prettySrcLoc :: SrcLoc -> String prettySrcLoc SrcLoc {..} = foldr (++) "" @@ -214,7 +214,7 @@ prettySrcLoc SrcLoc {..} -- | Pretty print a 'CallStack'. -- --- @since 4.8.1.0 +-- @since 4.9.0.0 prettyCallStack :: CallStack -> String prettyCallStack = intercalate "\n" . prettyCallStackLines |