summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2019-12-10 15:18:05 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2019-12-12 02:26:19 -0500
commit29c4609c58005aa4dad887b7396f0e95dfe0c68d (patch)
tree2c658d176baff5644daa04dec60c9a510c520f49
parente6e1ec08e79950c8cadd1f7a2e01292d6142fbfc (diff)
downloadhaskell-29c4609c58005aa4dad887b7396f0e95dfe0c68d.tar.gz
testsuite: Add test for #17549
-rw-r--r--testsuite/tests/ghci/scripts/T17549.script6
-rwxr-xr-xtestsuite/tests/ghci/scripts/all.T1
2 files changed, 7 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/scripts/T17549.script b/testsuite/tests/ghci/scripts/T17549.script
new file mode 100644
index 0000000000..e720f2756f
--- /dev/null
+++ b/testsuite/tests/ghci/scripts/T17549.script
@@ -0,0 +1,6 @@
+writeFile "T17549.hs" ""
+:load T17549.hs
+writeFile "T17549.hs" "import"
+:reload
+1
+
diff --git a/testsuite/tests/ghci/scripts/all.T b/testsuite/tests/ghci/scripts/all.T
index 094f101abb..28c12e151b 100755
--- a/testsuite/tests/ghci/scripts/all.T
+++ b/testsuite/tests/ghci/scripts/all.T
@@ -311,3 +311,4 @@ test('T17345', normal, ghci_script, ['T17345.script'])
test('T17384', normal, ghci_script, ['T17384.script'])
test('T17403', normal, ghci_script, ['T17403.script'])
test('T17431', normal, ghci_script, ['T17431.script'])
+test('T17549', expect_broken(17549), ghci_script, ['T17549.script'])