diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-06-27 08:15:11 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-06-27 08:15:11 +0000 |
| commit | af419de789419c9e4520d33654a91564094b407a (patch) | |
| tree | c62f4e0ce756cd82c32c69553c5d894d058aad07 /perlvars.h | |
| parent | a06433151b0f1a3a12ccc4d2629feb511ea9fce6 (diff) | |
| download | perl-af419de789419c9e4520d33654a91564094b407a.tar.gz | |
Introduce (global) variable PL_earlytaint which
is set very early in main(), before perl_parse()
has been called and PL_tainting (or PL_taint_warn)
might have been set.
p4raw-id: //depot/perl@19863
Diffstat (limited to 'perlvars.h')
| -rw-r--r-- | perlvars.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perlvars.h b/perlvars.h index 7d71787064..27f76ebb8d 100644 --- a/perlvars.h +++ b/perlvars.h @@ -54,3 +54,6 @@ PERLVAR(Gdollarzero_mutex, perl_mutex) /* Modifying $0 */ /* This is constant on most architectures, a global on OS/2 */ PERLVARI(Gsh_path, char *, SH_PATH)/* full path of shell */ + +PERLVAR(Gearlytaint, bool) /* Early warning for taint, before PL_tainting is set */ + |