Macro PL_tainted_ptr 

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

*mut accessor for PL_tainted (read form: PL_tainted!).