diff options
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 |