On Sat, Jan 24, 2004 at 05:03:55PM +0530, Abhijit Menon-Sen wrote: > Thanks, all applied. (#22205, 22206). > Thanks also to Steve Hay for testing. > Storable 2.10 will be uploaded soon. Delay due to me finding a problem with 5.8.2, which I believe is now fixed. (change 22217) Nicholas Clark ==== //depot/perl/ext/Storable/t/threads.t#2 (text) ==== @@ -32,6 +32,13 @@ print "1..0 # Skip: no threads\n"; exit 0; } + # - is \W, so can't use \b at start. Negative look ahead and look behind + # works at start/end of string, or where preceded/followed by spaces + if ($] == 5.008002 and $Config{'ccflags'} =~ /(?<!\S)-DDEBUGGING(?!\S)/) { + # Bug caused by change 21610, fixed by change 21849 + print "1..0 # Skip: tickles bug in threads combined with -DDEBUGGING on 5.8.2\n"; + exit 0; + } } use Test::More;Thread Previous