diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-09-20 03:06:10 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-09-20 03:06:10 +0000 |
| commit | 5a844595b9262407e093364ec4d29a22962723f0 (patch) | |
| tree | 26cc1f15a25dbb3a9f2a698c89b85b9c7c37fd0e /thrdvar.h | |
| parent | 371b7e1ad2e46c79c7794d9b0f41b49157e7653c (diff) | |
| download | perl-5a844595b9262407e093364ec4d29a22962723f0.tar.gz | |
queue errors due to strictures rather than printing them as
warnings; symbols that violate strictures do *not* end up in
the symbol table anyway, making multiple evals of the same piece
of code produce the same errors; errors indicate all locations
of a global symbol rather than just the first one; these
changes make compile-time failures within evals reliably
visible via the return value or contents of $@, and trappable
using __DIE__ hooks
p4raw-id: //depot/perl@4197
Diffstat (limited to 'thrdvar.h')
| -rw-r--r-- | thrdvar.h | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -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() */ |