Fix a couple of readtype bugs, which deals with many of the failures …

…from the signature changes.
rakudo · Oct 6, 2009 · d39a7de · d39a7de
1 parent 41bc84f
commit d39a7de
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/parser/actions.pm b/src/parser/actions.pm
@@ -1054,7 +1054,7 @@ method signature($/, $key) {
                 :optional( $var.viviself() ?? 1 !! 0 ),
                 :slurpy( $var.slurpy() ),
                 :names( $var.named() eq "" ?? list() !! list($var.named()) ),
-                :readtype( $readtype ),
+                :read_type( $readtype ),
                 :invocant( $invocant ),
                 :multi_invocant( $multi_inv_suppress ?? 0 !! 1 ),
                 :types( $var<type> )

diff --git a/src/parser/signature.pm b/src/parser/signature.pm
@@ -115,8 +115,8 @@ method ast($high_level?) {
             $_<types>.named('type');
             $add_param.push($_<types>);
         }
-        if $_<readtype> {
-            $add_param.push(PAST::Val.new( :value(~$_<readtype>), :named('readtype') ));
+        if $_<read_type> {
+            $add_param.push(PAST::Val.new( :value(~$_<read_type>), :named('readtype') ));
         }
         if $_<names> {
             if $_<names> eq "1" && $_<slurpy> {