diff options
author | Nicholas Clark <nick@ccl4.org> | 2007-12-03 15:54:54 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2007-12-03 15:54:54 +0000 |
commit | 801627e84ab3093b6f512c99a013e9b9b71eddbf (patch) | |
tree | 88f6751d329c985664b0f2e834fc760ee2a7f505 /intrpvar.h | |
parent | 718752a55bfc9a714bf1c9f3bbe915270e43bd9f (diff) | |
download | perl-801627e84ab3093b6f512c99a013e9b9b71eddbf.tar.gz |
mod_perl is special, and assigns meaning to a perl_destruct_level of
-1. Really this should be I8, but it turns out that Configure's choice
of type for I8 is buggy - it always uses char, which is unsigned on
some platforms.
p4raw-id: //depot/perl@32561
Diffstat (limited to 'intrpvar.h')
-rw-r--r-- | intrpvar.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/intrpvar.h b/intrpvar.h index 8874e65310..77998122a6 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -194,7 +194,8 @@ PERLVAR(Itainted, bool) /* using variables controlled by $< */ /* This value may be set when embedding for full cleanup */ /* 0=none, 1=full, 2=full with checks */ -PERLVARI(Iperl_destruct_level, U8, 0) +/* mod_perl is special, and also assigns a meaning -1 */ +PERLVARI(Iperl_destruct_level, signed char, 0) PERLVAR(Iperldb, U32) |