From 8799135fadb869c49eb6ebcb20824c5592967dcc Mon Sep 17 00:00:00 2001 From: "Michael G. Schwern" Date: Tue, 4 Dec 2001 16:09:18 -0500 Subject: [PATCH] stat.t cleanup, first pass Message-ID: <20011204210918.D13279@blackrider> t/test. p4raw-id: //depot/perl@13468 --- t/test.pl | 7 +++++++ 1 file changed, 7 insertions(+) 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; -- 2.7.4