Test .grep: { /foo/ }

Covers rakudo/rakudo#2614.
Raku · Jan 17, 2019 · ae6ebad · ae6ebad
1 parent 2df8f54
commit ae6ebad
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/S32-list/grep.t b/S32-list/grep.t
@@ -9,7 +9,7 @@ built-in grep tests
 
 =end pod
 
-plan 45;
+plan 46;
 
 my @list = (1 .. 10);
 
@@ -183,4 +183,8 @@ my @list = (1 .. 10);
   }
 }
 
+# https://github.com/rakudo/rakudo/issues/2614
+is-deeply ("foo").grep({ /foo/ }), ("foo",),
+    'Block returning a regex to grep will Do The Right Thing, dubious as it is';
+
 # vim: ft=perl6