Function Perl_newWHILEOP 

pub unsafe fn Perl_newWHILEOP(
    my_perl: *mut PerlInterpreter,
    flags: I32,
    debuggable: I32,
    loop_: *mut LOOP,
    expr: *mut OP,
    block: *mut OP,
    cont: *mut OP,
    has_my: I32,
) -> *mut OP

thx shim for crate::Perl_newWHILEOP.