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-2006 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) 2007 Cisco Systems, Inc. All rights reserved.
13 * Copyright (c) 2010 Los Alamos National Security, LLC.
14 * All rights reserved.
15 * $COPYRIGHT$
16 *
17 * Additional copyrights may follow
18 *
19 * $HEADER$
20 */
21
22 #include "opal_config.h"
23
24 #include "opal/constants.h"
25 #include "opal/mca/mca.h"
26 #include "opal/mca/base/base.h"
27 #include "opal/mca/shmem/shmem.h"
28 #include "opal/mca/shmem/base/base.h"
29 #include "opal/util/output.h"
30
31 /* ////////////////////////////////////////////////////////////////////////// */
32 int
33 opal_shmem_base_close(void)
34 {
35 /* if there is a selected shmem module, finalize it */
36 if (NULL != opal_shmem_base_module &&
37 NULL != opal_shmem_base_module->module_finalize) {
38 opal_shmem_base_module->module_finalize();
39 }
40
41 opal_shmem_base_selected = false;
42 opal_shmem_base_component = NULL;
43 opal_shmem_base_module = NULL;
44
45 return mca_base_framework_components_close (&opal_shmem_base_framework,
46 NULL);
47 }
48