text: /*
   * Copyright (c) 2004-2010 The Trustees of Indiana University.
   *                         All rights reserved.
   * Copyright (c) 2004-2005 The Trustees of the University of Tennessee.
   *                         All rights reserved.
   * Copyright (c) 2004-2005 High Performance Computing Center Stuttgart, 
   *                         University of Stuttgart.  All rights reserved.
   * Copyright (c) 2004-2005 The Regents of the University of California.
   *                         All rights reserved.
   * $COPYRIGHT$
   * 
   * Additional copyrights may follow
   * 
   * $HEADER$
   */
  
  #include "orte_config.h"
  #include "orte/constants.h"
  
  #include "opal/mca/mca.h"
  #include "opal/mca/base/base.h"
  
  #include "opal/mca/base/mca_base_param.h"
  #include "orte/mca/sstore/sstore.h"
  #include "orte/mca/sstore/base/base.h"
  
  #include "orte/mca/snapc/snapc.h"
  #include "orte/mca/snapc/base/base.h"
  
  int orte_snapc_base_close(void)
  {
  
      /*
       * Close on the SStore framework
       */
      orte_sstore_base_close();
  
      /* Close the selected component */
      if( NULL != orte_snapc.snapc_finalize ) {
          orte_snapc.snapc_finalize();
      }
  
      /* Close all available modules that are open */
      mca_base_components_close(orte_snapc_base_output,
                                &orte_snapc_base_components_available,
                                NULL);
      
      return ORTE_SUCCESS;
  }
  