[perl #38294] [PATCH] Fix :optional => :slurpy state transition

2006-01-21 Thread via RT
# New Ticket Created by Bob Rogers # Please include the string: [perl #38294] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/rt3/Ticket/Display.html?id=38294 > From: Leopold Toetsch <[EMAIL PROTECTED]> Date: Sat, 21 Jan 2006 01:40:38 +0100

Re: Q: Keys can be strings/ints only?

2006-01-21 Thread Leopold Toetsch
On Jan 20, 2006, at 21:34, Klaas-Jan Stol wrote: Hi, I tried to index aggregates using several types of keys (that is, several types of values), and it seems only string and integer values can be used as keys. A quick look at the source in compilers/imcc/symreg.c confirms this, there is no

Re: [perl #38294] [PATCH] Fix :optional => :slurpy state transition

2006-01-21 Thread Leopold Toetsch
On Jan 21, 2006, at 5:19, Bob Rogers (via RT) wrote: The state transition from :optional to :slurpy results in an "Unhandled process_args state 0x83" error. The attached fix works, though it may not be complete. Thanks, applied - r11278. Also, it assumes that CALL_STATE_SLURP and CALL_STAT

Re: argument count mismatch

2006-01-21 Thread Leopold Toetsch
On Jan 20, 2006, at 20:57, Chip Salzenberg wrote: On Fri, Jan 13, 2006 at 05:51:53PM +0100, Leopold Toetsch wrote: This could be fixed by special-casing the initial call to ':main', and then turn on param count checks if wanted. I think you'll need to invert that, given that code can be exec

[OT] Re: Parrot and PGE will save the day (was Re: "as if" [Was: Selective reuse of storage in &bless.] )

2006-01-21 Thread Juerd
Rob Kinyon skribis 2006-01-20 23:12 (-0500): > > $ perl -le '$h{1} = "Perl"; print values h' > > Perl > > $ perl -le 'push a, "Perl"; print @a' > > Perl > Now, that's an unadvertised feature! I think I need to revisit some golfs ... Not worth the effort, because length('[EMAIL PROTECTED]') == leng

Re: Parrot and PGE will save the day (was Re: "as if" [Was: Selective reuse of storage in &bless.] )

2006-01-21 Thread Audrey Tang (autrijus)
On 1/21/06, Rob Kinyon <[EMAIL PROTECTED]> wrote: > I'm making a few assumptions here: > 1) Since PGE isn't part of Perl6 (because it's written in PIR), it > can be used as the parser/lexer/etc. for any language, not just Perl6. Rules, like regexes, are essentially language neutral. So that's

Symbolic references and twigils

2006-01-21 Thread Joshua Choi
Supposed I wanted to refer to $.head using a symbolic reference--how would I do it? my $varname = 'head'; #1 say $.::($varname); #2 say $::('.' ~ $varname); #3 something else

Re: Symbolic references and twigils

2006-01-21 Thread Larry Wall
On Sat, Jan 21, 2006 at 10:37:40AM -0700, Joshua Choi wrote: : Supposed I wanted to refer to $.head using a symbolic reference--how : would I do it? : : my $varname = 'head'; : #1 say $.::($varname); : #2 say $::('.' ~ $varname); : #3 something else I'd say #1 is easiest to grok, insofar

Re: Parrot and PGE will save the day (was Re: "as if" [Was: Selective reuse of storage in &bless.] )

2006-01-21 Thread Larry Wall
On Sat, Jan 21, 2006 at 04:35:00PM +0800, Audrey Tang (autrijus) wrote: : Moreover, writing a Perl 5 parser in PGE alone is... Very difficult. : It can be done (eg. PPI), but taking it and emit PIR is a nontrivial : task that would not magically happen. Actually, PPI is not a good example of compl

Re: Parrot and PGE will save the day (was Re: "as if" [Was: Selective reuse of storage in &bless.] )

2006-01-21 Thread Larry Wall
The purpose of the P5-to-P6 translator is mostly to provide warm fuzzies. That's how it worked out for a2p, anyway. People knew they had the translator available, but mostly just translated their stuff piecemeal by hand. They primarily used the translator for educational purposes--feed a bit of

Object initialization protocol breakage?

2006-01-21 Thread Bob Rogers
Sometime between r11268 (probably) and 11276, there was a change to the way that initialization methods get called, regardless of whether "__init" or a 'BUILD' property is used. If I do .local pmc foo, hash .local int foo_class foo_class = find_type "User::Foo"