diff --git a/ompi/mpi/fortran/base/gen-mpi-mangling.pl b/ompi/mpi/fortran/base/gen-mpi-mangling.pl
index 94e3b24e646..ab568b98ecd 100755
--- a/ompi/mpi/fortran/base/gen-mpi-mangling.pl
+++ b/ompi/mpi/fortran/base/gen-mpi-mangling.pl
@@ -90,7 +90,7 @@
 $fortran->{errcodes_ignore} = {
     c_type => "int *",
     c_name => "mpi_fortran_errcodes_ignore",
-    f_type => "integer",
+    f_type => "integer, dimension(1)",
     f_name => "MPI_ERRCODES_IGNORE",
 };
 $fortran->{status_ignore} = {