From 923e23bad0514e1bd29112650fb78aa4ea69e1b7 Mon Sep 17 00:00:00 2001 From: Yves Orton Date: Sat, 28 Jan 2017 15:13:17 +0100 Subject: [PATCH] silence warnings from tests about impossible quantifiers MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit thanks to Dave M for noticing.... Signed-off-by: Petr Písař --- t/re/pat_rt_report.t | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/t/re/pat_rt_report.t b/t/re/pat_rt_report.t index 21aff58..dd740e7 100644 --- a/t/re/pat_rt_report.t +++ b/t/re/pat_rt_report.t @@ -1134,9 +1134,10 @@ EOP { # rt fresh_perl_is( - '"foo"=~/((?1)){8,0}/; print "ok"', + 'no warnings "regexp"; "foo"=~/((?1)){8,0}/; print "ok"', "ok", {}, 'RT #130561 - allowing impossible quantifier should not cause SEGVs'); my $s= "foo"; + no warnings 'regexp'; ok($s=~/(foo){1,0}|(?1)/, "RT #130561 - allowing impossible quantifier should not break recursion"); } -- 2.7.4