[svn:parrot] r34184 - trunk/languages/perl6/src/parser

Author: pmichaud
Date: Sat Dec 20 21:18:23 2008
New Revision: 34184

Modified:
   trunk/languages/perl6/src/parser/actions.pm

Log:
[rakudo]:  Fix initialization of variables in signatures (RT #61300, cspencer++)
* Patch courtesy cspencer <cspencer@xxxxxxxxxxxx> 


Modified: trunk/languages/perl6/src/parser/actions.pm
==============================================================================
--- trunk/languages/perl6/src/parser/actions.pm (original)
+++ trunk/languages/perl6/src/parser/actions.pm Sat Dec 20 21:18:23 2008
@@ -2392,7 +2392,7 @@
                     :name($_),
                     :isdecl(1),
                     :scope($scope),
-                    :viviself('Perl6Scalar')
+                    :viviself(container_type($sigil))
                 ));
 
                 # Add block entry.