autothreading over named params (RT #69863)

Raku · Oct 1, 2011 · a7cc650 · a7cc650
1 parent 55356a5
commit a7cc650
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/S03-junctions/autothreading.t b/S03-junctions/autothreading.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 83;
+plan 84;
 
 {
     # Solves the equation A + B = A * C for integers
@@ -306,4 +306,11 @@ plan 83;
     nok $y, '... and the result is False';
 }
 
+# RT #69863
+# autothreading over named-only params
+{
+    sub foo(Int :$n) { $n }
+    ok foo(n => 1|2) ~~ Junction, 'named-only params autothread correctly';
+}
+
 # vim: ft=perl6