root/trunk/tsuite/auto/clean_tsuite.pl

Revision 855, 0.7 kB (checked in by peter, 23 months ago)

source/service.cpp:

  • Fix bugs in new FFmtRead. It now runs the test suite cleanly. Make new version the default.

source/parse_table.cpp:

  • Reading e-format numbers in Haardt & Madau data files can now be done in single FFmtRead call.

source/cddefines.h:

  • Fix VS warnings about unused formal parameter.

tsuite/auto/clean_tsuite.pl:

  • Clean up crashed.txt.
  • Property svn:eol-style set to native
  • Property svn:executable set to *
Line 
1#!/usr/bin/perl
2
3# This perl script cleans out the test suite after a test run, it will
4# only leave files that are part of the official distribution and the
5# cloudy executable (with a name ending in .exe) if that was present!
6#
7# Peter van Hoof
8
9while( defined( $input = glob("*") ) ) {
10    @ll = split( /\./, "$input" );
11    if( $#ll != 1 || ( $ll[1] ne "in" && $ll[1] ne "pl" && $ll[1] ne "htm" && $ll[1] ne "jpg" && $ll[1] ne "dat" && $ll[1] ne "txt" && $ll[1] ne "exe" ) ) {
12        print "deleting $input...\n";
13        unlink "$input";
14    }
15}
16unlink "checkend.txt";
17unlink "close.txt";
18unlink "crashed.txt";
19unlink "debug.txt";
20unlink "minor.txt";
21unlink "serious.txt";
22unlink "skip.txt";
23unlink "optimal.in";
Note: See TracBrowser for help on using the browser.