Skip to content

Commit e2769e4

Browse files
committed
fortran/use-mpi-ignore-tkr: fix typo in MPI_File_write_at_all_begin interface
1 parent e02dc1e commit e2769e4

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

ompi/mpi/fortran/use-mpi-ignore-tkr/mpi-ignore-tkr-file-interfaces.h.in

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1467,7 +1467,7 @@ end interface
14671467

14681468
interface MPI_File_write_at_all_begin
14691469

1470-
subroutine MPI_File_wr_at_all_begin(fh, offset, buf, count, datatype&
1470+
subroutine MPI_File_write_at_all_begin(fh, offset, buf, count, datatype&
14711471
, ierror)
14721472
include 'mpif-config.h'
14731473
integer, intent(in) :: fh
@@ -1477,13 +1477,13 @@ subroutine MPI_File_wr_at_all_begin(fh, offset, buf, count, datatype&
14771477
integer, intent(in) :: count
14781478
integer, intent(in) :: datatype
14791479
integer, intent(out) :: ierror
1480-
end subroutine MPI_File_wr_at_all_begin
1480+
end subroutine MPI_File_write_at_all_begin
14811481

14821482
end interface
14831483

14841484
interface PMPI_File_write_at_all_begin
14851485

1486-
subroutine PMPI_File_wr_at_all_begin(fh, offset, buf, count, datatype&
1486+
subroutine PMPI_File_write_at_all_begin(fh, offset, buf, count, datatype&
14871487
, ierror)
14881488
include 'mpif-config.h'
14891489
integer, intent(in) :: fh
@@ -1493,7 +1493,7 @@ subroutine PMPI_File_wr_at_all_begin(fh, offset, buf, count, datatype&
14931493
integer, intent(in) :: count
14941494
integer, intent(in) :: datatype
14951495
integer, intent(out) :: ierror
1496-
end subroutine PMPI_File_wr_at_all_begin
1496+
end subroutine PMPI_File_write_at_all_begin
14971497

14981498
end interface
14991499

0 commit comments

Comments
 (0)