Skip to content

Commit c95c8b0

Browse files
1-1samkhwilliamson
authored andcommitted
todo test for GH 16522 (S_sprintf_is_multiconcatable assertion fails)
This commit adds a todo test for GH 16522. It tests that perl can parse '0/v$0sprintf$0$0' without encountering an assertion failure.
1 parent 1e7e8de commit c95c8b0

File tree

1 file changed

+10
-0
lines changed

1 file changed

+10
-0
lines changed

t/run/todo.t

Lines changed: 10 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -244,6 +244,16 @@ TODO: {
244244

245245
}
246246

247+
TODO: {
248+
todo_skip "Test needs -DDEBUGGING", 1 unless $is_debugging_build;
249+
local $::TODO = 'GH 16522';
250+
fresh_perl(<<~'HERE', { stderr => 'devnull' });
251+
END { exit 0 } # Consider compilation errors a success
252+
0/v$0sprintf$0$0
253+
HERE
254+
is($?, 0, 'No assertion failure; GH 16522');
255+
}
256+
247257
TODO: {
248258
local $::TODO = 'GH 16865';
249259
fresh_perl('\(sort { 0 } 0, 0 .. "a")', { stderr => 'devnull' });

0 commit comments

Comments
 (0)