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 /proto.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 'proto.h')
-rw-r--r-- | proto.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -26,7 +26,7 @@ PERL_CALLCONV int perl_destruct(PerlInterpreter* interp); PERL_CALLCONV void perl_free(PerlInterpreter* interp); PERL_CALLCONV int perl_run(PerlInterpreter* interp); PERL_CALLCONV int perl_parse(PerlInterpreter* interp, XSINIT_t xsinit, int argc, char** argv, char** env); -PERL_CALLCONV int Perl_doing_taint(int argc, char** argv, char** env); +PERL_CALLCONV bool Perl_doing_taint(int argc, char** argv, char** env); #if defined(USE_ITHREADS) PERL_CALLCONV PerlInterpreter* perl_clone(PerlInterpreter* interp, UV flags); # if defined(PERL_IMPLICIT_SYS) |