summaryrefslogtreecommitdiff
path: root/XSUB.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2006-10-18 19:11:55 +0000
committerNicholas Clark <nick@ccl4.org>2006-10-18 19:11:55 +0000
commit00e0e810c1b6ec448029dccbfb10081759cf8705 (patch)
tree0131eca81ee65ad5c912770b24fbcf9dcd826c5e /XSUB.h
parent8c28b960db3547273cd8c89c0eaafc8e99cf70c1 (diff)
downloadperl-00e0e810c1b6ec448029dccbfb10081759cf8705.tar.gz
Using explicit printf-like APIs with a format of "%s" isn't the world's
most efficient idea. p4raw-id: //depot/perl@29042
Diffstat (limited to 'XSUB.h')
-rw-r--r--XSUB.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/XSUB.h b/XSUB.h
index e4cc8167ed..1bf88d5f6a 100644
--- a/XSUB.h
+++ b/XSUB.h
@@ -295,7 +295,7 @@ Rethrows a previously caught exception. See L<perlguts/"Exception Handling">.
vn = "VERSION"), FALSE); \
} \
if (_sv) { \
- SV *xssv = Perl_newSVpvf(aTHX_ "%s",XS_VERSION); \
+ SV *xssv = Perl_newSVpv(aTHX_ XS_VERSION, 0); \
xssv = new_version(xssv); \
if ( !sv_derived_from(_sv, "version") ) \
_sv = new_version(_sv); \