Macro PL_diehook 

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

PL_diehook — PERLVAR(I, diehook, SV*)