pub unsafe extern "C" fn LOGICAL(x: SEXP) -> *mut c_int