diff options
-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']) |