RT #79866, mixing a postcircumfix:<( )> into an Int

Raku · Apr 5, 2012 · 2ac8afb · 2ac8afb
1 parent fd201d9
commit 2ac8afb
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/S14-roles/mixin.t b/S14-roles/mixin.t
@@ -1,6 +1,6 @@
 use v6;
 use Test;
-plan 27;
+plan 28;
 
 # L<S14/Run-time Mixins/>
 
@@ -125,4 +125,10 @@ is $y.test,     42,         'method from other role was OK too';
     is ?$a, Bool::True, 'RT #100782 2/2';
 }
 
+# RT #79866
+{
+    my $x = 42 but role { method postcircumfix:<( )>($arg) { self * $arg[0] } };
+    is $x(13), 546, 'can mix a &.() method into an Int';
+}
+
 # vim: syn=perl6