pub unsafe fn cx_pushwhen(my_perl: *mut PerlInterpreter, a: *mut PERL_CONTEXT)
cx_pushwhen [THX] - macro function