Perl_croak() is a variable argument C function, hence can't have a macro to
permit the use of croak() with/without a context pointer. croak *is* defined
as a macro, substituting croak_nocontext. But we have a context to hand, so we
can use Perl_croak() directly.
gp = GvGP(gv);
if (!gp) {
const GV *const gv = CvGV(cv);
- croak(aTHX_ "NULL gp in B::GV::%s", gv ? GvNAME(gv) : "???");
+ Perl_croak(aTHX_ "NULL gp in B::GV::%s", gv ? GvNAME(gv) : "???");
}
ptr = (ix & 0xFFFF) + (char *)gp;
switch ((U8)(ix >> 16)) {