mod_perl is special, and assigns meaning to a perl_destruct_level of
Nicholas Clark [Mon, 3 Dec 2007 15:54:54 +0000 (15:54 +0000)]
-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

intrpvar.h

index 8874e65..7799812 100644 (file)
@@ -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)