Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/f8b80966a5fb57e3c27aafa0d3a0695b4232b8c7 >--------------------------------------------------------------- commit f8b80966a5fb57e3c27aafa0d3a0695b4232b8c7 Author: David Terei <[email protected]> Date: Tue Oct 11 17:40:32 2011 -0700 Have multi[src,mod] test ways clean up after themselves. >--------------------------------------------------------------- driver/testlib.py | 6 ++++++ 1 files changed, 6 insertions(+), 0 deletions(-) diff --git a/driver/testlib.py b/driver/testlib.py index 3098ff5..3ed5b82 100644 --- a/driver/testlib.py +++ b/driver/testlib.py @@ -593,6 +593,12 @@ def test_common_work (name, opts, func, args): '_stub.h', '_stub.c', '_stub.o', '.hp', '.exe.hp', '.ps', '.aux', '.hcr', '.eventlog'])) + if func == multisrc_compile or func == multisrc_compile_fail \ + or func == multi_compile or func == multi_compile_fail: + extra_mods = args[1] + clean(map (lambda (f,x): replace_suffix(f, 'o'), extra_mods)) + clean(map (lambda (f,x): replace_suffix(f, 'hi'), extra_mods)) + clean(getTestOpts().clean_files) try: _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
