From af419de789419c9e4520d33654a91564094b407a Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Fri, 27 Jun 2003 08:15:11 +0000 Subject: 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 --- perlvars.h | 3 +++ 1 file changed, 3 insertions(+) (limited to 'perlvars.h') 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 */ + -- cgit v1.2.1