Function PerlIO_error 

pub unsafe fn PerlIO_error(
    my_perl: *mut interpreter,
    a: *mut *mut _PerlIO,
) -> i32

PerlIO_error [THX] - macro function