source: CONFIG_DEVT/IPSLCM6.5_work_ENSEMBLES/oasis3-mct/lib/mct/mpi-serial/error.c

#include "mpiP.h"

/*
 * Error handling code
 * Just a stub for now to support the MPI interface without actually
 * doing anything
 */

 int MPI_Errhandler_set(MPI_Comm comm, MPI_Errhandler handle)
 {
   return(MPI_SUCCESS);
 }