(Retracted by #11872)

p4raw-id: //depot/perl@11870

diff --git a/intrpvar.h b/intrpvar.h
index fd39a09..21d3282 100644 (file)
--- a/intrpvar.h
+++ b/intrpvar.h
@@ -52,7 +52,7 @@ PERLVAR(Iperldb,      U32)
 
 /* This value may be set when embedding for full cleanup  */
 /* 0=none, 1=full, 2=full with checks */
-PERLVARI(Iperl_destruct_level, int,    0)
+PERLVARI(Iperl_destruct_level, VOL int,        0)
 
 /* magical thingies */
 PERLVAR(Ibasetime,     Time_t)         /* $^T */