diff options
| author | Sebastian Graf <sebastian.graf@kit.edu> | 2023-03-06 18:58:10 +0100 |
|---|---|---|
| committer | Sebastian Graf <sebastian.graf@kit.edu> | 2023-03-08 15:04:20 +0100 |
| commit | e607d32d44bd82901f3f12012f5838469221b649 (patch) | |
| tree | 104d93a32def76354836827e4b74a3ddbc3311ab /testsuite/tests/stranal/should_compile/all.T | |
| parent | 232cfc241c14ba6a49d9552a90a94857255e455d (diff) | |
| download | haskell-wip/T22997.tar.gz | |
DmdAnal: Fix a panic on OPAQUE and trivial/PAP RHS (#22997)wip/T22997
We should not panic in `add_demands` (now `set_lam_dmds`), because that code
path is legimitely taken for OPAQUE PAP bindings, as in T22997.
Fixes #22997.
Diffstat (limited to 'testsuite/tests/stranal/should_compile/all.T')
| -rw-r--r-- | testsuite/tests/stranal/should_compile/all.T | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/testsuite/tests/stranal/should_compile/all.T b/testsuite/tests/stranal/should_compile/all.T index c5f142567f..0355def88e 100644 --- a/testsuite/tests/stranal/should_compile/all.T +++ b/testsuite/tests/stranal/should_compile/all.T @@ -88,3 +88,5 @@ test('EtaExpansion', normal, compile, ['']) test('T22039', normal, compile, ['']) # T22388: Should see $winteresting but not $wboring test('T22388', [ grep_errmsg(r'^\S+\$w\S+') ], compile, ['-dsuppress-uniques -ddump-simpl']) +# T22997: Just a panic that should not happen +test('T22997', normal, compile, ['']) |