Couple more test-harness platform tweaks

This commit is contained in:
Brian Cox 2017-09-10 00:21:44 -07:00
parent 2a278ad29b
commit 15b7d18104
2 changed files with 29 additions and 22 deletions

View File

@ -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.

View File

@ -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";