Test Trac #8579
authorSimon Peyton Jones <simonpj@microsoft.com>
Fri, 3 Jan 2014 16:50:12 +0000 (16:50 +0000)
committerSimon Peyton Jones <simonpj@microsoft.com>
Fri, 3 Jan 2014 16:50:12 +0000 (16:50 +0000)
testsuite/tests/ghci/scripts/T8579.script [new file with mode: 0644]
testsuite/tests/ghci/scripts/T8579.stdout [new file with mode: 0644]
testsuite/tests/ghci/scripts/all.T

diff --git a/testsuite/tests/ghci/scripts/T8579.script b/testsuite/tests/ghci/scripts/T8579.script
new file mode 100644 (file)
index 0000000..64aadf0
--- /dev/null
@@ -0,0 +1,5 @@
+data A = X
+data A = Y
+:i A
+:m Data.List
+:i A
diff --git a/testsuite/tests/ghci/scripts/T8579.stdout b/testsuite/tests/ghci/scripts/T8579.stdout
new file mode 100644 (file)
index 0000000..5220e7e
--- /dev/null
@@ -0,0 +1,2 @@
+data A = Y     -- Defined at <interactive>:3:1
+data A = Y     -- Defined at <interactive>:3:1
index cf8ebb9..e7a520c 100755 (executable)
@@ -162,3 +162,4 @@ test('T8485', normal, ghci_script, ['T8485.script'])
 test('T8535', normal, ghci_script, ['T8535.script'])
 test('T8639', normal, ghci_script, ['T8639.script'])
 test('T8640', normal, ghci_script, ['T8640.script'])
 test('T8535', normal, ghci_script, ['T8535.script'])
 test('T8639', normal, ghci_script, ['T8639.script'])
 test('T8640', normal, ghci_script, ['T8640.script'])
+test('T8579', normal, ghci_script, ['T8579.script'])