diff --git a/src/binding/fortran/use_mpi_f08/wrappers_c/utils.c b/src/binding/fortran/use_mpi_f08/wrappers_c/utils.c
index 665232da057..2551adf094d 100644
--- a/src/binding/fortran/use_mpi_f08/wrappers_c/utils.c
+++ b/src/binding/fortran/use_mpi_f08/wrappers_c/utils.c
@@ -6,6 +6,9 @@
 #include "cdesc.h"
 #include <string.h>
 
+int MPIR_F08_MPI_IN_PLACE;
+int MPIR_F08_MPI_BOTTOM;
+
 /*
   Convert an array of strings in Fortran Format to an array of strings in C format (i.e., char* a[]).
 
diff --git a/src/mpi/init/init_bindings.c b/src/mpi/init/init_bindings.c
index 85fb67d2388..d1e8236748e 100644
--- a/src/mpi/init/init_bindings.c
+++ b/src/mpi/init/init_bindings.c
@@ -25,8 +25,6 @@ void MPII_init_binding_cxx(void)
 #ifdef HAVE_F08_BINDING
 MPI_F08_status MPIR_F08_MPI_STATUS_IGNORE_OBJ;
 MPI_F08_status MPIR_F08_MPI_STATUSES_IGNORE_OBJ[1];
-int MPIR_F08_MPI_IN_PLACE;
-int MPIR_F08_MPI_BOTTOM;
 
 /* Although the two STATUS pointers are required but the MPI3.0,  they are not used in MPICH F08 binding */
 MPI_F08_status *MPI_F08_STATUS_IGNORE = &MPIR_F08_MPI_STATUS_IGNORE_OBJ;