pub unsafe extern "C" fn PL_foreign_context_predicate(
    arg1: *mut __PL_foreign_context
) -> *mut __PL_procedure