diff options
| author | John Lenz <lenz@math.uic.edu> | 2014-01-07 07:22:56 -0600 |
|---|---|---|
| committer | Austin Seipp <austin@well-typed.com> | 2014-01-07 08:29:29 -0600 |
| commit | c53b339591eca7268df9845036f6cbc4b64d20b0 (patch) | |
| tree | 91b440f0155ba0da413c290c0c55763e701a6cd4 /testsuite/tests/runghc | |
| parent | 036916bd125feb57a55d695366900c39a8438500 (diff) | |
| download | haskell-c53b339591eca7268df9845036f6cbc4b64d20b0.tar.gz | |
Tests for #8601
Signed-off-by: Austin Seipp <austin@well-typed.com>
Diffstat (limited to 'testsuite/tests/runghc')
| -rw-r--r-- | testsuite/tests/runghc/Makefile | 5 | ||||
| -rw-r--r-- | testsuite/tests/runghc/T8601.stdout | 1 | ||||
| -rw-r--r-- | testsuite/tests/runghc/all.T | 2 |
3 files changed, 8 insertions, 0 deletions
diff --git a/testsuite/tests/runghc/Makefile b/testsuite/tests/runghc/Makefile index de374d5c97..f96c8297bd 100644 --- a/testsuite/tests/runghc/Makefile +++ b/testsuite/tests/runghc/Makefile @@ -5,3 +5,8 @@ include $(TOP)/mk/test.mk T7859: -'$(RUNGHC)' -fdefer-type-errors T7859.hs +#The bug is that when reading from standard input, --ghc-arg= did not work correctly. +#In the buggy version, the following command would try and use mtl as a source file to +#compile. +T8601: + -echo 'main = putStrLn "Hello World!"' | '$(RUNGHC)' -f '$(TEST_HC)' -hide-package --ghc-arg=bytestring diff --git a/testsuite/tests/runghc/T8601.stdout b/testsuite/tests/runghc/T8601.stdout new file mode 100644 index 0000000000..980a0d5f19 --- /dev/null +++ b/testsuite/tests/runghc/T8601.stdout @@ -0,0 +1 @@ +Hello World! diff --git a/testsuite/tests/runghc/all.T b/testsuite/tests/runghc/all.T index e7a56129f3..d268f2eb52 100644 --- a/testsuite/tests/runghc/all.T +++ b/testsuite/tests/runghc/all.T @@ -4,3 +4,5 @@ setTestOpts(when(compiler_profiled(), skip)) test('T7859', req_interp, run_command, ['$MAKE --no-print-directory -s T7859']) +test('T8601', req_interp, run_command, + ['$MAKE --no-print-directory -s T8601']) |