diff options
author | Matthew Pickering <matthewtpickering@gmail.com> | 2021-07-01 00:00:02 +0100 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-07-09 08:46:09 -0400 |
commit | bc38286c57dd9d0e80ef442edc338acdd60e38a3 (patch) | |
tree | a14b2483a92b3ef4f5001ef7cd5186061649a868 | |
parent | 82284ba19a588516a49905762b0352cb198a3948 (diff) | |
download | haskell-bc38286c57dd9d0e80ef442edc338acdd60e38a3.tar.gz |
Make throwto002 a normal (not reqlib) test
-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 |