1 /* -*- Mode: C; c-basic-offset:4 ; indent-tabs-mode:nil ; -*- */
2 /*
3 *
4 * Copyright (C) 1997 University of Chicago.
5 * See COPYRIGHT notice in top-level directory.
6 */
7
8 #include "adio.h"
9
10 #ifdef HAVE_UNISTD_H
11 #include <unistd.h>
12 #endif
13
14 void ADIOI_GEN_Delete(const char *filename, int *error_code)
15 {
16 int err;
17 static char myname[] = "ADIOI_GEN_DELETE";
18
19 err = unlink(filename);
20 if (err == -1) {
21 *error_code = ADIOI_Err_create_code(myname, filename, errno);
22 }
23 else *error_code = MPI_SUCCESS;
24 }