Fix a typo for MPI_TYPE_NULL

It should be MPI_DATATYPE_NULL. MPI does not have MPI_TYPE_NULL.
Signed-off-by: Huiwei Lu <huiweilu@mcs.anl.gov>

src/mpid/common/sched/mpid_sched.c

@@ -19,7 +19,7 @@
 #endif
 
 /* helper macros to improve code readability */
-/* we pessimistically assume that MPI_TYPE_NULL may be passed as a "valid" type
+/* we pessimistically assume that MPI_DATATYPE_NULL may be passed as a "valid" type
  * for send/recv when MPI_PROC_NULL is the destination/src */
 #define dtype_add_ref_if_not_builtin(datatype_)                    \
     do {                                                           \

test/mpi/f08/ext/ctypesinf90.f90

@@ -31,11 +31,11 @@
       errs = errs + f2ctype( MPI_LONG_INT, 14 )
       errs = errs + f2ctype( MPI_SHORT_INT, 15 )
       errs = errs + f2ctype( MPI_2INT, 16 )
-      if (MPI_LONG_DOUBLE .ne. MPI_TYPE_NULL) then
+      if (MPI_LONG_DOUBLE .ne. MPI_DATATYPE_NULL) then
           errs = errs + f2ctype( MPI_LONG_DOUBLE, 17 )
           errs = errs + f2ctype( MPI_LONG_DOUBLE_INT, 21 )
       endif
-      if (MPI_LONG_LONG .ne. MPI_TYPE_NULL) then
+      if (MPI_LONG_LONG .ne. MPI_DATATYPE_NULL) then
           errs = errs + f2ctype( MPI_LONG_LONG_INT, 18 )
           errs = errs + f2ctype( MPI_LONG_LONG, 19 )
           errs = errs + f2ctype( MPI_UNSIGNED_LONG_LONG, 20 )

test/mpi/f77/ext/ctypesinf.f

@@ -31,11 +31,11 @@ C
       errs = errs + f2ctype( MPI_LONG_INT, 14 )
       errs = errs + f2ctype( MPI_SHORT_INT, 15 )
       errs = errs + f2ctype( MPI_2INT, 16 )
-      if (MPI_LONG_DOUBLE .ne. MPI_TYPE_NULL) then
+      if (MPI_LONG_DOUBLE .ne. MPI_DATATYPE_NULL) then
           errs = errs + f2ctype( MPI_LONG_DOUBLE, 17 )
           errs = errs + f2ctype( MPI_LONG_DOUBLE_INT, 21 )
       endif
-      if (MPI_LONG_LONG .ne. MPI_TYPE_NULL) then
+      if (MPI_LONG_LONG .ne. MPI_DATATYPE_NULL) then
           errs = errs + f2ctype( MPI_LONG_LONG_INT, 18 )
           errs = errs + f2ctype( MPI_LONG_LONG, 19 )
           errs = errs + f2ctype( MPI_UNSIGNED_LONG_LONG, 20 )