Change 24724 by [EMAIL PROTECTED] on 2005/06/07 12:07:49
XS_VERSION_BOOTCHECK is read only.
Affected files ...
... //depot/perl/XSUB.h#94 edit
Differences ...
==== //depot/perl/XSUB.h#94 (text) ====
Index: perl/XSUB.h
--- perl/XSUB.h#93~24508~ Fri May 20 00:53:46 2005
+++ perl/XSUB.h Tue Jun 7 05:07:49 2005
@@ -261,7 +261,7 @@
# define XS_VERSION_BOOTCHECK \
STMT_START { \
SV *_sv; STRLEN n_a; \
- const char *vn = Nullch, *module = SvPV(ST(0),n_a); \
+ const char *vn = Nullch, *module = SvPV_const(ST(0),n_a); \
if (items >= 2) /* version supplied as bootstrap arg */ \
_sv = ST(1); \
else { \
End of Patch.