summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorSteve Hay <SteveHay@planit.com>2006-01-18 14:23:09 +0000
committerSteve Hay <SteveHay@planit.com>2006-01-18 14:23:09 +0000
commit561b68a973f8a5d10c61d6a02c02f3002a0a63ba (patch)
tree84518a9894ce4759b487340358880b3081926f90 /op.c
parent2f397494d2e5c4344bda444a704ca9e81d71a61b (diff)
downloadperl-561b68a973f8a5d10c61d6a02c02f3002a0a63ba.tar.gz
Change all NEWSV() to newSV() in the core and non-dual-lived modules.
Keep NEWSV() itself for backwards-compatibility outside of the core, but don't advertise it any more. (cf. change #25101). p4raw-link: @25101 on //depot/perl: a02a5408b2f199007c4dcb74559cc79066307ada p4raw-id: //depot/perl@26901
Diffstat (limited to 'op.c')
-rw-r--r--op.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/op.c b/op.c
index 6ef7a50bc3..710d657d4e 100644
--- a/op.c
+++ b/op.c
@@ -4724,7 +4724,7 @@ Perl_newATTRSUB(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs, OP *block)
const char * const tname = (name ? name : aname);
if (PERLDB_SUBLINE && PL_curstash != PL_debstash) {
- SV * const sv = NEWSV(0,0);
+ SV * const sv = newSV(0);
SV * const tmpstr = sv_newmortal();
GV * const db_postponed = gv_fetchpv("DB::postponed", GV_ADDMULTI, SVt_PVHV);
HV *hv;
@@ -4908,7 +4908,7 @@ Perl_newXS(pTHX_ const char *name, XSUBADDR_t subaddr, const char *filename)
if (cv) /* must reuse cv if autoloaded */
cv_undef(cv);
else {
- cv = (CV*)NEWSV(1105,0);
+ cv = (CV*)newSV(0);
sv_upgrade((SV *)cv, SVt_PVCV);
if (name) {
GvCV(gv) = cv;