From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 15 Jun 2005 22:31:41 +0000 (+0000)
Subject: We were failing to pring "not ok" if the text exited uncleanly
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c7c9533e94e6cc0e9fbc554bcf8be84cf418b992;p=p5sagit%2Fp5-mst-13.2.git

We were failing to pring "not ok" if the text exited uncleanly

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

diff --git a/ext/B/t/bytecode.t b/ext/B/t/bytecode.t
index 55a4c2f..3c7d282 100644
--- a/ext/B/t/bytecode.t
+++ b/ext/B/t/bytecode.t
@@ -68,9 +68,10 @@ EOT
 	}
     }
     print <<"EOT";
+not ok $cnt
 --------- SCRIPT
 $script
---------- $?
+--------- \$\? = $?
 $got
 EOT
 } continue {