diff options
| -rw-r--r-- | t/re/pat_rt_report.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/t/re/pat_rt_report.t b/t/re/pat_rt_report.t index 9f057e6778..9b53bae70a 100644 --- a/t/re/pat_rt_report.t +++ b/t/re/pat_rt_report.t @@ -1147,6 +1147,8 @@ EOP { # [perl #4289] First mention $& after a match + local $::TODO = "these tests fail without Copy-on-Write enabled" + if $Config{ccflags} =~ /PERL_NO_COW/; fresh_perl_is( '$_ = "abc"; /b/g; $_ = "hello"; print eval q|$&|, "\n"', "b\n", {}, '$& first mentioned after match'); |