Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/d8513f0d7075c19b2cb18ff4e957f7a139d6e9ec >--------------------------------------------------------------- commit d8513f0d7075c19b2cb18ff4e957f7a139d6e9ec Author: Simon Marlow <[email protected]> Date: Tue Nov 29 09:09:56 2011 +0000 simplify using prof_ways >--------------------------------------------------------------- tests/profiling/should_run/all.T | 26 +++++++++++++------------- 1 files changed, 13 insertions(+), 13 deletions(-) diff --git a/tests/profiling/should_run/all.T b/tests/profiling/should_run/all.T index 9bae788..adcb96d 100644 --- a/tests/profiling/should_run/all.T +++ b/tests/profiling/should_run/all.T @@ -3,7 +3,7 @@ extra_prof_ways = ['prof', 'prof_hc_hb', 'prof_hb', 'prof_hd', 'prof_hy', 'prof_hr'] test('heapprof001', - composes([only_ways(prof_ways + extra_prof_ways), + composes([only_ways(prof_ways), extra_ways(extra_prof_ways), req_profiling, extra_run_opts('7')]), @@ -23,50 +23,50 @@ test('T3001-2', compile_and_run, ['-package bytestring']) test('scc001', [req_profiling, - extra_ways(['prof']), only_ways(['prof'] + prof_ways)], + extra_ways(['prof']), only_ways(prof_ways)], compile_and_run, ['-fno-state-hack']) # Note [consistent stacks] test('scc002', [req_profiling, - extra_ways(['prof']), only_ways(['prof'] + prof_ways)], + extra_ways(['prof']), only_ways(prof_ways)], compile_and_run, ['']) test('scc003', [req_profiling, - extra_ways(['prof']), only_ways(['prof'] + prof_ways)], + extra_ways(['prof']), only_ways(prof_ways)], compile_and_run, ['-fno-state-hack']) # Note [consistent stacks] test('scc004', [req_profiling, - extra_ways(['prof']), only_ways(['prof'] + prof_ways), + extra_ways(['prof']), only_ways(prof_ways), expect_broken(5654)], compile_and_run, ['']) test('5314', - [ only_ways(prof_ways + extra_prof_ways), + [ only_ways(prof_ways), extra_ways(extra_prof_ways), req_profiling ], compile_and_run, ['']) test('T680', - [ req_profiling, extra_ways(['prof']), only_ways(['prof'] + prof_ways) ], + [ req_profiling, extra_ways(['prof']), only_ways(prof_ways) ], compile_and_run, ['-fno-full-laziness']) # Note [consistent stacks] test('T2552', - [ req_profiling, extra_ways(['prof']), only_ways(['prof'] + prof_ways) ], + [ req_profiling, extra_ways(['prof']), only_ways(prof_ways) ], compile_and_run, ['']) test('T949', - [ req_profiling, extra_ways(extra_prof_ways), only_ways(extra_prof_ways) ], + [ req_profiling, extra_ways(extra_prof_ways), only_ways(prof_ways) ], compile_and_run, ['']) test('ioprof', - [ req_profiling, extra_ways(['prof']), only_ways(['prof'] + prof_ways), + [ req_profiling, extra_ways(['prof']), only_ways(prof_ways), expect_fail_for(['prof']), # The results for 'prof' are fine, but the ordering changes. # We care more about getting the optimised results right, so ignoring @@ -78,17 +78,17 @@ test('ioprof', # These two examples are from the User's Guide: test('prof-doc-fib', - [ req_profiling, extra_ways(['prof']), only_ways(['prof'] + prof_ways) ], + [ req_profiling, extra_ways(['prof']), only_ways(prof_ways) ], compile_and_run, ['']) test('prof-doc-last', - [ req_profiling, extra_ways(['prof']), only_ways(['prof'] + prof_ways) ], + [ req_profiling, extra_ways(['prof']), only_ways(prof_ways) ], compile_and_run, ['-fno-full-laziness']) test('T5559', # unicode in cost centre names - [ req_profiling, extra_ways(['prof']), only_ways(['prof'] + prof_ways) ], + [ req_profiling, extra_ways(['prof']), only_ways(prof_ways) ], compile_and_run, ['']) _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
