diff options
| author | Sven Tennie <sven.tennie@gmail.com> | 2022-02-23 19:03:47 +0100 |
|---|---|---|
| committer | Sven Tennie <sven.tennie@gmail.com> | 2022-02-23 19:03:47 +0100 |
| commit | 6cf92af292f99c3ef01e85f1e204be1efad1ecb1 (patch) | |
| tree | 8b82457097ea84872929a995e92a0a3d7cc59a6f /libraries/base/GHC/Exception/Backtrace.hs | |
| parent | 73547190c7c72915bf56e833bf2f64c8406aabd6 (diff) | |
| download | haskell-wip/ghc-exception-stacktraces.tar.gz | |
Apply haddock suggestions from the proposal PRwip/ghc-exception-stacktraces
Diffstat (limited to 'libraries/base/GHC/Exception/Backtrace.hs')
| -rw-r--r-- | libraries/base/GHC/Exception/Backtrace.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libraries/base/GHC/Exception/Backtrace.hs b/libraries/base/GHC/Exception/Backtrace.hs index 13faba26de..8f955fa8d2 100644 --- a/libraries/base/GHC/Exception/Backtrace.hs +++ b/libraries/base/GHC/Exception/Backtrace.hs @@ -94,9 +94,9 @@ setDefaultBacktraceMechanisms = writeIORef currentBacktraceMechanisms getDefaultBacktraceMechanisms :: IO [BacktraceMechanism] getDefaultBacktraceMechanisms = readIORef currentBacktraceMechanisms --- | Collect a list of 'Backtrace' via all current default 'BacktraceMechanism'. +-- | Collect a list of 'Backtrace's via all current default 'BacktraceMechanism's. -- See 'setDefaultBacktraceMechanisms' -collectBacktraces :: HasCallStack =>IO [Backtrace] +collectBacktraces :: HasCallStack => IO [Backtrace] collectBacktraces = do mechs <- getDefaultBacktraceMechanisms catMaybes `fmap` mapM collectBacktraces' mechs |