From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 12 Apr 2003 18:23:40 +0000 (+0000)
Subject: The debugging aid #19182 didn't.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7204222c6a20b2d62df28628842774d12196dc7d;p=p5sagit%2Fp5-mst-13.2.git

The debugging aid #19182 didn't.

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

diff --git a/ext/B/t/deparse.t b/ext/B/t/deparse.t
index 50746e7..f60d913 100644
--- a/ext/B/t/deparse.t
+++ b/ext/B/t/deparse.t
@@ -119,12 +119,7 @@ $b =~ s/(LINE:)/sub BEGIN {
     'XL'->bootstrap;
 }
 $1/ if $Is_MacOS;
-if ($a ne $b) {
-    # A temporary debugging aid (Tru64 threaded smoke test somehow
-    # broke between 19150 and 19160, but works okay from command line.)
-    print STDERR "# [$a]\n\# vs expected\n# [$b]\n";
-    print "not ";
-}
+print "# [$a]\n\# vs expected\n# [$b]\nnot " if $a ne $b;
 print "ok " . $i++ . "\n";
 
 __DATA__