|
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