Add test for RT #125302

Raku · Jun 6, 2015 · e225997 · e225997
1 parent 5f50466
commit e225997
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/S05-metasyntax/regex.t b/S05-metasyntax/regex.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 29;
+plan 30;
 
 eval-dies-ok('qr/foo/', 'qr// is gone');
 
@@ -119,4 +119,7 @@ eval-lives-ok '/<[..b]>/', '/<[..b]>/ lives';
     is HasMethod.parse('foo'),       44, 'can have a lexical regex in a method in a class';
 }
 
+# RT #125302
+lives-ok { Regex.new.perl }, '"Regex.new.perl does not segfault';
+
 # vim: ft=perl6