Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/105758e2c92d08960840bbb265589a6ce067a8cb >--------------------------------------------------------------- commit 105758e2c92d08960840bbb265589a6ce067a8cb Author: Simon Marlow <marlo...@gmail.com> Date: Tue Oct 25 10:24:03 2011 +0100 fix test wrapper for 5558 >--------------------------------------------------------------- tests/concurrent/should_run/all.T | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/tests/concurrent/should_run/all.T b/tests/concurrent/should_run/all.T index 15bcd49..6779458 100644 --- a/tests/concurrent/should_run/all.T +++ b/tests/concurrent/should_run/all.T @@ -62,7 +62,7 @@ test('allowinterrupt001', normal, compile_and_run, ['']) # try hard to provoke the error by running the test 100 times test('5558', [ only_ways(['threaded2']), - cmd_wrapper(lambda c: 'for i in `seq 1 100`; do ' + c + '; done') ], + cmd_wrapper(lambda c: 'for i in `seq 1 100`; do ' + c + ' || break; done') ], compile_and_run, ['']) # ----------------------------------------------------------------------------- _______________________________________________ Cvs-ghc mailing list Cvs-ghc@haskell.org http://www.haskell.org/mailman/listinfo/cvs-ghc