|
389 | 389 | # define THIS_FUNCTION_WAS_REMOVED_IN_MPI30(func, newfunc) |
390 | 390 | #endif |
391 | 391 |
|
| 392 | +#if MPI_VERSION >= 4 |
| 393 | +# define __mpi_interface_deprecated_in_mpi40__(msg) __mpi_interface_deprecated__(msg) |
| 394 | +#else |
| 395 | +# define __mpi_interface_deprecated_in_mpi40__(msg) |
| 396 | +#endif |
| 397 | + |
392 | 398 | #if !defined(OMPI_REMOVED_USE_STATIC_ASSERT) |
393 | 399 | # define OMPI_REMOVED_USE_STATIC_ASSERT 0 |
394 | 400 | #endif |
@@ -1742,18 +1748,10 @@ OMPI_DECLSPEC int MPI_Info_delete(MPI_Info info, const char *key); |
1742 | 1748 | OMPI_DECLSPEC int MPI_Info_dup(MPI_Info info, MPI_Info *newinfo); |
1743 | 1749 | OMPI_DECLSPEC MPI_Info MPI_Info_f2c(MPI_Fint info); |
1744 | 1750 | OMPI_DECLSPEC int MPI_Info_free(MPI_Info *info); |
1745 | | -#if MPI_VERSION < 4 |
1746 | | -OMPI_DECLSPEC int MPI_Info_get(MPI_Info info, const char *key, int valuelen, |
1747 | | - char *value, int *flag); |
1748 | | -#endif |
1749 | 1751 | OMPI_DECLSPEC int MPI_Info_get_nkeys(MPI_Info info, int *nkeys); |
1750 | 1752 | OMPI_DECLSPEC int MPI_Info_get_nthkey(MPI_Info info, int n, char *key); |
1751 | 1753 | OMPI_DECLSPEC int MPI_Info_get_string(MPI_Info info, const char *key, int *buflen, |
1752 | 1754 | char *value, int *flag); |
1753 | | -#if MPI_VERSION < 4 |
1754 | | -OMPI_DECLSPEC int MPI_Info_get_valuelen(MPI_Info info, const char *key, int *valuelen, |
1755 | | - int *flag); |
1756 | | -#endif |
1757 | 1755 | OMPI_DECLSPEC int MPI_Info_set(MPI_Info info, const char *key, const char *value); |
1758 | 1756 | OMPI_DECLSPEC int MPI_Init(int *argc, char ***argv); |
1759 | 1757 | OMPI_DECLSPEC int MPI_Initialized(int *flag); |
@@ -2510,18 +2508,10 @@ OMPI_DECLSPEC int PMPI_Info_delete(MPI_Info info, const char *key); |
2510 | 2508 | OMPI_DECLSPEC int PMPI_Info_dup(MPI_Info info, MPI_Info *newinfo); |
2511 | 2509 | OMPI_DECLSPEC MPI_Info PMPI_Info_f2c(MPI_Fint info); |
2512 | 2510 | OMPI_DECLSPEC int PMPI_Info_free(MPI_Info *info); |
2513 | | -#if MPI_VERSION < 4 |
2514 | | -OMPI_DECLSPEC int PMPI_Info_get(MPI_Info info, const char *key, int valuelen, |
2515 | | - char *value, int *flag); |
2516 | | -#endif |
2517 | 2511 | OMPI_DECLSPEC int PMPI_Info_get_nkeys(MPI_Info info, int *nkeys); |
2518 | 2512 | OMPI_DECLSPEC int PMPI_Info_get_nthkey(MPI_Info info, int n, char *key); |
2519 | 2513 | OMPI_DECLSPEC int PMPI_Info_get_string(MPI_Info info, const char *key, int *buflen, |
2520 | 2514 | char *value, int *flag); |
2521 | | -#if MPI_VERSION < 4 |
2522 | | -OMPI_DECLSPEC int PMPI_Info_get_valuelen(MPI_Info info, const char *key, int *valuelen, |
2523 | | - int *flag); |
2524 | | -#endif |
2525 | 2515 | OMPI_DECLSPEC int PMPI_Info_set(MPI_Info info, const char *key, const char *value); |
2526 | 2516 | OMPI_DECLSPEC int PMPI_Init(int *argc, char ***argv); |
2527 | 2517 | OMPI_DECLSPEC int PMPI_Initialized(int *flag); |
@@ -3022,20 +3012,19 @@ OMPI_DECLSPEC int MPI_Attr_put(MPI_Comm comm, int keyval, void *attribute_val) |
3022 | 3012 | __mpi_interface_deprecated__("MPI_Attr_put was deprecated in MPI-2.0; use MPI_Comm_set_attr instead"); |
3023 | 3013 | OMPI_DECLSPEC int PMPI_Attr_put(MPI_Comm comm, int keyval, void *attribute_val) |
3024 | 3014 | __mpi_interface_deprecated__("PMPI_Attr_put was deprecated in MPI-2.0; use PMPI_Comm_set_attr instead"); |
3025 | | -#if MPI_VERSION >= 4 |
| 3015 | + |
3026 | 3016 | OMPI_DECLSPEC int MPI_Info_get(MPI_Info info, const char *key, int valuelen, |
3027 | 3017 | char *value, int *flag) |
3028 | | - __mpi_interface_deprecated__("MPI_Info_get was deprecated in MPI-4.0; use MPI_Info_get_string instead"); |
| 3018 | + __mpi_interface_deprecated_in_mpi40__("MPI_Info_get was deprecated in MPI-4.0; use MPI_Info_get_string instead"); |
3029 | 3019 | OMPI_DECLSPEC int PMPI_Info_get(MPI_Info info, const char *key, int valuelen, |
3030 | 3020 | char *value, int *flag) |
3031 | | - __mpi_interface_deprecated__("PMPI_Info_get was deprecated in MPI-4.0; use PMPI_Info_get_string instead"); |
| 3021 | + __mpi_interface_deprecated_in_mpi40__("PMPI_Info_get was deprecated in MPI-4.0; use PMPI_Info_get_string instead"); |
3032 | 3022 | OMPI_DECLSPEC int MPI_Info_get_valuelen(MPI_Info info, const char *key, int *valuelen, |
3033 | 3023 | int *flag) |
3034 | | - __mpi_interface_deprecated__("MPI_Info_get_valuelen was deprecated in MPI-4.0; use MPI_Info_get_string instead"); |
| 3024 | + __mpi_interface_deprecated_in_mpi40__("MPI_Info_get_valuelen was deprecated in MPI-4.0; use MPI_Info_get_string instead"); |
3035 | 3025 | OMPI_DECLSPEC int PMPI_Info_get_valuelen(MPI_Info info, const char *key, int *valuelen, |
3036 | 3026 | int *flag) |
3037 | | - __mpi_interface_deprecated__("PMPI_Info_get_valuelen was deprecated in MPI-4.0; use PMPI_Info_get_string instead"); |
3038 | | -#endif |
| 3027 | + __mpi_interface_deprecated_in_mpi40__("PMPI_Info_get_valuelen was deprecated in MPI-4.0; use PMPI_Info_get_string instead"); |
3039 | 3028 |
|
3040 | 3029 | /* |
3041 | 3030 | * Even though MPI_Copy_function and MPI_Delete_function are |
|
0 commit comments