Skip to content

Commit af8f212

Browse files
committed
Move fixed todo from run/todo.t to re/pat_advanced
I changed the description, because looking at the ticket, it caused a segfault; more serious than an assertion failure.
1 parent ff711e4 commit af8f212

File tree

2 files changed

+10
-8
lines changed

2 files changed

+10
-8
lines changed

t/re/pat_advanced.t

Lines changed: 10 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -2713,6 +2713,16 @@ EOF_DEBUG_OUT
27132713
$x =~ s/^[\x{0301}\x{030C}]+//;
27142714
}
27152715

2716+
{ # GH 16627
2717+
fresh_perl('use re "eval";
2718+
my @r;
2719+
for $0 (qw(0 0)) {
2720+
push @r, qr/@r(?{})/;
2721+
}',
2722+
{ stderr => 'devnull' });
2723+
is($?, 0, "No segfault; [GH 16627]");
2724+
}
2725+
27162726

27172727
# !!! NOTE that tests that aren't at all likely to crash perl should go
27182728
# a ways above, above these last ones. There's a comment there that, like

t/run/todo.t

Lines changed: 0 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -181,12 +181,4 @@ TODO: {
181181

182182
}
183183

184-
{
185-
fresh_perl('use re "eval";
186-
my @r;
187-
for$0(qw(0 0)){push@r,qr/@r(?{})/};',
188-
{ stderr => 'devnull' });
189-
is($?, 0, "No assertion failure");
190-
}
191-
192184
done_testing();

0 commit comments

Comments
 (0)