gv = Nullgv;
gvp = 0;
if (dowarn && hgv)
- warn("Subroutine %s::%s hidden by keyword; use ampersand",
- HvNAME(GvESTASH(hgv)), GvENAME(hgv));
+ warn("Ambiguous call resolved as CORE::%s(), "
+ "qualify as such or use &", GvENAME(hgv));
}
}
myop.op_next = Nullop;
myop.op_flags = OPf_WANT_SCALAR | OPf_STACKED;
- PUSHSTACKi(SI_OVERLOAD);
+ PUSHSTACKi(PERLSI_OVERLOAD);
ENTER;
SAVEOP();
op = (OP *) &myop;