Skip to content

Commit 23867b4

Browse files
committed
Test sprintf($format) does not issue warnings
Fixed in commit: rakudo/rakudo@35183f396e
1 parent aa74436 commit 23867b4

File tree

1 file changed

+9
-2
lines changed

1 file changed

+9
-2
lines changed

S32-str/sprintf.t

Lines changed: 9 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,9 @@
11
use v6;
2-
2+
use lib <t/spec/packages>;
33
use Test;
4+
use Test::Util;
45

5-
plan 160;
6+
plan 161;
67

78
# L<S32::Str/Str/"identical to" "C library sprintf">
89

@@ -285,4 +286,10 @@ is Date.new(-13_000_000_000, 1, 1), '-13000000000-01-01
285286
'Invalid formats do not spill internal details';
286287
}
287288

289+
{ # https://irclog.perlgeek.de/perl6/2016-11-28#i_13640361
290+
is_run print sprintf 'pass', {
291+
:out<pass>, :err(''), :0status
292+
}, 'sprintf($format) does not issue spurious warnings';
293+
}
294+
288295
# vim: ft=perl6

0 commit comments

Comments
 (0)