From: Michael G. Schwern <schwern@pobox.com>
Date: Tue, 4 Dec 2001 21:09:18 +0000 (-0500)
Subject: stat.t cleanup, first pass
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8799135fadb869c49eb6ebcb20824c5592967dcc;p=p5sagit%2Fp5-mst-13.2.git

stat.t cleanup, first pass
Message-ID: <20011204210918.D13279@blackrider>

t/test.

p4raw-id: //depot/perl@13468
---

diff --git a/t/test.pl b/t/test.pl
index e4411af..e54d53e 100644
--- a/t/test.pl
+++ b/t/test.pl
@@ -252,4 +252,11 @@ sub runperl {
     return $result;
 }
 
+
+sub BAILOUT {
+    print "Bail out! @_\n";
+    exit;
+}
+
+
 1;