diff options
author | Ben Gamari <bgamari.foss@gmail.com> | 2016-08-31 13:49:24 -0400 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2016-08-31 14:28:27 -0400 |
commit | 22259c17c5e3043e5fa5b354f339f9b0d66167db (patch) | |
tree | d4e59e9b231f158886ee3239022c91a2933f04df /testsuite/tests | |
parent | d1f22396eec4be0a2101de6b7f7b780792acc0a9 (diff) | |
download | haskell-22259c17c5e3043e5fa5b354f339f9b0d66167db.tar.gz |
testsuite: Failing testcase for #12091
Just as it says on the can
Test Plan: validate
Reviewers: austin
Subscribers: thomie
Differential Revision: https://phabricator.haskell.org/D2489
GHC Trac Issues: #12091
Diffstat (limited to 'testsuite/tests')
-rw-r--r-- | testsuite/tests/ghci/scripts/T12091.script | 2 | ||||
-rw-r--r-- | testsuite/tests/ghci/scripts/T12091.stdout | 1 | ||||
-rwxr-xr-x | testsuite/tests/ghci/scripts/all.T | 3 |
3 files changed, 6 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/scripts/T12091.script b/testsuite/tests/ghci/scripts/T12091.script new file mode 100644 index 0000000000..247a1ed73c --- /dev/null +++ b/testsuite/tests/ghci/scripts/T12091.script @@ -0,0 +1,2 @@ +x = 5 +x
\ No newline at end of file diff --git a/testsuite/tests/ghci/scripts/T12091.stdout b/testsuite/tests/ghci/scripts/T12091.stdout new file mode 100644 index 0000000000..7813681f5b --- /dev/null +++ b/testsuite/tests/ghci/scripts/T12091.stdout @@ -0,0 +1 @@ +5
\ No newline at end of file diff --git a/testsuite/tests/ghci/scripts/all.T b/testsuite/tests/ghci/scripts/all.T index 9c791e33f2..9e3656728d 100755 --- a/testsuite/tests/ghci/scripts/all.T +++ b/testsuite/tests/ghci/scripts/all.T @@ -259,4 +259,7 @@ test('T12007', normal, ghci_script, ['T12007.script']) test('T11975', normal, ghci_script, ['T11975.script']) test('T10963', normal, ghci_script, ['T10963.script']) test('T12520', normal, ghci_script, ['T12520.script']) +test('T12091', + [expect_broken(12091), extra_run_opts('-fobject-code')], + ghci_script, ['T12091.script']) test('T12523', normal, ghci_script, ['T12523.script']) |