Don't quit before printing out the message.

p4raw-id: //depot/cfgperl@3986

diff --git a/t/lib/syslfs.t b/t/lib/syslfs.t
index 2955397..458b626 100644 (file)
--- a/t/lib/syslfs.t
+++ b/t/lib/syslfs.t
@@ -119,12 +119,10 @@ print "ok 7\n";
 fail unless $big eq "big";
 print "ok 8\n";
 
-bye();
-
 if ($fail) {
     print STDERR <<EOM;
 #
-# If the lfs (large file support) tests fail, it means that
+# If the lfs (large file support) tests fail, it may mean that
 # the *file system* you are running the tests on doesn't support
 # large files (files larger than two gigabytes).  Perl may still
 # be able to support such files, once you have such a file system.
@@ -132,4 +130,6 @@ if ($fail) {
 EOM
 }
 
+bye();
+
 # eof

diff --git a/t/op/lfs.t b/t/op/lfs.t
index bfcc33a..2683a69 100644 (file)
--- a/t/op/lfs.t
+++ b/t/op/lfs.t
@@ -123,12 +123,10 @@ print "ok 7\n";
 fail unless $big eq "big";
 print "ok 8\n";
 
-bye();
-
 if ($fail) {
     print STDERR <<EOM;
 #
-# If the lfs (large file support) tests fail, it means that
+# If the lfs (large file support) tests fail, it may mean that
 # the *file system* you are running the tests on doesn't support
 # large files (files larger than two gigabytes).  Perl may still
 # be able to support such files, once you have such a file system.
@@ -136,4 +134,6 @@ if ($fail) {
 EOM
 }
 
+bye();
+
 # eof