Macro PL_srand_override 

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

PL_srand_override — PERLVARI(I, srand_override, U32)

Initial value: 0.