diff --git a/maint/local_python/binding_f08.py b/maint/local_python/binding_f08.py
index 59379ac2508..eb1a7195bf3 100644
--- a/maint/local_python/binding_f08.py
+++ b/maint/local_python/binding_f08.py
@@ -810,8 +810,8 @@ def dump_mpi_c_interface_nobuf(func, is_large):
         # defined in src/binding/fortran/mpif_h/user_proxy.c
         c_name = "MPII_op_create"
     else:
-        # uses PMPI c binding directly
-        c_name = 'P' + get_function_name(func, is_large)
+        # uses MPI c binding directly
+        c_name = get_function_name(func, is_large)
     dump_interface_function(func, name, c_name, is_large)
 
 def dump_interface_function(func, name, c_name, is_large):
diff --git a/src/binding/fortran/use_mpi_f08/wrappers_c/comm_spawn_c.c b/src/binding/fortran/use_mpi_f08/wrappers_c/comm_spawn_c.c
index e9cb9e9138a..b0eb8f02dfa 100644
--- a/src/binding/fortran/use_mpi_f08/wrappers_c/comm_spawn_c.c
+++ b/src/binding/fortran/use_mpi_f08/wrappers_c/comm_spawn_c.c
@@ -22,7 +22,7 @@ int MPIR_Comm_spawn_c(const char *command, char *argv_f, int maxprocs, MPI_Info
     }
 
     mpi_errno =
-        PMPI_Comm_spawn(command, argv_c, maxprocs, info, root, comm, intercomm, array_of_errcodes);
+        MPI_Comm_spawn(command, argv_c, maxprocs, info, root, comm, intercomm, array_of_errcodes);
 
     if (argv_c != MPI_ARGV_NULL) {
         free(argv_c);
diff --git a/src/binding/fortran/use_mpi_f08/wrappers_c/comm_spawn_multiple_c.c b/src/binding/fortran/use_mpi_f08/wrappers_c/comm_spawn_multiple_c.c
index 1860d82af63..f96ee728014 100644
--- a/src/binding/fortran/use_mpi_f08/wrappers_c/comm_spawn_multiple_c.c
+++ b/src/binding/fortran/use_mpi_f08/wrappers_c/comm_spawn_multiple_c.c
@@ -110,9 +110,9 @@ int MPIR_Comm_spawn_multiple_c(int count, char *array_of_commands_f,
         free(buf);
     }
 
-    mpi_errno = PMPI_Comm_spawn_multiple(count, array_of_commands_c, array_of_argv_c,
-                                         array_of_maxprocs, array_of_info, root, comm, intercomm,
-                                         array_of_errcodes);
+    mpi_errno = MPI_Comm_spawn_multiple(count, array_of_commands_c, array_of_argv_c,
+                                        array_of_maxprocs, array_of_info, root, comm, intercomm,
+                                        array_of_errcodes);
 
     free(array_of_commands_c);