Macro PL_perl_destruct_level 

macro_rules! PL_perl_destruct_level {
    ($my_perl:expr) => { ... };
}

PL_perl_destruct_level — PERLVARI(I, perl_destruct_level, signed char)

Initial value: 0.