diff options
author | Fangyi Zhou <fangyi.zhou@yuriko.moe> | 2018-11-01 18:21:23 -0400 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2018-11-01 18:36:08 -0400 |
commit | 614028e3b02a5b71a9fbf9c7028f270760ccdab2 (patch) | |
tree | 53d4e3e23825dadb8fdd2482d638f96eaf54e600 /testsuite/tests/ghci/scripts/ghci026.stdout | |
parent | a78e23b8bb614ded2ff842e3a5c2dc51db1fa790 (diff) | |
download | haskell-614028e3b02a5b71a9fbf9c7028f270760ccdab2.tar.gz |
Data.Maybe: add callstack for fromJust (Trac #15559)
Per feature request, add `HasCallStack` to `fromJust` in `Data.Maybe`
and use `error` instead of `errorWithoutStackTrace`. This allows
`fromJust` to print call stacks when throwing the error.
Also add a new test case for the behaviour, modify existing test cases
for new signature
Test Plan: New test cases
Reviewers: hvr, bgamari
Reviewed By: bgamari
Subscribers: ulysses4ever, rwbarton, carter
GHC Trac Issues: #15559
Differential Revision: https://phabricator.haskell.org/D5256
Diffstat (limited to 'testsuite/tests/ghci/scripts/ghci026.stdout')
-rw-r--r-- | testsuite/tests/ghci/scripts/ghci026.stdout | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/ghci/scripts/ghci026.stdout b/testsuite/tests/ghci/scripts/ghci026.stdout index 9fb27908e6..24049ee655 100644 --- a/testsuite/tests/ghci/scripts/ghci026.stdout +++ b/testsuite/tests/ghci/scripts/ghci026.stdout @@ -1,5 +1,5 @@ catMaybes :: [Maybe a] -> [a] -fromJust :: Maybe a -> a +fromJust :: GHC.Stack.Types.HasCallStack => Maybe a -> a fromMaybe :: a -> Maybe a -> a isJust :: Maybe a -> Bool isNothing :: Maybe a -> Bool |