Fix one half of what is reported in RT#65128 - our T1 T2 sub f() { ..…

…. } now gives a compile time error like STD.
rakudo · Jun 5, 2009 · 636a2b6 · 636a2b6
1 parent 10a9b23
commit 636a2b6
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/parser/actions.pm b/src/parser/actions.pm
@@ -1865,6 +1865,9 @@ method scoped($/) {
             }
         }
         elsif $past.isa(PAST::Block) && $<fulltypename> {
+            if +$<fulltypename> > 1 {
+                $/.panic("Multiple prefix constraints not yet supported");
+            }
             $past.loadinit().push(PAST::Op.new(
                 :pasttype('call'),
                 :name('!sub_trait_verb'),