Couple more test-harness platform tweaks
This commit is contained in:
		
							parent
							
								
									2a278ad29b
								
							
						
					
					
						commit
						15b7d18104
					
				| 
						 | 
				
			
			@ -120,11 +120,18 @@ sub initialize() {
 | 
			
		|||
#
 | 
			
		||||
sub run() {
 | 
			
		||||
 | 
			
		||||
  my $twpassed = 1;
 | 
			
		||||
 | 
			
		||||
    twtools::logStatus("*** Beginning $description\n");
 | 
			
		||||
    printf("%-30s", "-- $description");
 | 
			
		||||
 | 
			
		||||
    if ($^O eq "skyos") {
 | 
			
		||||
        ++$twtools::twskippedtests;
 | 
			
		||||
        print "SKIPPED; TODO: SkyOS has fewer expected changes here; refactor so we can test for correct values\n";
 | 
			
		||||
        return;
 | 
			
		||||
    }
 | 
			
		||||
 | 
			
		||||
    my $twpassed = 1;
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
    #########################################################
 | 
			
		||||
    #
 | 
			
		||||
    # Run the tests describe above in the %TESTS structure.
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -137,7 +137,7 @@ processCommandLine();
 | 
			
		|||
prepareListOfTests() if scalar(@twtests) == 0;  # only if none were on the cmdline
 | 
			
		||||
 | 
			
		||||
print "\n";
 | 
			
		||||
print "initializing for tests on $^O…\n\n";
 | 
			
		||||
print "initializing for tests on $^O...\n\n";
 | 
			
		||||
 | 
			
		||||
print "logging to $ENV{'PWD'}/$twtools::twrootdir/status.log\n\n";
 | 
			
		||||
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue