X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=thrdvar.h;h=2b64b7e087f0b44c4c5402522aebd85d468cbf1d;hb=0a30450eff33ad0d9a30d3e5e9e92dce35ee33b7;hp=06bcb5b4e7d658445415a19e90e5570cf417ad67;hpb=7d5ea4e771e13c538d9f0504cb48d13891fcb5c9;p=p5sagit%2Fp5-mst-13.2.git diff --git a/thrdvar.h b/thrdvar.h index 06bcb5b..2b64b7e 100644 --- a/thrdvar.h +++ b/thrdvar.h @@ -101,6 +101,7 @@ PERLVAR(Tmainstack, AV *) /* the stack when nothing funny is happening */ PERLVAR(Ttop_env, JMPENV *) /* ptr. to current sigjmp() environment */ PERLVAR(Tstart_env, JMPENV) /* empty startup sigjmp() environment */ PERLVARI(Tprotect, protect_proc_t, MEMBER_TO_FPTR(Perl_default_protect)) +PERLVARI(Terrors, SV *, Nullsv) /* outstanding queued errors */ /* statics "owned" by various functions */ PERLVAR(Tav_fetch_sv, SV *) /* owned by av_fetch() */