summaryrefslogtreecommitdiff
path: root/testsuite/tests/polykinds/all.T
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2021-03-11 16:27:26 +0000
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-03-20 07:51:36 -0400
commitd4605e7ce4f5f8252a1e932e239cab79219875a5 (patch)
tree55e04507d3852582b5be525187d06caf4aef1c70 /testsuite/tests/polykinds/all.T
parent8592a2462a4f1e901459b5866020ddf7b381b4a9 (diff)
downloadhaskell-d4605e7ce4f5f8252a1e932e239cab79219875a5.tar.gz
Fix an levity-polymorphism error
As #19522 points out, we did not account for visible type application when trying to reject naked levity-polymorphic functions that have no binding. This patch tidies up the code, and fixes the bug too.
Diffstat (limited to 'testsuite/tests/polykinds/all.T')
-rw-r--r--testsuite/tests/polykinds/all.T1
1 files changed, 1 insertions, 0 deletions
diff --git a/testsuite/tests/polykinds/all.T b/testsuite/tests/polykinds/all.T
index 1be9bb11b5..581b065fa9 100644
--- a/testsuite/tests/polykinds/all.T
+++ b/testsuite/tests/polykinds/all.T
@@ -235,3 +235,4 @@ test('T19092', normal, compile, [''])
test('T19093', normal, compile, [''])
test('T19094', normal, compile, [''])
test('T19250', normal, compile, [''])
+test('T19522', normal, compile, [''])