Function alloc_ok

pub fn alloc_ok<'a, A, Err>(
    cr: &'a mut OCamlRuntime,
    value: OCamlRef<'_, A>,
) -> OCaml<'a, Result<A, Err>>