Arf. Anju and I misunderstood each other yesterday -- the OMPI_EXPORT

thingy needs to go on the *declaration*, not the *definition*. Well, at least this was all done en masse and via an automated mechanism, so total time wasted was only about 15 minutes... This commit was SVN r2858.
2004-09-24 18:33:36 +00:00 · 2004-09-24 18:33:36 +00:00 · c3c63b57c4
--- a/src/mca/coll/basic/coll_basic_component.c
+++ b/src/mca/coll/basic/coll_basic_component.c
@ -27,7 +27,6 @@ const char *mca_coll_basic_component_version_string =
 * and pointers to our public functions in it
 */

-OMPI_EXPORT
 const mca_coll_base_component_1_0_0_t mca_coll_basic_component = {

  /* First, the mca_component_t struct containing meta information
--- a/src/mca/coll/sm/coll_sm_component.c
+++ b/src/mca/coll/sm/coll_sm_component.c
@ -27,7 +27,6 @@ const char *mca_coll_sm_component_version_string =
 * and pointers to our public functions in it
 */

-OMPI_EXPORT
 const mca_coll_base_component_1_0_0_t mca_coll_sm_component = {

  /* First, the mca_component_t struct containing meta information
--- a/src/mca/gpr/proxy/gpr_proxy_component.c
+++ b/src/mca/gpr/proxy/gpr_proxy_component.c
@ -29,7 +29,6 @@
 /*
 * Struct of function pointers that need to be initialized
 */
-OMPI_EXPORT
 mca_gpr_base_component_t mca_gpr_proxy_component = {
    {
 	MCA_GPR_BASE_VERSION_1_0_0,
--- a/src/mca/gpr/replica/gpr_replica_component.c
+++ b/src/mca/gpr/replica/gpr_replica_component.c
@ -34,7 +34,6 @@
 /*
 * Struct of function pointers that need to be initialized
 */
-OMPI_EXPORT
 mca_gpr_base_component_t mca_gpr_replica_component = {
    {
 	MCA_GPR_BASE_VERSION_1_0_0,
--- a/src/mca/io/romio/src/io_romio_component.c
+++ b/src/mca/io/romio/src/io_romio_component.c
@ -26,7 +26,6 @@ static int delete_select(char *filename, struct ompi_info_t *info,
                         struct mca_io_base_delete_t *private_data);


-OMPI_EXPORT
 mca_io_base_component_1_0_0_t mca_io_romio_component = {
    /* First, the mca_base_component_t struct containing meta information
       about the component itself */
--- a/src/mca/llm/hostfile/src/llm_hostfile_component.c
+++ b/src/mca/llm/hostfile/src/llm_hostfile_component.c
@ -17,7 +17,6 @@
 * Instantiate the public struct with all of our public information
 * and pointers to our public functions in it
 */
-OMPI_EXPORT
 const mca_llm_base_component_1_0_0_t mca_llm_hostfile_component = {

  /* First, the mca_module_t struct containing meta information
--- a/src/mca/mpool/sm/mpool_sm_component.c
+++ b/src/mca/mpool/sm/mpool_sm_component.c
@ -18,7 +18,6 @@ static int mca_mpool_sm_open(void);
 static mca_mpool_base_module_t* mca_mpool_sm_init(bool *allow_multi_user_threads);


-OMPI_EXPORT
 mca_mpool_sm_component_t mca_mpool_sm_component = {
    {
      /* First, the mca_base_component_t struct containing meta
--- a/src/mca/ns/proxy/src/ns_proxy_component.c
+++ b/src/mca/ns/proxy/src/ns_proxy_component.c
@ -29,7 +29,6 @@
 /*
 * Struct of function pointers that need to be initialized
 */
-OMPI_EXPORT
 mca_ns_base_component_t mca_ns_proxy_component = {
  {
    MCA_NS_BASE_VERSION_1_0_0,
--- a/src/mca/ns/replica/src/ns_replica_component.c
+++ b/src/mca/ns/replica/src/ns_replica_component.c
@ -31,7 +31,6 @@
 /*
 * Struct of function pointers that need to be initialized
 */
-OMPI_EXPORT
 mca_ns_base_component_t mca_ns_replica_component = {
  {
    MCA_NS_BASE_VERSION_1_0_0,
--- a/src/mca/oob/cofs/src/oob_cofs_component.c
+++ b/src/mca/oob/cofs/src/oob_cofs_component.c
@ -23,7 +23,6 @@
 /*
 * Struct of function pointers and all that to let us be initialized
 */
-OMPI_EXPORT
 mca_oob_base_component_1_0_0_t mca_oob_cofs_component = {
  {
    MCA_OOB_BASE_VERSION_1_0_0,
--- a/src/mca/pcm/bproc/src/pcm_bproc_component.c
+++ b/src/mca/pcm/bproc/src/pcm_bproc_component.c
@ -24,7 +24,6 @@
 /*
 * Struct of function pointers and all that to let us be initialized
 */
-OMPI_EXPORT
 mca_pcm_base_component_1_0_0_t mca_pcm_bproc_component = {
  {
    MCA_PCM_BASE_VERSION_1_0_0,
--- a/src/mca/pcm/ompid/pcm_ompid_component.c
+++ b/src/mca/pcm/ompid/pcm_ompid_component.c
@ -23,7 +23,6 @@
 /*
 * Struct of function pointers and all that to let us be initialized
 */
-OMPI_EXPORT
 mca_pcm_base_component_1_0_0_t mca_pcm_ompid_component = {
  {
    MCA_PCM_BASE_VERSION_1_0_0,
--- a/src/mca/pcm/rms/src/pcm_rms_component.c
+++ b/src/mca/pcm/rms/src/pcm_rms_component.c
@ -31,7 +31,6 @@ extern char **environ;
 /*
 * Struct of function pointers and all that to let us be initialized
 */
-OMPI_EXPORT
 mca_pcm_base_component_1_0_0_t mca_pcm_rms_component = {
  {
    MCA_PCM_BASE_VERSION_1_0_0,
--- a/src/mca/pcm/rsh/pcm_rsh_component.c
+++ b/src/mca/pcm/rsh/pcm_rsh_component.c
@ -27,7 +27,6 @@
 /*
 * Struct of function pointers and all that to let us be initialized
 */
-OMPI_EXPORT
 mca_pcm_base_component_1_0_0_t mca_pcm_rsh_component = {
  {
    MCA_PCM_BASE_VERSION_1_0_0,
--- a/src/mca/pcm/wmi/src/pcm_wmi_component.c
+++ b/src/mca/pcm/wmi/src/pcm_wmi_component.c
@ -24,7 +24,6 @@
 /*
 * Struct of function pointers and all that to let us be initialized
 */
-OMPI_EXPORT
 mca_pcm_base_component_1_0_0_t mca_pcm_wmi_component = {
  {
    MCA_PCM_BASE_VERSION_1_0_0,
--- a/src/mca/pcmclient/env/pcmclient_env_component.c
+++ b/src/mca/pcmclient/env/pcmclient_env_component.c
@ -22,7 +22,6 @@
 /*
 * Struct of function pointers and all that to let us be initialized
 */
-OMPI_EXPORT
 mca_pcmclient_base_component_1_0_0_t mca_pcmclient_env_component = {
  {
    MCA_PCMCLIENT_BASE_VERSION_1_0_0,
--- a/src/mca/pcmclient/rms/pcmclient_rms_component.c
+++ b/src/mca/pcmclient/rms/pcmclient_rms_component.c
@ -22,7 +22,6 @@
 /*
 * Struct of function pointers and all that to let us be initialized
 */
-OMPI_EXPORT
 mca_pcmclient_base_component_1_0_0_t mca_pcmclient_rms_component = {
  {
    MCA_PCMCLIENT_BASE_VERSION_1_0_0,
--- a/src/mca/pcmclient/seed/pcmclient_seed_component.c
+++ b/src/mca/pcmclient/seed/pcmclient_seed_component.c
@ -22,7 +22,6 @@
 /*
 * Struct of function pointers and all that to let us be initialized
 */
-OMPI_EXPORT
 mca_pcmclient_base_component_1_0_0_t mca_pcmclient_seed_component = {
  {
    MCA_PCMCLIENT_BASE_VERSION_1_0_0,
--- a/src/mca/pcmclient/singleton/pcmclient_singleton_component.c
+++ b/src/mca/pcmclient/singleton/pcmclient_singleton_component.c
@ -22,7 +22,6 @@
 /*
 * Struct of function pointers and all that to let us be initialized
 */
-OMPI_EXPORT
 mca_pcmclient_base_component_1_0_0_t mca_pcmclient_singleton_component = {
  {
    MCA_PCMCLIENT_BASE_VERSION_1_0_0,
--- a/src/mca/pml/teg/src/pml_teg_component.c
+++ b/src/mca/pml/teg/src/pml_teg_component.c
@ -16,7 +16,6 @@
 #include "pml_teg_proc.h"


-OMPI_EXPORT
 mca_pml_base_component_1_0_0_t mca_pml_teg_component = {

    /* First, the mca_base_component_t struct containing meta
--- a/src/mca/ptl/elan/src/ptl_elan_component.c
+++ b/src/mca/ptl/elan/src/ptl_elan_component.c
@ -28,7 +28,6 @@

 extern ompi_proc_t *ompi_proc_local_proc;

-OMPI_EXPORT
 mca_ptl_elan_component_t mca_ptl_elan_component = {
    {
        /* Base module information about itself */
--- a/src/mca/ptl/gm/src/ptl_gm_component.c
+++ b/src/mca/ptl/gm/src/ptl_gm_component.c
@ -26,7 +26,6 @@
 #include "ptl_gm_req.h"
 #include "ptl_gm_priv.h"

-OMPI_EXPORT
 mca_ptl_gm_component_t mca_ptl_gm_component = {
    {
        /* First, the mca_base_component_t struct containing meta information
--- a/src/mca/ptl/ib/src/ptl_ib_component.c
+++ b/src/mca/ptl/ib/src/ptl_ib_component.c
@ -19,7 +19,6 @@
 #include "ptl_ib_priv.h"


-OMPI_EXPORT
 mca_ptl_ib_component_t mca_ptl_ib_component = {
    {
        /* First, the mca_base_component_t struct containing meta information
--- a/src/mca/ptl/prof/ptl_prof_component.c
+++ b/src/mca/ptl/prof/ptl_prof_component.c
@ -31,7 +31,6 @@ static struct mca_ptl_base_module_t** ptl_prof_component_init_fn(
       bool *allow_multi_user_threads, bool *have_hidden_threads );
 static int ptl_prof_component_control_fn( int param, void* value, size_t size );

-OMPI_EXPORT
 mca_ptl_prof_module_1_0_0_t mca_ptl_prof_component = {
    {
        /* First, the mca_base_module_t struct containing meta information
--- a/src/mca/ptl/self/ptl_self_component.c
+++ b/src/mca/ptl/self/ptl_self_component.c
@ -24,7 +24,6 @@
 #include "mca/base/mca_base_module_exchange.h"
 #include "ptl_self.h"

-OMPI_EXPORT
 mca_ptl_self_component_t mca_ptl_self_component = {
    {
        /* First, the mca_base_component_t struct containing meta information
--- a/src/mca/ptl/sm/src/ptl_sm_component.c
+++ b/src/mca/ptl/sm/src/ptl_sm_component.c
@ -41,7 +41,6 @@ static int mca_ptl_sm_component_exchange(void);
 * Shared Memory (SM) component instance. 
 */

-OMPI_EXPORT
 mca_ptl_sm_component_t mca_ptl_sm_component = {
    {  /* super is being filled in */
        /* First, the mca_base_component_t struct containing meta information
--- a/src/mca/ptl/tcp/src/ptl_tcp_component.c
+++ b/src/mca/ptl/tcp/src/ptl_tcp_component.c
@ -29,7 +29,6 @@
 #include "ptl_tcp_sendreq.h"


-OMPI_EXPORT
 mca_ptl_tcp_component_t mca_ptl_tcp_component = {
    {
      /* First, the mca_base_module_t struct containing meta
--- a/src/mca/svc/exec/svc_exec_component.c
+++ b/src/mca/svc/exec/svc_exec_component.c
@ -1,7 +1,6 @@
 #include "svc_exec.h"


-OMPI_EXPORT
 mca_svc_exec_component_t mca_svc_exec_component = {
    {
      /* First, the mca_base_module_t struct containing meta
--- a/src/mca/svc/sched/svc_sched_component.c
+++ b/src/mca/svc/sched/svc_sched_component.c
@ -2,7 +2,6 @@
 #include "util/proc_info.h"


-OMPI_EXPORT
 mca_svc_sched_component_t mca_svc_sched_component = {
    {
      /* First, the mca_base_module_t struct containing meta
--- a/src/mca/svc/stdio/svc_stdio_component.c
+++ b/src/mca/svc/stdio/svc_stdio_component.c
@ -1,7 +1,6 @@
 #include "svc_stdio.h"


-OMPI_EXPORT
 mca_svc_base_component_t mca_svc_stdio_component = {
      /* First, the mca_base_module_t struct containing meta
         information about the module itself */
--- a/src/mca/topo/unity/src/topo_unity_component.c
+++ b/src/mca/topo/unity/src/topo_unity_component.c
@ -29,7 +29,6 @@ const char *mca_topo_unity_component_version_string =
 * and finalize() are called during creation/destruction of a comm
 * *******************************************************************
 */
-OMPI_EXPORT
 const mca_topo_base_component_1_0_0_t mca_topo_unity_component = 
 {
    {
--- a/src/mpi/c/abort.c
+++ b/src/mpi/c/abort.c
@ -27,7 +27,6 @@
 static const char FUNC_NAME[] = "MPI_Abort";


-OMPI_EXPORT
 int MPI_Abort(MPI_Comm comm, int errorcode) 
 {
    mca_ns_base_jobid_t jobid;
--- a/src/mpi/c/accumulate.c
+++ b/src/mpi/c/accumulate.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Accumlate";


-OMPI_EXPORT
 int MPI_Accumulate(void *origin_addr, int origin_count, MPI_Datatype origin_datatype,
                   int target_rank, MPI_Aint target_disp, int target_count,
                   MPI_Datatype target_datatype, MPI_Op op, MPI_Win win) 
--- a/src/mpi/c/add_error_class.c
+++ b/src/mpi/c/add_error_class.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Add_error_class";


-OMPI_EXPORT
 int MPI_Add_error_class(int *errorclass) 
 {
    int class;
--- a/src/mpi/c/add_error_code.c
+++ b/src/mpi/c/add_error_code.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Add_error_code";


-OMPI_EXPORT
 int MPI_Add_error_code(int errorclass, int *errorcode)
 {
    int code;
--- a/src/mpi/c/add_error_string.c
+++ b/src/mpi/c/add_error_string.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Add_error_code";


-OMPI_EXPORT
 int MPI_Add_error_string(int errorcode, char *string)
 {
    int rc;
--- a/src/mpi/c/address.c
+++ b/src/mpi/c/address.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Address";


-OMPI_EXPORT
 int MPI_Address(void *location, MPI_Aint *address)
 {
    if( MPI_PARAM_CHECK ) {
--- a/src/mpi/c/allgather.c
+++ b/src/mpi/c/allgather.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Allgather";


-OMPI_EXPORT
 int MPI_Allgather(void *sendbuf, int sendcount, MPI_Datatype sendtype, 
 		  void *recvbuf, int recvcount, MPI_Datatype recvtype,
 		  MPI_Comm comm) 
--- a/src/mpi/c/allgatherv.c
+++ b/src/mpi/c/allgatherv.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Allgatherv";


-OMPI_EXPORT
 int MPI_Allgatherv(void *sendbuf, int sendcount, MPI_Datatype sendtype,
                   void *recvbuf, int *recvcounts,
                   int *displs, MPI_Datatype recvtype, MPI_Comm comm) 
--- a/src/mpi/c/alloc_mem.c
+++ b/src/mpi/c/alloc_mem.c
@ -23,7 +23,6 @@
 static const char FUNC_NAME[] = "MPI_Alloc_mem";


-OMPI_EXPORT
 int MPI_Alloc_mem(MPI_Aint size, MPI_Info info, void *baseptr)
 {
  if (MPI_PARAM_CHECK) {
--- a/src/mpi/c/allreduce.c
+++ b/src/mpi/c/allreduce.c
@ -22,7 +22,6 @@
 static const char FUNC_NAME[] = "MPI_Allreduce";


-OMPI_EXPORT
 int MPI_Allreduce(void *sendbuf, void *recvbuf, int count,
                  MPI_Datatype datatype, MPI_Op op, MPI_Comm comm) 
 {
--- a/src/mpi/c/alltoall.c
+++ b/src/mpi/c/alltoall.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Alltoall";


-OMPI_EXPORT
 int MPI_Alltoall(void *sendbuf, int sendcount, MPI_Datatype sendtype,
 		 void *recvbuf, int recvcount, MPI_Datatype recvtype, 
                 MPI_Comm comm) 
--- a/src/mpi/c/alltoallv.c
+++ b/src/mpi/c/alltoallv.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Alltoallv";


-OMPI_EXPORT
 int MPI_Alltoallv(void *sendbuf, int *sendcounts, int *sdispls,
                  MPI_Datatype sendtype, 
                  void *recvbuf, int *recvcounts, int *rdispls, 
--- a/src/mpi/c/alltoallw.c
+++ b/src/mpi/c/alltoallw.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Alltoallw";


-OMPI_EXPORT
 int MPI_Alltoallw(void *sendbuf, int *sendcounts, int *sdispls, 
                  MPI_Datatype *sendtypes,
                  void *recvbuf, int *recvcounts, int *rdispls, 
--- a/src/mpi/c/attr_delete.c
+++ b/src/mpi/c/attr_delete.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Attr_delete";


-OMPI_EXPORT
 int MPI_Attr_delete(MPI_Comm comm, int keyval)
 {
    int ret;
--- a/src/mpi/c/attr_fn.c
+++ b/src/mpi/c/attr_fn.c
@ -34,7 +34,6 @@
 *   MPI_WIN_DUP_FN -> OMPI_C_MPI_WIN_DUP_FN
 */

-OMPI_EXPORT
 int OMPI_C_MPI_TYPE_NULL_DELETE_FN( MPI_Datatype datatype, int type_keyval,
                                    void* attribute_val_out,
                                    void* flag )
@ -43,7 +42,6 @@ int OMPI_C_MPI_TYPE_NULL_DELETE_FN( MPI_Datatype datatype, int type_keyval,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_TYPE_NULL_COPY_FN( MPI_Datatype datatype, int type_keyval, 
                                  void* extra_state,
                                  void* attribute_val_in, 
@ -54,7 +52,6 @@ int OMPI_C_MPI_TYPE_NULL_COPY_FN( MPI_Datatype datatype, int type_keyval,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_TYPE_DUP_FN( MPI_Datatype datatype, int type_keyval, 
                            void* extra_state,
                            void* attribute_val_in, void* attribute_val_out,
@ -65,7 +62,6 @@ int OMPI_C_MPI_TYPE_DUP_FN( MPI_Datatype datatype, int type_keyval,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_WIN_NULL_DELETE_FN( MPI_Win window, int win_keyval,
                                   void* attribute_val_out,
                                   void* flag )
@ -73,7 +69,6 @@ int OMPI_C_MPI_WIN_NULL_DELETE_FN( MPI_Win window, int win_keyval,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_WIN_NULL_COPY_FN( MPI_Win window, int win_keyval, 
                                 void* extra_state,
                                 void* attribute_val_in,
@ -83,7 +78,6 @@ int OMPI_C_MPI_WIN_NULL_COPY_FN( MPI_Win window, int win_keyval,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_WIN_DUP_FN( MPI_Win window, int win_keyval, void* extra_state,
                           void* attribute_val_in, void* attribute_val_out,
                           int* flag )
@ -93,7 +87,6 @@ int OMPI_C_MPI_WIN_DUP_FN( MPI_Win window, int win_keyval, void* extra_state,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_COMM_NULL_DELETE_FN( MPI_Comm comm, int comm_keyval,
                                    void* attribute_val_out,
                                    void* flag )
@ -101,7 +94,6 @@ int OMPI_C_MPI_COMM_NULL_DELETE_FN( MPI_Comm comm, int comm_keyval,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_COMM_NULL_COPY_FN( MPI_Comm comm, int comm_keyval, 
                                  void* extra_state,
                                  void* attribute_val_in,
@ -111,7 +103,6 @@ int OMPI_C_MPI_COMM_NULL_COPY_FN( MPI_Comm comm, int comm_keyval,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_COMM_DUP_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
                     void* attribute_val_in, void* attribute_val_out,
                     int* flag )
@ -121,7 +112,6 @@ int OMPI_C_MPI_COMM_DUP_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_NULL_DELETE_FN( MPI_Comm comm, int comm_keyval,
                               void* attribute_val_out,
                               void* flag )
@ -129,7 +119,6 @@ int OMPI_C_MPI_NULL_DELETE_FN( MPI_Comm comm, int comm_keyval,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_NULL_COPY_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
                             void* attribute_val_in, void* attribute_val_out,
                             int* flag )
@ -138,7 +127,6 @@ int OMPI_C_MPI_NULL_COPY_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
   return MPI_SUCCESS;
 }

-OMPI_EXPORT
 int OMPI_C_MPI_DUP_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
                       void* attribute_val_in, void* attribute_val_out,
                       int* flag )
--- a/src/mpi/c/attr_get.c
+++ b/src/mpi/c/attr_get.c
@ -19,7 +19,6 @@

 static const char FUNC_NAME[] = "MPI_Attr_get";

-OMPI_EXPORT
 int MPI_Attr_get(MPI_Comm comm, int keyval, void *attribute_val, int *flag)
 {
    int ret;
--- a/src/mpi/c/attr_put.c
+++ b/src/mpi/c/attr_put.c
@ -19,7 +19,6 @@

 static const char FUNC_NAME[] = "MPI_Attr_put";

-OMPI_EXPORT
 int MPI_Attr_put(MPI_Comm comm, int keyval, void *attribute_val) 
 {
    int ret;
--- a/src/mpi/c/barrier.c
+++ b/src/mpi/c/barrier.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Barrier";


-OMPI_EXPORT
 int MPI_Barrier(MPI_Comm comm) 
 {
  int err = MPI_SUCCESS;
--- a/src/mpi/c/bcast.c
+++ b/src/mpi/c/bcast.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Bcast";


-OMPI_EXPORT
 int MPI_Bcast(void *buffer, int count, MPI_Datatype datatype,
              int root, MPI_Comm comm)
 {
--- a/src/mpi/c/bsend.c
+++ b/src/mpi/c/bsend.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Bsend";


-OMPI_EXPORT
 int MPI_Bsend(void *buf, int count, MPI_Datatype type, int dest, int tag, MPI_Comm comm) 
 {
    int rc, index;
--- a/src/mpi/c/bsend_init.c
+++ b/src/mpi/c/bsend_init.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Bsend_init";


-OMPI_EXPORT
 int MPI_Bsend_init(void *buf, int count, MPI_Datatype type,
                   int dest, int tag, MPI_Comm comm, MPI_Request *request) 
 {
--- a/src/mpi/c/buffer_attach.c
+++ b/src/mpi/c/buffer_attach.c
@ -23,7 +23,6 @@
 static const char FUNC_NAME[] = "MPI_Buffer_attach";


-OMPI_EXPORT
 int MPI_Buffer_attach(void *buffer, int size) 
 {
  if (MPI_PARAM_CHECK) {
--- a/src/mpi/c/buffer_detach.c
+++ b/src/mpi/c/buffer_detach.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Buffer_detach";


-OMPI_EXPORT
 int MPI_Buffer_detach(void *buffer, int *size) 
 {
  if (MPI_PARAM_CHECK) {
--- a/src/mpi/c/cancel.c
+++ b/src/mpi/c/cancel.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Cancel";


-OMPI_EXPORT
 int MPI_Cancel(MPI_Request *request) 
 {
    int rc;
--- a/src/mpi/c/cart_coords.c
+++ b/src/mpi/c/cart_coords.c
@ -22,7 +22,6 @@
 static const char FUNC_NAME[] = "MPI_Cart_coords";


-OMPI_EXPORT
 int MPI_Cart_coords(MPI_Comm comm, int rank, int maxdims, int *coords) 
 {
    int err;
--- a/src/mpi/c/cart_create.c
+++ b/src/mpi/c/cart_create.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Cart_create";


-OMPI_EXPORT
 int MPI_Cart_create(MPI_Comm old_comm, int ndims, int *dims,
                    int *periods, int reorder, MPI_Comm *comm_cart) {

--- a/src/mpi/c/cart_get.c
+++ b/src/mpi/c/cart_get.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Cart_get";


-OMPI_EXPORT
 int MPI_Cart_get(MPI_Comm comm, int maxdims, int *dims,
                 int *periods, int *coords) 
 {
--- a/src/mpi/c/cart_map.c
+++ b/src/mpi/c/cart_map.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Cart_map";


-OMPI_EXPORT
 int MPI_Cart_map(MPI_Comm comm, int ndims, int *dims,
                int *periods, int *newrank) 
 {
--- a/src/mpi/c/cart_rank.c
+++ b/src/mpi/c/cart_rank.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Cart_rank";


-OMPI_EXPORT
 int MPI_Cart_rank(MPI_Comm comm, int *coords, int *rank) 
 {
    int err;
--- a/src/mpi/c/cart_shift.c
+++ b/src/mpi/c/cart_shift.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Cart_shift";


-OMPI_EXPORT
 int MPI_Cart_shift(MPI_Comm comm, int direction, int disp,
                   int *rank_source, int *rank_dest) 
 {
--- a/src/mpi/c/cart_sub.c
+++ b/src/mpi/c/cart_sub.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Cart_sub";


-OMPI_EXPORT
 int MPI_Cart_sub(MPI_Comm comm, int *remain_dims, MPI_Comm *new_comm) 
 {
    int err;
--- a/src/mpi/c/cartdim_get.c
+++ b/src/mpi/c/cartdim_get.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Cartdim_get";


-OMPI_EXPORT
 int MPI_Cartdim_get(MPI_Comm comm, int *ndims) 
 {
    mca_topo_base_module_cartdim_get_fn_t func;
--- a/src/mpi/c/close_port.c
+++ b/src/mpi/c/close_port.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Close_port";


-OMPI_EXPORT
 int MPI_Close_port(char *port_name) 
 {
    if ( MPI_PARAM_CHECK ) {
--- a/src/mpi/c/comm_accept.c
+++ b/src/mpi/c/comm_accept.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_accept";


-OMPI_EXPORT
 int MPI_Comm_accept(char *port_name, MPI_Info info, int root,
                    MPI_Comm comm, MPI_Comm *newcomm) 
 {
--- a/src/mpi/c/comm_c2f.c
+++ b/src/mpi/c/comm_c2f.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_c2f";


-OMPI_EXPORT
 MPI_Fint MPI_Comm_c2f(MPI_Comm comm) 
 {
    ompi_communicator_t *cptr=(ompi_communicator_t *)comm;
--- a/src/mpi/c/comm_call_errhandler.c
+++ b/src/mpi/c/comm_call_errhandler.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_call_errhandler";


-OMPI_EXPORT
 int MPI_Comm_call_errhandler(MPI_Comm comm, int errorcode)
 {
  /* Error checking */
--- a/src/mpi/c/comm_compare.c
+++ b/src/mpi/c/comm_compare.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_compare";


-OMPI_EXPORT
 int MPI_Comm_compare(MPI_Comm comm1, MPI_Comm comm2, int *result) {

    /* local variables */
--- a/src/mpi/c/comm_connect.c
+++ b/src/mpi/c/comm_connect.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_connect";


-OMPI_EXPORT
 int MPI_Comm_connect(char *port_name, MPI_Info info, int root,
                     MPI_Comm comm, MPI_Comm *newcomm) 
 {
--- a/src/mpi/c/comm_create.c
+++ b/src/mpi/c/comm_create.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_create";


-OMPI_EXPORT
 int MPI_Comm_create(MPI_Comm comm, MPI_Group group, MPI_Comm *newcomm) {
    
    int rc;
--- a/src/mpi/c/comm_create_errhandler.c
+++ b/src/mpi/c/comm_create_errhandler.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_create_errhandler";


-OMPI_EXPORT
 int MPI_Comm_create_errhandler(MPI_Comm_errhandler_fn *function,
                               MPI_Errhandler *errhandler) 
 {
--- a/src/mpi/c/comm_create_keyval.c
+++ b/src/mpi/c/comm_create_keyval.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_create_keyval";


-OMPI_EXPORT
 int MPI_Comm_create_keyval(MPI_Comm_copy_attr_function *comm_copy_attr_fn,
                           MPI_Comm_delete_attr_function *comm_delete_attr_fn,
 			   int *comm_keyval, void *extra_state)
--- a/src/mpi/c/comm_delete_attr.c
+++ b/src/mpi/c/comm_delete_attr.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_delete_attr";


-OMPI_EXPORT
 int MPI_Comm_delete_attr(MPI_Comm comm, int comm_keyval) 
 {
    int ret;
--- a/src/mpi/c/comm_disconnect.c
+++ b/src/mpi/c/comm_disconnect.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_disconnect";


-OMPI_EXPORT
 int MPI_Comm_disconnect(MPI_Comm *comm) 
 {

--- a/src/mpi/c/comm_dup.c
+++ b/src/mpi/c/comm_dup.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_dup";


-OMPI_EXPORT
 int MPI_Comm_dup(MPI_Comm comm, MPI_Comm *newcomm) 
 {
    /* local variables */
--- a/src/mpi/c/comm_f2c.c
+++ b/src/mpi/c/comm_f2c.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_f2c";


-OMPI_EXPORT
 MPI_Comm MPI_Comm_f2c(MPI_Fint comm) 
 {
    size_t o_index= (size_t) comm;
--- a/src/mpi/c/comm_free.c
+++ b/src/mpi/c/comm_free.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_free";


-OMPI_EXPORT
 int MPI_Comm_free(MPI_Comm *comm) {
    
    if ( MPI_PARAM_CHECK ) {
--- a/src/mpi/c/comm_free_keyval.c
+++ b/src/mpi/c/comm_free_keyval.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_free_keyval";


-OMPI_EXPORT
 int MPI_Comm_free_keyval(int *comm_keyval) 
 {
    int ret;
--- a/src/mpi/c/comm_get_attr.c
+++ b/src/mpi/c/comm_get_attr.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_get_attr";


-OMPI_EXPORT
 int MPI_Comm_get_attr(MPI_Comm comm, int comm_keyval,
                      void *attribute_val, int *flag)
 {
--- a/src/mpi/c/comm_get_errhandler.c
+++ b/src/mpi/c/comm_get_errhandler.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_get_errhandler";


-OMPI_EXPORT
 int MPI_Comm_get_errhandler(MPI_Comm comm, MPI_Errhandler *errhandler)
 {
  /* Error checking */
--- a/src/mpi/c/comm_get_name.c
+++ b/src/mpi/c/comm_get_name.c
@ -24,7 +24,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_get_name";


-OMPI_EXPORT
 int MPI_Comm_get_name(MPI_Comm comm, char *name, int *length)  
 {

--- a/src/mpi/c/comm_get_parent.c
+++ b/src/mpi/c/comm_get_parent.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_get_parent";


-OMPI_EXPORT
 int MPI_Comm_get_parent(MPI_Comm *parent) 
 {

--- a/src/mpi/c/comm_group.c
+++ b/src/mpi/c/comm_group.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_group";


-OMPI_EXPORT
 int MPI_Comm_group(MPI_Comm comm, MPI_Group *group) {

    int rc;
--- a/src/mpi/c/comm_join.c
+++ b/src/mpi/c/comm_join.c
@ -28,7 +28,6 @@ static const char FUNC_NAME[] = "MPI_Comm_join";
 static int ompi_socket_send (int fd, char *buf, int len );
 static int ompi_socket_recv (int fd, char *buf, int len );

-OMPI_EXPORT
 int MPI_Comm_join(int fd, MPI_Comm *intercomm) 
 {
    int rc, tag=OMPI_COMM_JOIN_TAG;
--- a/src/mpi/c/comm_rank.c
+++ b/src/mpi/c/comm_rank.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_rank";


-OMPI_EXPORT
 int MPI_Comm_rank(MPI_Comm comm, int *rank) 
 {
    if ( MPI_PARAM_CHECK ) {
--- a/src/mpi/c/comm_remote_group.c
+++ b/src/mpi/c/comm_remote_group.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_remote_group";


-OMPI_EXPORT
 int MPI_Comm_remote_group(MPI_Comm comm, MPI_Group *group) 
 {

--- a/src/mpi/c/comm_remote_size.c
+++ b/src/mpi/c/comm_remote_size.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_remote_size";


-OMPI_EXPORT
 int MPI_Comm_remote_size(MPI_Comm comm, int *size) {

    if ( MPI_PARAM_CHECK ) {
--- a/src/mpi/c/comm_set_attr.c
+++ b/src/mpi/c/comm_set_attr.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_set_attr";


-OMPI_EXPORT
 int MPI_Comm_set_attr(MPI_Comm comm, int comm_keyval, void *attribute_val) 
 {
    int ret;
--- a/src/mpi/c/comm_set_errhandler.c
+++ b/src/mpi/c/comm_set_errhandler.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_set_errhandler";


-OMPI_EXPORT
 int MPI_Comm_set_errhandler(MPI_Comm comm, MPI_Errhandler errhandler) 
 {
  /* Error checking */
--- a/src/mpi/c/comm_set_name.c
+++ b/src/mpi/c/comm_set_name.c
@ -23,7 +23,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_set_name";


-OMPI_EXPORT
 int MPI_Comm_set_name(MPI_Comm comm, char *name) 
 {
    int rc;
--- a/src/mpi/c/comm_size.c
+++ b/src/mpi/c/comm_size.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_comm_size";


-OMPI_EXPORT
 int MPI_Comm_size(MPI_Comm comm, int *size) {

    if ( MPI_PARAM_CHECK ) {
--- a/src/mpi/c/comm_spawn.c
+++ b/src/mpi/c/comm_spawn.c
@ -21,7 +21,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_spawn";


-OMPI_EXPORT
 int MPI_Comm_spawn(char *command, char **argv, int maxprocs, MPI_Info info,
                    int root, MPI_Comm comm, MPI_Comm *intercomm,
                    int *array_of_errcodes) 
--- a/src/mpi/c/comm_spawn_multiple.c
+++ b/src/mpi/c/comm_spawn_multiple.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_spawn_multiple";


-OMPI_EXPORT
 int MPI_Comm_spawn_multiple(int count, char **array_of_commands, char ***array_of_argv,
                            int *array_of_maxprocs, MPI_Info *array_of_info,
                            int root, MPI_Comm comm, MPI_Comm *intercomm,
--- a/src/mpi/c/comm_split.c
+++ b/src/mpi/c/comm_split.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_split";


-OMPI_EXPORT
 int MPI_Comm_split(MPI_Comm comm, int color, int key, MPI_Comm *newcomm) {

    int rc;
--- a/src/mpi/c/comm_test_inter.c
+++ b/src/mpi/c/comm_test_inter.c
@ -19,7 +19,6 @@
 static const char FUNC_NAME[] = "MPI_Comm_test_inter";


-OMPI_EXPORT
 int MPI_Comm_test_inter(MPI_Comm comm, int *flag) {

    if ( MPI_PARAM_CHECK ) {
--- a/src/mpi/c/dims_create.c
+++ b/src/mpi/c/dims_create.c
@ -29,7 +29,6 @@ static int getprimes(int num, int *pnprime, int **pprimes);
 * This is a utility function, no need to have anything in the lower
 * layer for this at all
 */ 
-OMPI_EXPORT
 int MPI_Dims_create(int nnodes, int ndims, int *dims) 
 {
    int i;
--- a/src/mpi/c/errhandler_c2f.c
+++ b/src/mpi/c/errhandler_c2f.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Errhandler_c2f";


-OMPI_EXPORT
 MPI_Fint MPI_Errhandler_c2f(MPI_Errhandler errhandler)
 {
  /* Error checking */
--- a/src/mpi/c/errhandler_create.c
+++ b/src/mpi/c/errhandler_create.c
@ -16,7 +16,6 @@
 #endif


-OMPI_EXPORT
 int MPI_Errhandler_create(MPI_Handler_function *function,
                          MPI_Errhandler *errhandler)
 {
--- a/src/mpi/c/errhandler_f2c.c
+++ b/src/mpi/c/errhandler_f2c.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Errhandler_f2c";


-OMPI_EXPORT
 MPI_Errhandler MPI_Errhandler_f2c(MPI_Fint errhandler_f)
 {
    size_t eh_index = (size_t) errhandler_f;
--- a/src/mpi/c/errhandler_free.c
+++ b/src/mpi/c/errhandler_free.c
@ -20,7 +20,6 @@
 static const char FUNC_NAME[] = "MPI_Errhandler_free";


-OMPI_EXPORT
 int MPI_Errhandler_free(MPI_Errhandler *errhandler)
 {
  /* Error checking */
--- a/Показать больше
+++ b/Показать больше