From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sun, 19 May 2002 01:41:54 +0000 (+0000)
Subject: IRIX SMP turned up a few hundred "Use of uninitialized
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=502fc48ee3e3c29dc3d569f8e543d48ceb7a4de6;p=p5sagit%2Fp5-mst-13.2.git

IRIX SMP turned up a few hundred "Use of uninitialized
value in numeric eq" warnings: initialise the $counter2.

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

diff --git a/ext/threads/shared/t/cond.t b/ext/threads/shared/t/cond.t
index 8c79347..aa80aab 100644
--- a/ext/threads/shared/t/cond.t
+++ b/ext/threads/shared/t/cond.t
@@ -217,9 +217,9 @@ sub ok {
 
     # ditto with refs and shared()
 
-    my $counter2;
+    my $counter2 = 0;
     share($counter2);
-    my $r  = \$counter2;
+    my $r = \$counter2;
 
     sub waiter2 {
 	lock($r);