diff --git a/ompi/mpi/fortran/use-mpi-f08/get_accumulate_ts.c.in b/ompi/mpi/fortran/use-mpi-f08/get_accumulate_ts.c.in
index 3b3b00d39f0..0d2ed0b5b1a 100644
--- a/ompi/mpi/fortran/use-mpi-f08/get_accumulate_ts.c.in
+++ b/ompi/mpi/fortran/use-mpi-f08/get_accumulate_ts.c.in
@@ -27,7 +27,7 @@
 PROTOTYPE VOID get_accumulate(BUFFER_ASYNC x1, COUNT origin_count,
                               DATATYPE origin_datatype, BUFFER_ASYNC_OUT x2,
                               COUNT result_count, DATATYPE result_datatype,
-                              RANK target_rank, DISP target_disp,
+                              RANK target_rank, AINT target_disp,
                               COUNT target_count, DATATYPE target_datatype,
                               OP op, WIN win)
 {