diff options
Diffstat (limited to 'testsuite/tests/stranal/sigs/DmdAnalGADTs.hs')
-rw-r--r-- | testsuite/tests/stranal/sigs/DmdAnalGADTs.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/stranal/sigs/DmdAnalGADTs.hs b/testsuite/tests/stranal/sigs/DmdAnalGADTs.hs index 1a6d68a3b2..2bdd2a679e 100644 --- a/testsuite/tests/stranal/sigs/DmdAnalGADTs.hs +++ b/testsuite/tests/stranal/sigs/DmdAnalGADTs.hs @@ -19,7 +19,7 @@ diverges :: Int diverges = diverges -- The result should not have a CPR property --- Because we are lub’ing "m" and "<S,U>m" in the case expression. +-- Because we are lub’ing "m" and "<L>m" in the case expression. f :: D x -> x f x = case x of A -> hasCPR |