Function PerlIO_error 

pub unsafe fn PerlIO_error(
    my_perl: *mut PerlInterpreter,
    a: *mut PerlIO,
) -> c_int

PerlIO_error [THX] - macro function