diff options
| author | Nicholas Clark <nick@ccl4.org> | 2004-04-04 16:32:54 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2004-04-04 16:32:54 +0000 |
| commit | c36974382b9fb3486cafe95ae8783bfee203da7d (patch) | |
| tree | bc6ade4f17ff61ea3e130b53cbdb332c5ebd8867 /ext | |
| parent | 20a6717b3f0310570b661870c2455994a4ab8016 (diff) | |
| download | perl-c36974382b9fb3486cafe95ae8783bfee203da7d.tar.gz | |
Hand merge patch from maint back to blead.
p4raw-id: //depot/perl@22646
Diffstat (limited to 'ext')
| -rwxr-xr-x | ext/threads/threads.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ext/threads/threads.pm b/ext/threads/threads.pm index 68bcb437d1..56b0c01d13 100755 --- a/ext/threads/threads.pm +++ b/ext/threads/threads.pm @@ -56,7 +56,8 @@ our $VERSION = '1.03'; # || 0 to ensure compatibility with previous versions sub equal { ($_[0]->tid == $_[1]->tid) || 0 } -# use "goto" trick to avoid pad problems from 5.8.1, should also be faster +# use "goto" trick to avoid pad problems from 5.8.1 (fixed in 5.8.2) +# should also be faster sub async (&;@) { unshift @_,'threads'; goto &new } sub object { |