On Tuesday 03 April 2007 14:49, Jerry Gay wrote:

> # New Ticket Created by  Jerry Gay
> # Please include the string:  [perl #42292]
> # in the subject line of all future correspondence about this issue.
> # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=42292 >
>
>
> PCCMETHOD specifies C<value :named["key"]>
> PDD03 specifies C<value :named('key')>
>
> i think it's possible to make the two look more alike. consistency++

Something like this?

-- c

=== lib/Parrot/Pmc2c/PCCMETHOD.pm
==================================================================
--- lib/Parrot/Pmc2c/PCCMETHOD.pm	(revision 2780)
+++ lib/Parrot/Pmc2c/PCCMETHOD.pm	(local)
@@ -278,7 +278,7 @@
 sub is_named {
     my ($arg) = @_;
     while ( my ( $k, $v ) = each( %{ $arg->{attrs} } ) ) {
-            return ( 1, $1 ) if ( $k =~ /named\[(.*)\]/ );
+            return ( 1, $1 ) if ( $k =~ /named\((.*)\)/ );
     }
     return ( 0, '' );
 }

Reply via email to