25
25
* Copyright (c) 2021-2022 Amazon.com, Inc. or its affiliates. All Rights
26
26
* reserved.
27
27
* Copyright (c) 2021 Bull S.A.S. All rights reserved.
28
- * Copyright (c) 2018-2022 Triad National Security, LLC. All rights
28
+ * Copyright (c) 2018-2025 Triad National Security, LLC. All rights
29
29
* reserved.
30
30
* Copyright (c) 2025 Advanced Micro Devices, Inc. All rights reserved
31
31
* Copyright (c) 2025 Jeffrey M. Squyres. All rights reserved.
385
385
386
386
#if MPI_VERSION >= 4
387
387
# define __mpi_interface_deprecated_in_mpi40__ (msg ) __mpi_interface_deprecated__(msg)
388
+ #if MPI_SUBVERSION == 1 || MPI_VERSION > 4
389
+ # define __mpi_interface_deprecated_in_mpi41__ (msg ) __mpi_interface_deprecated__(msg)
390
+ #endif
388
391
#else
389
392
# define __mpi_interface_deprecated_in_mpi40__ (msg )
393
+ # define __mpi_interface_deprecated_in_mpi41__ (msg )
390
394
#endif
391
395
396
+
397
+
392
398
#if !defined(OMPI_REMOVED_USE_STATIC_ASSERT )
393
399
# define OMPI_REMOVED_USE_STATIC_ASSERT 0
394
400
#endif
@@ -1883,7 +1889,6 @@ OMPI_DECLSPEC int MPI_Get_count(const MPI_Status *status, MPI_Datatype datatype
1883
1889
OMPI_DECLSPEC int MPI_Get_count_c (const MPI_Status * status , MPI_Datatype datatype , MPI_Count * count );
1884
1890
OMPI_DECLSPEC int MPI_Get_elements (const MPI_Status * status , MPI_Datatype datatype , int * count );
1885
1891
OMPI_DECLSPEC int MPI_Get_elements_c (const MPI_Status * status , MPI_Datatype datatype , MPI_Count * count );
1886
- OMPI_DECLSPEC int MPI_Get_elements_x (const MPI_Status * status , MPI_Datatype datatype , MPI_Count * count );
1887
1892
OMPI_DECLSPEC int MPI_Get (void * origin_addr , int origin_count ,
1888
1893
MPI_Datatype origin_datatype , int target_rank ,
1889
1894
MPI_Aint target_disp , int target_count ,
@@ -2375,8 +2380,6 @@ OMPI_DECLSPEC int MPI_Status_set_elements(MPI_Status *status, MPI_Datatype data
2375
2380
int count );
2376
2381
OMPI_DECLSPEC int MPI_Status_set_elements_c (MPI_Status * status , MPI_Datatype datatype ,
2377
2382
MPI_Count count );
2378
- OMPI_DECLSPEC int MPI_Status_set_elements_x (MPI_Status * status , MPI_Datatype datatype ,
2379
- MPI_Count count );
2380
2383
OMPI_DECLSPEC int MPI_Testall (int count , MPI_Request array_of_requests [], int * flag ,
2381
2384
MPI_Status array_of_statuses []);
2382
2385
OMPI_DECLSPEC int MPI_Testany (int count , MPI_Request array_of_requests [], int * index ,
@@ -2486,16 +2489,12 @@ OMPI_DECLSPEC int MPI_Type_get_extent(MPI_Datatype type, MPI_Aint *lb,
2486
2489
MPI_Aint * extent );
2487
2490
OMPI_DECLSPEC int MPI_Type_get_extent_c (MPI_Datatype type , MPI_Count * lb ,
2488
2491
MPI_Count * extent );
2489
- OMPI_DECLSPEC int MPI_Type_get_extent_x (MPI_Datatype type , MPI_Count * lb ,
2490
- MPI_Count * extent );
2491
2492
OMPI_DECLSPEC int MPI_Type_get_name (MPI_Datatype type , char * type_name ,
2492
2493
int * resultlen );
2493
2494
OMPI_DECLSPEC int MPI_Type_get_true_extent (MPI_Datatype datatype , MPI_Aint * true_lb ,
2494
2495
MPI_Aint * true_extent );
2495
2496
OMPI_DECLSPEC int MPI_Type_get_true_extent_c (MPI_Datatype datatype , MPI_Count * true_lb ,
2496
2497
MPI_Count * true_extent );
2497
- OMPI_DECLSPEC int MPI_Type_get_true_extent_x (MPI_Datatype datatype , MPI_Count * true_lb ,
2498
- MPI_Count * true_extent );
2499
2498
OMPI_DECLSPEC int MPI_Type_indexed (int count , const int array_of_blocklengths [],
2500
2499
const int array_of_displacements [],
2501
2500
MPI_Datatype oldtype , MPI_Datatype * newtype );
@@ -2508,7 +2507,6 @@ OMPI_DECLSPEC int MPI_Type_set_attr(MPI_Datatype type, int type_keyval,
2508
2507
OMPI_DECLSPEC int MPI_Type_set_name (MPI_Datatype type , const char * type_name );
2509
2508
OMPI_DECLSPEC int MPI_Type_size (MPI_Datatype type , int * size );
2510
2509
OMPI_DECLSPEC int MPI_Type_size_c (MPI_Datatype type , MPI_Count * size );
2511
- OMPI_DECLSPEC int MPI_Type_size_x (MPI_Datatype type , MPI_Count * size );
2512
2510
OMPI_DECLSPEC int MPI_Type_vector (int count , int blocklength , int stride ,
2513
2511
MPI_Datatype oldtype , MPI_Datatype * newtype );
2514
2512
OMPI_DECLSPEC int MPI_Type_vector_c (MPI_Count count , MPI_Count blocklength , MPI_Count stride ,
@@ -3042,7 +3040,6 @@ OMPI_DECLSPEC int PMPI_Get_count(const MPI_Status *status, MPI_Datatype datatyp
3042
3040
OMPI_DECLSPEC int PMPI_Get_count_c (const MPI_Status * status , MPI_Datatype datatype , MPI_Count * count );
3043
3041
OMPI_DECLSPEC int PMPI_Get_elements (const MPI_Status * status , MPI_Datatype datatype , int * count );
3044
3042
OMPI_DECLSPEC int PMPI_Get_elements_c (const MPI_Status * status , MPI_Datatype datatype , MPI_Count * count );
3045
- OMPI_DECLSPEC int PMPI_Get_elements_x (const MPI_Status * status , MPI_Datatype datatype , MPI_Count * count );
3046
3043
OMPI_DECLSPEC int PMPI_Get (void * origin_addr , int origin_count ,
3047
3044
MPI_Datatype origin_datatype , int target_rank ,
3048
3045
MPI_Aint target_disp , int target_count ,
@@ -3534,8 +3531,6 @@ OMPI_DECLSPEC int PMPI_Status_set_elements(MPI_Status *status, MPI_Datatype dat
3534
3531
int count );
3535
3532
OMPI_DECLSPEC int PMPI_Status_set_elements_c (MPI_Status * status , MPI_Datatype datatype ,
3536
3533
MPI_Count count );
3537
- OMPI_DECLSPEC int PMPI_Status_set_elements_x (MPI_Status * status , MPI_Datatype datatype ,
3538
- MPI_Count count );
3539
3534
OMPI_DECLSPEC int PMPI_Testall (int count , MPI_Request array_of_requests [], int * flag ,
3540
3535
MPI_Status array_of_statuses []);
3541
3536
OMPI_DECLSPEC int PMPI_Testany (int count , MPI_Request array_of_requests [], int * index ,
@@ -3645,16 +3640,12 @@ OMPI_DECLSPEC int PMPI_Type_get_extent(MPI_Datatype type, MPI_Aint *lb,
3645
3640
MPI_Aint * extent );
3646
3641
OMPI_DECLSPEC int PMPI_Type_get_extent_c (MPI_Datatype type , MPI_Count * lb ,
3647
3642
MPI_Count * extent );
3648
- OMPI_DECLSPEC int PMPI_Type_get_extent_x (MPI_Datatype type , MPI_Count * lb ,
3649
- MPI_Count * extent );
3650
3643
OMPI_DECLSPEC int PMPI_Type_get_name (MPI_Datatype type , char * type_name ,
3651
3644
int * resultlen );
3652
3645
OMPI_DECLSPEC int PMPI_Type_get_true_extent (MPI_Datatype datatype , MPI_Aint * true_lb ,
3653
3646
MPI_Aint * true_extent );
3654
3647
OMPI_DECLSPEC int PMPI_Type_get_true_extent_c (MPI_Datatype datatype , MPI_Count * true_lb ,
3655
3648
MPI_Count * true_extent );
3656
- OMPI_DECLSPEC int PMPI_Type_get_true_extent_x (MPI_Datatype datatype , MPI_Count * true_lb ,
3657
- MPI_Count * true_extent );
3658
3649
OMPI_DECLSPEC int PMPI_Type_indexed (int count , const int array_of_blocklengths [],
3659
3650
const int array_of_displacements [],
3660
3651
MPI_Datatype oldtype , MPI_Datatype * newtype );
@@ -3667,7 +3658,6 @@ OMPI_DECLSPEC int PMPI_Type_set_attr(MPI_Datatype type, int type_keyval,
3667
3658
OMPI_DECLSPEC int PMPI_Type_set_name (MPI_Datatype type , const char * type_name );
3668
3659
OMPI_DECLSPEC int PMPI_Type_size (MPI_Datatype type , int * size );
3669
3660
OMPI_DECLSPEC int PMPI_Type_size_c (MPI_Datatype type , MPI_Count * size );
3670
- OMPI_DECLSPEC int PMPI_Type_size_x (MPI_Datatype type , MPI_Count * size );
3671
3661
OMPI_DECLSPEC int PMPI_Type_vector (int count , int blocklength , int stride ,
3672
3662
MPI_Datatype oldtype , MPI_Datatype * newtype );
3673
3663
OMPI_DECLSPEC int PMPI_Type_vector_c (MPI_Count count , MPI_Count blocklength , MPI_Count stride ,
@@ -3912,6 +3902,33 @@ OMPI_DECLSPEC int MPI_Info_get_valuelen(MPI_Info info, const char *key, int *va
3912
3902
OMPI_DECLSPEC int PMPI_Info_get_valuelen (MPI_Info info , const char * key , int * valuelen ,
3913
3903
int * flag )
3914
3904
__mpi_interface_deprecated_in_mpi40__ ("PMPI_Info_get_valuelen was deprecated in MPI-4.0; use PMPI_Info_get_string instead" );
3905
+ OMPI_DECLSPEC int MPI_Get_elements_x (const MPI_Status * status , MPI_Datatype datatype , MPI_Count * count )
3906
+ __mpi_interface_deprecated_in_mpi41__ ("MPI_Get_elements_x was deprecated in MPI-4.1; use MPI_Get_elements_c instead" );
3907
+ OMPI_DECLSPEC int PMPI_Get_elements_x (const MPI_Status * status , MPI_Datatype datatype , MPI_Count * count )
3908
+ __mpi_interface_deprecated_in_mpi41__ ("PMPI_Get_elements_x was deprecated in MPI-4.1; use PMPI_Get_elements_c instead" );
3909
+ OMPI_DECLSPEC int MPI_Status_set_elements_x (MPI_Status * status , MPI_Datatype datatype ,
3910
+ MPI_Count count )
3911
+ __mpi_interface_deprecated_in_mpi41__ ("MPI_Status_set_elements_x was deprecated in MPI-4.1; use MPI_Status_set_elements_c instead" );
3912
+ OMPI_DECLSPEC int PMPI_Status_set_elements_x (MPI_Status * status , MPI_Datatype datatype ,
3913
+ MPI_Count count )
3914
+ __mpi_interface_deprecated_in_mpi41__ ("PMPI_Status_set_elements_x was deprecated in MPI-4.1; use PMPI_Status_set_elements_c instead" );
3915
+ OMPI_DECLSPEC int MPI_Type_get_extent_x (MPI_Datatype type , MPI_Count * lb ,
3916
+ MPI_Count * extent )
3917
+ __mpi_interface_deprecated_in_mpi41__ ("MPI_Type_get_extent_x was deprecated in MPI-4.1; use MPI_Type_get_extent_c instead" );
3918
+ OMPI_DECLSPEC int PMPI_Type_get_extent_x (MPI_Datatype type , MPI_Count * lb ,
3919
+ MPI_Count * extent )
3920
+ __mpi_interface_deprecated_in_mpi41__ ("PMPI_Type_get_extent_x was deprecated in MPI-4.1; use PMPI_Type_get_extent_c instead" );
3921
+ OMPI_DECLSPEC int MPI_Type_get_true_extent_x (MPI_Datatype datatype , MPI_Count * true_lb ,
3922
+ MPI_Count * true_extent )
3923
+ __mpi_interface_deprecated_in_mpi41__ ("MPI_Type_get_true_extent_x was deprecated in MPI-4.1; use MPI_Type_get_true_extent_c instead" );
3924
+ OMPI_DECLSPEC int PMPI_Type_get_true_extent_x (MPI_Datatype datatype , MPI_Count * true_lb ,
3925
+ MPI_Count * true_extent )
3926
+ __mpi_interface_deprecated_in_mpi41__ ("PMPI_Type_get_true_extent_x was deprecated in MPI-4.1; use PMPI_Type_get_true_extent_c instead" );
3927
+ OMPI_DECLSPEC int MPI_Type_size_x (MPI_Datatype type , MPI_Count * size )
3928
+ __mpi_interface_deprecated_in_mpi41__ ("MPI_Type_size_x was deprecated in MPI-4.1; use MPI_Type_size_c instead" );
3929
+ OMPI_DECLSPEC int PMPI_Type_size_x (MPI_Datatype type , MPI_Count * size )
3930
+ __mpi_interface_deprecated_in_mpi41__ ("MPI_Type_size_x was deprecated in MPI-4.1; use MPI_Type_size_c instead" );
3931
+
3915
3932
3916
3933
OMPI_DECLSPEC int MPI_T_event_get_num (int * num_events );
3917
3934
OMPI_DECLSPEC int MPI_T_event_get_info (int event_index , char * name , int * name_len ,
0 commit comments