Make sure we type check implicit return values for of and returns als…

…o. Completely resolves RT#65128.
rakudo · Jun 5, 2009 · fb2fd43 · fb2fd43
1 parent a89161f
commit fb2fd43
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/parser/actions.pm b/src/parser/actions.pm
@@ -812,6 +812,9 @@ method routine_def($/) {
             my $trait := $_.ast;
             if substr($trait[0], 0, 11) eq 'trait_verb:' {
                 $trait.name('!sub_trait_verb');
+                if $trait[0] eq 'trait_verb:returns' || $trait[0] eq 'trait_verb:of' {
+                    $block<has_return_constraint> := 1;
+                }
             }
             else {
                 $trait.name('!sub_trait');