Lines Matching defs:errsv

1884         SV * errsv = NULL;
1888             errsv = ERRSV;
1892             abort_execution(errsv, name);
1896             if (errsv) {
1898                     SVfARG(errsv), name);
1911  *     2: delete $INC{$name}; croak "$errsv: Compilation failed in require"
1915 S_pop_eval_context_maybe_croak(pTHX_ PERL_CONTEXT *cx, SV *errsv, int action)
1939             errsv = namesv;
1944             if (!errsv)
1945                 errsv = newSVpvs_flags("Unknown error\n", SVs_TEMP);
1948         Perl_croak(aTHX_ fmt, SVfARG(errsv));
4134         SV *errsv;
4167         errsv = ERRSV;
4168         if (!*(SvPV_nolen_const(errsv)))
4169             sv_setpvs(errsv, "Compilation error");
4216             SV *errsv = ERRSV;
4217             if (!*(SvPV_nolen_const(errsv))) {
4221                 sv_setpvs(errsv, "Unit check error");
4908                         SV *errsv= ERRSV;
4909                         if (SvTRUE(errsv) && !SvROK(errsv)) {
4911                             char *pv= SvPV(errsv,l);
4926                                 sv_catpvf(errsv, "%s %s hook died--halting @INC search",
4929                             croak_sv(errsv);
6831                 SV * const errsv = ERRSV;
6832                 if (SvTRUE_NN(errsv))
6833                     err = newSVsv(errsv);