This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 19d6c38) | patch
Avoid passing non-literal to format function
authorAaron Crane <arc@cpan.org>
Thu, 14 Apr 2016 10:23:12 +0000 (11:23 +0100)
committerMatthew Horsfall <wolfsage@gmail.com>
Tue, 19 Apr 2016 20:23:58 +0000 (16:23 -0400)
commit5068f264e5db925e43c1b4fab9c9c9a44f9a1926
tree25ff821f44f17839e484b7901179b19026b3cb23tree | snapshot
parent19d6c3854e96d89bf4dc2d874df433beac27ee8bcommit | diff
Avoid passing non-literal to format function

This avoids the following error, reported by Jitka Plesníková
<jplesnik@redhat.com> in a test of RC1:

op.c: In function 'Perl_ck_ftst':
op.c:9754:58: error: format not a string literal and no format arguments [-Werror=format-security]
                 Perl_warner(aTHX_ packWARN(WARN_SYNTAX), array_passed_to_stat);

In addition, the string in question is now made const.
op.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.