diff options
-rw-r--r-- | libraries/base/tests/T13525.hs | 7 | ||||
-rw-r--r-- | libraries/base/tests/all.T | 1 |
2 files changed, 8 insertions, 0 deletions
diff --git a/libraries/base/tests/T13525.hs b/libraries/base/tests/T13525.hs new file mode 100644 index 0000000000..1bb01b6a18 --- /dev/null +++ b/libraries/base/tests/T13525.hs @@ -0,0 +1,7 @@ +import System.IO +import System.Timeout + +main :: IO () +main = do + hWaitForInput stdin (5 * 1000) + return () diff --git a/libraries/base/tests/all.T b/libraries/base/tests/all.T index 13049f751c..49298d3524 100644 --- a/libraries/base/tests/all.T +++ b/libraries/base/tests/all.T @@ -211,3 +211,4 @@ test('T13191', , only_ways(['normal'])], compile_and_run, ['-O']) +test('T13525', expect_broken(13525), compile_and_run, ['']) |