diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-01-18 14:27:36 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-01-18 14:27:36 +0000 |
| commit | ec2019add1c7fdb16a67372a1ed14c16660c3cea (patch) | |
| tree | d096bdaeb51d5d88c069fc6aec42b8789e8ff127 /perl.h | |
| parent | 81c61bd5995819c1cff6a438f28f35ffeb9642eb (diff) | |
| download | perl-ec2019add1c7fdb16a67372a1ed14c16660c3cea.tar.gz | |
Eliminate all PERL_UNUSED_ARG()s in S_validate_suid() by changing its
prototype depending on the compile time options. In turn, this finds
things that are unused in its callers.
p4raw-id: //depot/perl@33000
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 18 |
1 files changed, 18 insertions, 0 deletions
@@ -41,6 +41,24 @@ # endif #endif +/* This logic needs to come after reading config.h, but before including + proto.h */ +#ifdef IAMSUID +# ifndef DOSUID +# define DOSUID +# endif +#endif + +#ifdef SETUID_SCRIPTS_ARE_SECURE_NOW +# ifdef DOSUID +# undef DOSUID +# endif +# ifdef IAMSUID +# undef IAMSUID +# define SETUID_SCRIPTS_ARE_SECURE_NOW_AND_IAMSUID +# endif +#endif + /* See L<perlguts/"The Perl API"> for detailed notes on * PERL_IMPLICIT_CONTEXT and PERL_IMPLICIT_SYS */ |