At 11:59 AM 9/10/00 -0700, Benjamin Stuhl wrote:
>--- Chaim Frenkel <[EMAIL PROTECTED]> wrote:
> > Now where
> > sub recursive() { my $a :shared; ....; return
> > recursive() }
> > would put $a or even which $a is meant, is left as an
> > excersize
> > for someone brighter than me.
>
>%P6-E-MEANINGLESS, "my $a : shared" is a meaningless
>construct.
That, as they say, turns out not to be the case. :)
#! perl -w
my $first_arg : shared = shift;
sub foo {
print $first_arg, "\n";
}
new Thread \&foo;
No reason that code shouldn't work right...
Dan
--------------------------------------"it's like this"-------------------
Dan Sugalski even samurai
[EMAIL PROTECTED] have teddy bears and even
teddy bears get drunk