diff options
author | Karl Williamson <khw@cpan.org> | 2018-08-03 13:27:47 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2018-08-05 05:52:48 -0600 |
commit | 54725a529f3dae0c9d1e9484e165cd51c91c72dc (patch) | |
tree | faf642e2bcea826a8435e0ea6c0a130eef1550c5 /perl.h | |
parent | 3337f21af2adb68370e3987aabd1fb1bce0d786f (diff) | |
download | perl-54725a529f3dae0c9d1e9484e165cd51c91c72dc.tar.gz |
perl.h: Use TAINT_get, instead of PL_tainting.
The former is designed to be compilable out.
Diffstat (limited to 'perl.h')
-rw-r--r-- | perl.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1079,7 +1079,7 @@ EXTERN_C int usleep(unsigned int); # define saferealloc Perl_realloc # define safefree Perl_mfree # define CHECK_MALLOC_TOO_LATE_FOR_(code) STMT_START { \ - if (!PL_tainting && MallocCfg_ptr[MallocCfg_cfg_env_read]) \ + if (!TAINTING_get && MallocCfg_ptr[MallocCfg_cfg_env_read]) \ code; \ } STMT_END # define CHECK_MALLOC_TOO_LATE_FOR(ch) \ |