1
1

Merge pull request #1030 from kawashima-fj/pr/fortran-weak-symbol-fix

fortran/mpif-h: Insert missing weak symbols & Fix incorrect symbol names.
Этот коммит содержится в:
Jeff Squyres 2015-10-15 06:36:08 -04:00
родитель aceb1ebb47 66a8bc9e45
Коммит 888b5b5db1
5 изменённых файлов: 30 добавлений и 4 удалений

Просмотреть файл

@ -13,6 +13,7 @@
* Copyright (c) 2012 Oracle and/or its affiliates. All rights reserved.
* Copyright (c) 2015 Research Organization for Information Science
* and Technology (RIST). All rights reserved.
* Copyright (c) 2015 FUJITSU LIMITED. All rights reserved.
* $COPYRIGHT$
*
* Additional copyrights may follow
@ -33,6 +34,9 @@
#pragma weak pmpi_improbe = ompi_improbe_f
#pragma weak pmpi_improbe_ = ompi_improbe_f
#pragma weak pmpi_improbe__ = ompi_improbe_f
#pragma weak PMPI_Improbe_f = ompi_improbe_f
#pragma weak PMPI_Improbe_f08 = ompi_improbe_f
#else
OMPI_GENERATE_F77_BINDINGS (PMPI_IMPROBE,
pmpi_improbe,
@ -50,6 +54,9 @@ OMPI_GENERATE_F77_BINDINGS (PMPI_IMPROBE,
#pragma weak mpi_improbe = ompi_improbe_f
#pragma weak mpi_improbe_ = ompi_improbe_f
#pragma weak mpi_improbe__ = ompi_improbe_f
#pragma weak MPI_Improbe_f = ompi_improbe_f
#pragma weak MPI_Improbe_f08 = ompi_improbe_f
#else
#if ! OMPI_BUILD_MPI_PROFILING
OMPI_GENERATE_F77_BINDINGS (MPI_IMPROBE,

Просмотреть файл

@ -12,6 +12,7 @@
* Copyright (c) 2012 Cisco Systems, Inc. All rights reserved.
* Copyright (c) 2015 Research Organization for Information Science
* and Technology (RIST). All rights reserved.
* Copyright (c) 2015 FUJITSU LIMITED. All rights reserved.
* $COPYRIGHT$
*
* Additional copyrights may follow
@ -30,6 +31,9 @@
#pragma weak pmpi_imrecv = ompi_imrecv_f
#pragma weak pmpi_imrecv_ = ompi_imrecv_f
#pragma weak pmpi_imrecv__ = ompi_imrecv_f
#pragma weak PMPI_Imrecv_f = ompi_imrecv_f
#pragma weak PMPI_Imrecv_f08 = ompi_imrecv_f
#else
OMPI_GENERATE_F77_BINDINGS (PMPI_IMRECV,
pmpi_imrecv,
@ -47,6 +51,9 @@ OMPI_GENERATE_F77_BINDINGS (PMPI_IMRECV,
#pragma weak mpi_imrecv = ompi_imrecv_f
#pragma weak mpi_imrecv_ = ompi_imrecv_f
#pragma weak mpi_imrecv__ = ompi_imrecv_f
#pragma weak MPI_Imrecv_f = ompi_imrecv_f
#pragma weak MPI_Imrecv_f08 = ompi_imrecv_f
#else
#if ! OMPI_BUILD_MPI_PROFILING
OMPI_GENERATE_F77_BINDINGS (MPI_IMRECV,

Просмотреть файл

@ -14,6 +14,7 @@
* Copyright (c) 2012 Oracle and/or its affiliates. All rights reserved.
* Copyright (c) 2015 Research Organization for Information Science
* and Technology (RIST). All rights reserved.
* Copyright (c) 2015 FUJITSU LIMITED. All rights reserved.
* $COPYRIGHT$
*
* Additional copyrights may follow
@ -54,6 +55,9 @@ OMPI_GENERATE_F77_BINDINGS (PMPI_MPROBE,
#pragma weak mpi_mprobe = ompi_mprobe_f
#pragma weak mpi_mprobe_ = ompi_mprobe_f
#pragma weak mpi_mprobe__ = ompi_mprobe_f
#pragma weak MPI_Mprobe_f = ompi_mprobe_f
#pragma weak MPI_Mprobe_f08 = ompi_mprobe_f
#else
#if ! OMPI_BUILD_MPI_PROFILING
OMPI_GENERATE_F77_BINDINGS (MPI_MPROBE,

Просмотреть файл

@ -13,6 +13,7 @@
* Copyright (c) 2012 Oracle and/or its affiliates. All rights reserved.
* Copyright (c) 2015 Research Organization for Information Science
* and Technology (RIST). All rights reserved.
* Copyright (c) 2015 FUJITSU LIMITED. All rights reserved.
* $COPYRIGHT$
*
* Additional copyrights may follow
@ -33,6 +34,9 @@
#pragma weak pmpi_mrecv = ompi_mrecv_f
#pragma weak pmpi_mrecv_ = ompi_mrecv_f
#pragma weak pmpi_mrecv__ = ompi_mrecv_f
#pragma weak PMPI_Mrecv_f = ompi_mrecv_f
#pragma weak PMPI_Mrecv_f08 = ompi_mrecv_f
#else
OMPI_GENERATE_F77_BINDINGS (PMPI_MRECV,
pmpi_mrecv,
@ -50,6 +54,9 @@ OMPI_GENERATE_F77_BINDINGS (PMPI_MRECV,
#pragma weak mpi_mrecv = ompi_mrecv_f
#pragma weak mpi_mrecv_ = ompi_mrecv_f
#pragma weak mpi_mrecv__ = ompi_mrecv_f
#pragma weak MPI_Mrecv_f = ompi_mrecv_f
#pragma weak MPI_Mrecv_f08 = ompi_mrecv_f
#else
#if ! OMPI_BUILD_MPI_PROFILING
OMPI_GENERATE_F77_BINDINGS (MPI_MRECV,

Просмотреть файл

@ -15,6 +15,7 @@
* reserved.
* Copyright (c) 2015 Research Organization for Information Science
* and Technology (RIST). All rights reserved.
* Copyright (c) 2015 FUJITSU LIMITED. All rights reserved.
* $COPYRIGHT$
*
* Additional copyrights may follow
@ -35,8 +36,8 @@
#pragma weak pmpi_rget_accumulate_ = ompi_rget_accumulate_f
#pragma weak pmpi_rget_accumulate__ = ompi_rget_accumulate_f
#pragma weak PMPI_Get_accumulate_f = ompi_rget_accumulate_f
#pragma weak PMPI_Get_accumulate_f08 = ompi_rget_accumulate_f
#pragma weak PMPI_Rget_accumulate_f = ompi_rget_accumulate_f
#pragma weak PMPI_Rget_accumulate_f08 = ompi_rget_accumulate_f
#else
OMPI_GENERATE_F77_BINDINGS (PMPI_RGET_ACCUMULATE,
pmpi_rget_accumulate,
@ -54,8 +55,8 @@ OMPI_GENERATE_F77_BINDINGS (PMPI_RGET_ACCUMULATE,
#pragma weak mpi_rget_accumulate_ = ompi_rget_accumulate_f
#pragma weak mpi_rget_accumulate__ = ompi_rget_accumulate_f
#pragma weak MPI_Get_accumulate_f = ompi_rget_accumulate_f
#pragma weak MPI_Get_accumulate_f08 = ompi_rget_accumulate_f
#pragma weak MPI_Rget_accumulate_f = ompi_rget_accumulate_f
#pragma weak MPI_Rget_accumulate_f08 = ompi_rget_accumulate_f
#else
#if ! OMPI_BUILD_MPI_PROFILING
OMPI_GENERATE_F77_BINDINGS (MPI_RGET_ACCUMULATE,