diff options
| author | Nikola Knezevic <indy@tesla.rcub.bg.ac.yu> | 2002-05-28 10:17:53 +0200 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-28 12:26:34 +0000 |
| commit | 195d559b8ef22ad8837051fd15a3100fca99b37f (patch) | |
| tree | b644beae0d8adf1368e4e1c588e706bc30c5e6ab /t | |
| parent | 9a8de00333030b382665b01907d7004a16aafd41 (diff) | |
| download | perl-195d559b8ef22ad8837051fd15a3100fca99b37f.tar.gz | |
Test::Harness and skiping tests functionality
Message-ID: <40949173.20020528081753@tesla.rcub.bg.ac.yu>
p4raw-id: //depot/perl@16829
Diffstat (limited to 't')
| -rw-r--r-- | t/op/64bitint.t | 2 | ||||
| -rw-r--r-- | t/test.pl | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/t/op/64bitint.t b/t/op/64bitint.t index 494f9fd14f..e8314fac8a 100644 --- a/t/op/64bitint.t +++ b/t/op/64bitint.t @@ -3,7 +3,7 @@ BEGIN { eval { my $q = pack "q", 0 }; if ($@) { - print "1..0\n# Skip: no 64-bit types\n"; + print "1..0 # Skip: no 64-bit types\n"; exit(0); } chdir 't' if -d 't'; @@ -40,7 +40,7 @@ sub _diag { sub skip_all { if (@_) { - print STDOUT "1..0 - @_\n"; + print STDOUT "1..0 # Skipped: @_\n"; } else { print STDOUT "1..0\n"; } |