Implement prefix:<~> for MultiSub. This makes sure we stringify Parro…

…t multisubs correctly (it may well we that we can drop this patch if Parrot changes how they stringify).
rakudo · Jun 30, 2009 · 91bb463 · 91bb463
1 parent 1e742a7
commit 91bb463
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/src/classes/Multi.pir b/src/classes/Multi.pir
@@ -25,6 +25,14 @@ Multi - Perl 6 multi-dispatch routine
     .return (self)
 .end
 
+
+.namespace []
+
+.sub 'prefix:~' :multi('MultiSub')
+    .param pmc multi
+    .tailcall multi.'name'()
+.end
+
 =back
 
 =cut