root/ompi/mpiext/cr/c/self_register_continue.c

DEFINITIONS

1. OMPI_CR_self_register_continue_callback

   1 /*
   2  * Copyright (c) 2004-2010 The Trustees of Indiana University and Indiana
   3  *                         University Research and Technology
   4  *                         Corporation.  All rights reserved.
   5  * Copyright (c) 2012 Cisco Systems, Inc.  All rights reserved.
   6  * $COPYRIGHT$
   7  *
   8  * Additional copyrights may follow
   9  *
  10  * $HEADER$
  11  */
  12 #include "ompi_config.h"
  13 #include <stdio.h>
  14 
  15 #include "ompi/mpi/c/bindings.h"
  16 #include "opal/runtime/opal_cr.h"
  17 #include "ompi/mpiext/cr/c/mpiext_cr_c.h"
  18 
  19 #include "ompi/runtime/params.h"
  20 #include "ompi/communicator/communicator.h"
  21 #include "ompi/errhandler/errhandler.h"
  22 #include "opal/mca/crs/crs.h"
  23 #include "opal/mca/crs/base/base.h"
  24 
  25 static const char FUNC_NAME[] = "OMPI_CR_self_register_continue_callback";
  26 
  27 int OMPI_CR_self_register_continue_callback(OMPI_CR_self_continue_fn function)
  28 {
  29     int rc;
  30 
  31     if ( MPI_PARAM_CHECK ) {
  32         OMPI_ERR_INIT_FINALIZE(FUNC_NAME);
  33     }
  34 
  35     OPAL_CR_ENTER_LIBRARY();
  36 
  37     rc = opal_crs_base_self_register_continue_callback(function);
  38 
  39     OMPI_ERRHANDLER_RETURN(rc, MPI_COMM_WORLD, rc, FUNC_NAME);
  40 }