Change 16323 by jhi@alpha on 2002/05/02 02:47:22
Ooops. Not everybody does threads.
Affected files ...
.... //depot/perl/ext/threads/shared/t/semaphore.t#3 edit
Differences ...
==== //depot/perl/ext/threads/shared/t/semaphore.t#3 (text) ====
Index: perl/ext/threads/shared/t/semaphore.t
--- perl/ext/threads/shared/t/semaphore.t.~1~ Wed May 1 21:00:06 2002
+++ perl/ext/threads/shared/t/semaphore.t Wed May 1 21:00:06 2002
@@ -1,3 +1,13 @@
+BEGIN {
+ chdir 't' if -d 't';
+ push @INC ,'../lib';
+ require Config; import Config;
+ unless ($Config{'useithreads'}) {
+ print "1..0 # Skip: no threads\n";
+ exit 0;
+ }
+}
+
print "1..1\n";
use threads;
use threads::shared::semaphore;
End of Patch.