Test empty slurpy parameters work correctly.

Raku · Feb 16, 2016 · 2dd1099 · 2dd1099
1 parent 2a21a59
commit 2dd1099
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/t/nqp/37-slurpy.t b/t/nqp/37-slurpy.t
@@ -2,7 +2,7 @@
 
 # slurpy args
 
-plan(8);
+plan(9);
 
 sub slurpy_pos(*@pos) {
     ok(@pos[0] == 1);
@@ -25,4 +25,10 @@ sub named_and_slurpy(:$x, *@foo) {
     ok($x eq "ok x");
 };
 
+sub empty_slurpy(*@pos, *%named) {
+    ok(nqp::elems(@pos) == 0 && nqp::elems(%named) == 0, "empty slurpies");
+}
+
+empty_slurpy();
+
 named_and_slurpy(1, :x("ok x"));