/* -*- Mode: C; c-basic-offset:4 ; -*- */
/*
 *  (C) 2014 by Argonne National Laboratory.
 *      See COPYRIGHT in top-level directory.
 *
 * This file is automatically generated by buildiface
 * DO NOT EDIT
 */

#include "cdesc.h"

int MPIR_Win_detach_cdesc(MPI_Win x0, CFI_cdesc_t* x1)
{
    int err = MPI_SUCCESS;
    void *buf1 = x1->base_addr;

    if (buf1 == &MPIR_F08_MPI_BOTTOM) {
        buf1 = MPI_BOTTOM;
    }

    err = MPI_Win_detach(x0, buf1);

    return err;
}
