[S32-list/pick.t] test for deprecated :replace

Raku · Oct 24, 2010 · 4f15296 · 4f15296
1 parent 600cd40
commit 4f15296
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/S32-list/pick.t b/S32-list/pick.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 25;
+plan 26;
 
 =begin description
 
@@ -78,4 +78,9 @@ is (<a b c d>.pick(*).sort).Str, 'a b c d', 'pick(*) returns all the items in th
     is pick("25", @a).elems, 25, "pick works Str arguments";
 }
 
+#?rakudo todo 'error message for deprecated :replace parameter'
+{
+    dies_ok({ [1,2,3].pick(4, :replace) }, 'error on deprecated :replace');
+}
+
 # vim: ft=perl6