Change 33306 by [EMAIL PROTECTED] on 2008/02/14 10:09:33
Fix linker error introduced by #33305
Affected files ...
... //depot/perl/op.c#986 edit
Differences ...
==== //depot/perl/op.c#986 (text) ====
Index: perl/op.c
--- perl/op.c#985~33305~ 2008-02-14 00:25:29.000000000 -0800
+++ perl/op.c 2008-02-14 02:09:33.000000000 -0800
@@ -1075,7 +1075,7 @@
no_bareword_allowed(o);
else {
if (ckWARN(WARN_VOID)) {
- SV* msv = newSVpvf("a constant (%"SVf")", sv);
+ SV* msv = Perl_newSVpvf(aTHX_ "a constant (%"SVf")", sv);
useless = SvPV_nolen(msv);
if (o->op_private & OPpCONST_ARYBASE)
useless = NULL;
End of Patch.