Macro PL_warnhook_ptr 

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

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