summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorPaul "LeoNerd" Evans <leonerd@leonerd.org.uk>2022-07-09 12:22:48 +0100
committerPaul Evans <leonerd@leonerd.org.uk>2022-07-26 11:32:40 +0100
commitec11e33811b7a90a27013992efdb3c6ca76787fd (patch)
treea1a89c4b92281a054498f108df6778b160f26295 /op.c
parent0721b9ab151951a37f60b77264f7ad6341fe2b70 (diff)
downloadperl-ec11e33811b7a90a27013992efdb3c6ca76787fd.tar.gz
Rename CVf_METHOD to CVf_NOWARN_AMBIGUOUS
Also renames the CvMETHOD* macro family to CvNOWARN_AMBIGUOUS*
Diffstat (limited to 'op.c')
-rw-r--r--op.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/op.c b/op.c
index 3d8e4f96c5..947e9bef8d 100644
--- a/op.c
+++ b/op.c
@@ -9916,7 +9916,7 @@ Perl_newMYSUB(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs, OP *block)
CvCONST_on(cv);
CvISXSUB_on(cv);
PoisonPADLIST(cv);
- CvFLAGS(cv) |= CvMETHOD(compcv);
+ CvFLAGS(cv) |= CvNOWARN_AMBIGUOUS(compcv);
op_free(block);
SvREFCNT_dec(compcv);
PL_compcv = NULL;
@@ -10454,10 +10454,10 @@ Perl_newATTRSUB_x(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs,
CvCONST_on(cv);
CvISXSUB_on(cv);
PoisonPADLIST(cv);
- CvFLAGS(cv) |= CvMETHOD(PL_compcv);
+ CvFLAGS(cv) |= CvNOWARN_AMBIGUOUS(PL_compcv);
}
else {
- if (isGV(gv) || CvMETHOD(PL_compcv)) {
+ if (isGV(gv) || CvNOWARN_AMBIGUOUS(PL_compcv)) {
if (name && isGV(gv))
GvCV_set(gv, NULL);
cv = newCONSTSUB_flags(
@@ -10466,7 +10466,7 @@ Perl_newATTRSUB_x(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs,
);
assert(cv);
assert(SvREFCNT((SV*)cv) != 0);
- CvFLAGS(cv) |= CvMETHOD(PL_compcv);
+ CvFLAGS(cv) |= CvNOWARN_AMBIGUOUS(PL_compcv);
}
else {
if (!SvROK(gv)) {