diff options
| author | Robin Barker <RMBarker@cpan.org> | 2003-05-16 18:16:57 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-05-16 15:55:10 +0000 |
| commit | 04fa0c702a9221c225ba8695a20b08d7da04409f (patch) | |
| tree | 56f8bd9522534e05fd8140beb22648b0d4854abd /embed.pl | |
| parent | ea0e37e48a6e7942e23df67a0ae153e0f80bcbb3 (diff) | |
| download | perl-04fa0c702a9221c225ba8695a20b08d7da04409f.tar.gz | |
RE: maint snapshot @ 19525
Message-ID: <533D273D4014D411AB1D00062938C4D90404651D@hotel.npl.co.uk>
(Part #1: the __format__ and __printf__)
p4raw-id: //depot/perl@19527
Diffstat (limited to 'embed.pl')
| -rwxr-xr-x | embed.pl | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -203,7 +203,8 @@ sub write_protos { my $prefix = $flags =~ /n/ ? '' : 'pTHX_'; my $args = scalar @args; $ret .= "\n#ifdef CHECK_FORMAT\n"; - $ret .= sprintf " __attribute__((format(__printf__,%s%d,%s%d)))", + $ret .= + sprintf " __attribute__((__format__(__printf__,%s%d,%s%d)))", $prefix, $args - 1, $prefix, $args; $ret .= "\n#endif\n"; } |