9
9
* University of Stuttgart. All rights reserved.
10
10
* Copyright (c) 2004-2005 The Regents of the University of California.
11
11
* All rights reserved.
12
- * Copyright (c) 2007-2021 Cisco Systems, Inc. All rights reserved
12
+ * Copyright (c) 2007-2022 Cisco Systems, Inc. All rights reserved
13
13
* Copyright (c) 2008-2009 Sun Microsystems, Inc. All rights reserved.
14
14
* Copyright (c) 2009-2012 Oak Rigde National Laboratory. All rights reserved.
15
15
* Copyright (c) 2011-2020 Sandia National Laboratories. All rights reserved.
@@ -532,6 +532,11 @@ typedef MPI_Win_errhandler_function MPI_Win_errhandler_fn
532
532
533
533
/*
534
534
* Miscellaneous constants
535
+ *
536
+ * NOTE: Many of the integer constants below *also* appear in
537
+ * ompi/include/mpif-values.pl. If you change any of these integer
538
+ * values below, make sure to also change the corresponding values in
539
+ * mpif-values.pl, too.
535
540
*/
536
541
#define MPI_ANY_SOURCE -1 /* match any source rank */
537
542
#define MPI_PROC_NULL -2 /* rank of null process */
@@ -572,6 +577,10 @@ typedef MPI_Win_errhandler_function MPI_Win_errhandler_fn
572
577
573
578
/*
574
579
* Constants for C code to access elements in Fortran MPI status array.
580
+ *
581
+ * NOTE: The MPI_F_SOURCE, MPI_F_TAG, MPI_F_ERROR are intentionally 1
582
+ * smaller than their Fortran equivalents in mpif-values.pl (because C
583
+ * is 0-indexed and Fortran is 1-indexed).
575
584
*/
576
585
#define MPI_F_STATUS_SIZE OMPI_FORTRAN_STATUS_SIZE /* Size of Fortran MPI status array */
577
586
#define MPI_F_SOURCE 0 /* Index for MPI_SOURCE */
@@ -626,7 +635,7 @@ typedef MPI_Win_errhandler_function MPI_Win_errhandler_fn
626
635
* Predefined attribute keyvals
627
636
*
628
637
* DO NOT CHANGE THE ORDER WITHOUT ALSO CHANGING THE ORDER IN
629
- * src /attribute/attribute_predefined.c and mpif.h.in.
638
+ * ompi /attribute/attribute_predefined.c and mpif.h.in.
630
639
*/
631
640
enum {
632
641
/* MPI-1 */
@@ -744,7 +753,8 @@ enum {
744
753
/*
745
754
* Comparison results. Don't change the order of these, the group
746
755
* comparison functions rely on it.
747
- * Do not change the order of these without also modifying mpif.h.in.
756
+ * Do not change the order of these without also modifying
757
+ * mpif-values.pl.
748
758
*/
749
759
enum {
750
760
MPI_IDENT ,
@@ -755,7 +765,8 @@ enum {
755
765
756
766
/*
757
767
* MPI_Init_thread constants
758
- * Do not change the order of these without also modifying mpif.h.in.
768
+ * Do not change the order of these without also modifying
769
+ * mpif-values.pl.
759
770
*/
760
771
enum {
761
772
MPI_THREAD_SINGLE ,
@@ -766,8 +777,8 @@ enum {
766
777
767
778
/*
768
779
* Datatype combiners.
769
- * Do not change the order of these without also modifying mpif.h.in.
770
- * (see also mpif-common.h.fin) .
780
+ * Do not change the order of these without also modifying
781
+ * mpif-values.pl .
771
782
*/
772
783
enum {
773
784
MPI_COMBINER_NAMED ,
@@ -818,8 +829,8 @@ enum {
818
829
819
830
/*
820
831
* Communicator split type constants.
821
- * Do not change the order of these without also modifying mpif.h.in
822
- * (see also mpif-common.h.fin) .
832
+ * Do not change the order of these without also modifying
833
+ * mpif-values.pl .
823
834
*/
824
835
enum {
825
836
MPI_COMM_TYPE_SHARED ,
0 commit comments