summaryrefslogtreecommitdiff
path: root/compiler/stranal
diff options
context:
space:
mode:
authorSebastian Graf <sgraf1337@gmail.com>2019-02-01 06:46:32 -0500
committerSebastian Graf <sgraf1337@gmail.com>2019-02-01 06:46:32 -0500
commitef6b28339b18597a2df1ce39116f1d4e4533804c (patch)
tree92655fc77db24b38660c5621b524815e217cebb0 /compiler/stranal
parentd6d735c1114082b9e9cc1ba7da87c49f52891320 (diff)
downloadhaskell-ef6b28339b18597a2df1ce39116f1d4e4533804c.tar.gz
Remove ExnStr and ThrowsExn business
Diffstat (limited to 'compiler/stranal')
-rw-r--r--compiler/stranal/WwLib.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/stranal/WwLib.hs b/compiler/stranal/WwLib.hs
index 756a706dd8..9112ddc3bf 100644
--- a/compiler/stranal/WwLib.hs
+++ b/compiler/stranal/WwLib.hs
@@ -1167,7 +1167,7 @@ mk_absent_let dflags arg
= WARN( True, text "No absent value for" <+> ppr arg_ty )
Nothing -- Can happen for 'State#' and things of 'VecRep'
where
- lifted_arg = arg `setIdStrictness` exnSig
+ lifted_arg = arg `setIdStrictness` botSig
-- Note in strictness signature that this is bottoming
-- (for the sake of the "empty case scrutinee not known to
-- diverge for sure lint" warning)