pub unsafe extern "C" fn IS_SCALAR(x: SEXP, type_: c_int) -> c_int