root/ompi/mca/sharedfp/base/sharedfp_base_file_unselect.c

DEFINITIONS

1. mca_sharedfp_base_file_unselect

   1 /*
   2  * Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
   3  *                         University Research and Technology
   4  *                         Corporation.  All rights reserved.
   5  * Copyright (c) 2004-2005 The University of Tennessee and The University
   6  *                         of Tennessee Research Foundation.  All rights
   7  *                         reserved.
   8  * Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
   9  *                         University of Stuttgart.  All rights reserved.
  10  * Copyright (c) 2004-2005 The Regents of the University of California.
  11  *                         All rights reserved.
  12  * Copyright (c) 2008-2016 University of Houston. All rights reserved.
  13  * Copyright (c) 2018      Research Organization for Information Science
  14  *                         and Technology (RIST). All rights reserved.
  15  * $COPYRIGHT$
  16  *
  17  * Additional copyrights may follow
  18  *
  19  * $HEADER$
  20  */
  21 
  22 #include "ompi_config.h"
  23 
  24 #include <stdio.h>
  25 #include <string.h>
  26 #include <stdlib.h>
  27 
  28 #include "mpi.h"
  29 #include "opal/util/show_help.h"
  30 #include "ompi/mca/mca.h"
  31 #include "opal/mca/base/base.h"
  32 #include "ompi/mca/sharedfp/sharedfp.h"
  33 #include "ompi/mca/sharedfp/base/base.h"
  34 
  35 #include "ompi/mca/common/ompio/common_ompio.h"
  36 
  37 int mca_sharedfp_base_file_unselect(ompio_file_t *file)
  38 {
  39     if (NULL != file->f_sharedfp && NULL != file->f_sharedfp->sharedfp_module_finalize) {
  40         return file->f_sharedfp->sharedfp_module_finalize(file);
  41     }
  42 
  43     return OMPI_SUCCESS;
  44 }