Merge pull request open-mpi#643 from hppritcha/topic/remove_cr_calls

ft_removal: remove cr calls in 'c' interfaces

Author: hppritcha

ompi/mpi/c/abort.c

@@ -43,8 +43,6 @@ int MPI_Abort(MPI_Comm comm, int errorcode)
         memchecker_comm(comm);
     );
 
-    OPAL_CR_ABORT_LIBRARY();
-
     /* Don't even bother checking comm and errorcode values for
        errors */
 

ompi/mpi/c/accumulate.c

@@ -126,8 +126,6 @@ int MPI_Accumulate(const void *origin_addr, int origin_count, MPI_Datatype origi
         return MPI_SUCCESS;
     }
 
-    OPAL_CR_ENTER_LIBRARY();
-
     rc = ompi_win->w_osc_module->osc_accumulate(origin_addr,
                                                 origin_count,
                                                 origin_datatype,

ompi/mpi/c/add_error_class.c

@@ -42,8 +42,6 @@ int MPI_Add_error_class(int *errorclass)
     int err_class;
     int rc;
 
-    OPAL_CR_NOOP_PROGRESS();
-
     if ( MPI_PARAM_CHECK ) {
         OMPI_ERR_INIT_FINALIZE(FUNC_NAME);
 

ompi/mpi/c/add_error_code.c

@@ -42,8 +42,6 @@ int MPI_Add_error_code(int errorclass, int *errorcode)
     int code;
     int rc;
 
-    OPAL_CR_NOOP_PROGRESS();
-
     if ( MPI_PARAM_CHECK ) {
         OMPI_ERR_INIT_FINALIZE(FUNC_NAME);
 

ompi/mpi/c/add_error_string.c

@@ -41,8 +41,6 @@ int MPI_Add_error_string(int errorcode, const char *string)
 {
     int rc;
 
-    OPAL_CR_NOOP_PROGRESS();
-
     if ( MPI_PARAM_CHECK ) {
         OMPI_ERR_INIT_FINALIZE(FUNC_NAME);
 

ompi/mpi/c/address.c

@@ -38,8 +38,6 @@ static const char FUNC_NAME[] = "MPI_Address";
 int MPI_Address(void *location, MPI_Aint *address)
 {
 
-    OPAL_CR_NOOP_PROGRESS();
-
     if( MPI_PARAM_CHECK ) {
       OMPI_ERR_INIT_FINALIZE(FUNC_NAME);
       if (NULL == location || NULL == address) {

ompi/mpi/c/allgather.c

@@ -115,8 +115,6 @@ int MPI_Allgather(const void *sendbuf, int sendcount, MPI_Datatype sendtype,
 	}
     }
 
-    OPAL_CR_ENTER_LIBRARY();
-
     /* Invoke the coll component to perform the back-end operation */
 
     err = comm->c_coll.coll_allgather(sendbuf, sendcount, sendtype,

ompi/mpi/c/allgatherv.c

@@ -137,8 +137,6 @@ int MPI_Allgatherv(const void *sendbuf, int sendcount, MPI_Datatype sendtype,
        something */
 
 
-    OPAL_CR_ENTER_LIBRARY();
-
     /* Invoke the coll component to perform the back-end operation */
     err = comm->c_coll.coll_allgatherv(sendbuf, sendcount, sendtype,
                                        recvbuf, (int *) recvcounts,

ompi/mpi/c/alloc_mem.c

@@ -66,10 +66,7 @@ int MPI_Alloc_mem(MPI_Aint size, MPI_Info info, void *baseptr)
         return MPI_SUCCESS;
     }
 
-    OPAL_CR_ENTER_LIBRARY();
-
     *((void **) baseptr) = mca_mpool_base_alloc((size_t) size, (struct opal_info_t*)info);
-    OPAL_CR_EXIT_LIBRARY();
     if (NULL == *((void **) baseptr)) {
         return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_NO_MEM,
                                       FUNC_NAME);

ompi/mpi/c/allreduce.c

@@ -102,8 +102,6 @@ int MPI_Allreduce(const void *sendbuf, void *recvbuf, int count,
         return MPI_SUCCESS;
     }
 
-    OPAL_CR_ENTER_LIBRARY();
-
     /* Invoke the coll component to perform the back-end operation */
 
     OBJ_RETAIN(op);