diff options
author | Matthew Pickering <matthewtpickering@gmail.com> | 2021-07-01 00:00:02 +0100 |
---|---|---|
committer | Matthew Pickering <matthewtpickering@gmail.com> | 2021-07-05 14:39:50 +0100 |
commit | 3e57d51b36b14143a11cd48aff0642ed55a22dc3 (patch) | |
tree | f292185af801c52f68fd29369f769af8a7d63de2 | |
parent | 0c1b504351fffa4720f2abe179a6fdfb9b0767ba (diff) | |
download | haskell-wip/reqlib-fixes.tar.gz |
Make throwto002 a normal (not reqlib) testwip/reqlib-fixes
-rw-r--r-- | testsuite/tests/concurrent/should_run/all.T | 2 | ||||
-rw-r--r-- | testsuite/tests/concurrent/should_run/throwto002.hs | 1 |
2 files changed, 1 insertions, 2 deletions
diff --git a/testsuite/tests/concurrent/should_run/all.T b/testsuite/tests/concurrent/should_run/all.T index 23d950c908..18b05ef292 100644 --- a/testsuite/tests/concurrent/should_run/all.T +++ b/testsuite/tests/concurrent/should_run/all.T @@ -45,7 +45,7 @@ test('T4030', normal, compile_and_run, ['-O']) # each of these runs for about a second test('throwto001', [reqlib('random'), extra_run_opts('1000 2000')], compile_and_run, ['']) -test('throwto002', [reqlib('random')], compile_and_run, ['']) +test('throwto002', normal, compile_and_run, ['']) test('throwto003', normal, compile_and_run, ['']) test('mask001', normal, compile_and_run, ['']) diff --git a/testsuite/tests/concurrent/should_run/throwto002.hs b/testsuite/tests/concurrent/should_run/throwto002.hs index 7cb5709129..eaaae0c0cb 100644 --- a/testsuite/tests/concurrent/should_run/throwto002.hs +++ b/testsuite/tests/concurrent/should_run/throwto002.hs @@ -2,7 +2,6 @@ import Control.Concurrent import Control.Exception import Data.Array -import System.Random import System.Environment import Control.Monad import GHC.Conc |