1 /*
2 * Copyright (C) by Argonne National Laboratory
3 * See COPYRIGHT in top-level directory
4 *
5 * This file is automatically generated by buildiface
6 * DO NOT EDIT
7 */
8
9 #include "cdesc.h"
10
MPIR_Fetch_and_op_cdesc(CFI_cdesc_t * x0,CFI_cdesc_t * x1,MPI_Datatype x2,int x3,MPI_Aint x4,MPI_Op x5,MPI_Win x6)11 int MPIR_Fetch_and_op_cdesc(CFI_cdesc_t* x0, CFI_cdesc_t* x1, MPI_Datatype x2, int x3, MPI_Aint x4, MPI_Op x5, MPI_Win x6)
12 {
13 int err = MPI_SUCCESS;
14 void *buf0 = x0->base_addr;
15 void *buf1 = x1->base_addr;
16
17 if (buf0 == &MPIR_F08_MPI_BOTTOM) {
18 buf0 = MPI_BOTTOM;
19 }
20
21 if (buf1 == &MPIR_F08_MPI_BOTTOM) {
22 buf1 = MPI_BOTTOM;
23 }
24
25 err = MPI_Fetch_and_op(buf0, buf1, x2, x3, x4, x5, x6);
26
27 return err;
28 }
29