summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPerl 5 Porters <perl5-porters@africa.nicoh.com>1996-07-08 23:11:22 +0000
committerCharles Bailey <bailey@genetics.upenn.edu>1996-07-08 23:11:22 +0000
commitbcce72a7a81d4c8e03d40bd0de22a534dc97418b (patch)
tree4f87dde01371f90cad37184e9afccd4d6c1fc70a
parent1edc1566d55df87b21cf04e543228c5f1b61f4d4 (diff)
downloadperl-bcce72a7a81d4c8e03d40bd0de22a534dc97418b.tar.gz
Mention when tests were skipped instead of passed
-rwxr-xr-xt/TEST9
1 files changed, 7 insertions, 2 deletions
diff --git a/t/TEST b/t/TEST
index 291eab5bdb..160e316754 100755
--- a/t/TEST
+++ b/t/TEST
@@ -80,8 +80,13 @@ while ($test = shift) {
}
$next = $next - 1;
if ($ok && $next == $max) {
- print "ok\n";
- $good = $good + 1;
+ if ($max) {
+ print "ok\n";
+ $good = $good + 1;
+ } else {
+ print "skipping test on this platform\n";
+ $files -= 1;
+ }
} else {
$next += 1;
print "FAILED on test $next\n";