1
1

fortran: remove 2 unused files

As noted in the comments of these files, they aren't used.  Instead,
the Fortran interfaces for WTICK/WTIME just BIND(C) invoke the
back-end C functions (yay BIND(C)!).  Hence, there's no need to keep
these old wrapper files around any more.

cmr=v1.8.3

This commit was SVN r32751.
Этот коммит содержится в:
Jeff Squyres 2014-09-17 21:49:24 +00:00
родитель 8db1f89dd1
Коммит 0f29f222f2
2 изменённых файлов: 0 добавлений и 24 удалений

Просмотреть файл

@ -1,12 +0,0 @@
! This wrapper for MPI_Wtick is not actually used in this version.
! See mpi-f08-interfaces.F90 where the C implementation is called
! directly.
!
function MPI_Wtick_f08()
use :: mpi_f08, only : ompi_wtick_f
implicit none
DOUBLE PRECISION :: MPI_Wtick_f08
MPI_Wtick_f08 = ompi_wtick_f()
end function MPI_Wtick_f08

Просмотреть файл

@ -1,12 +0,0 @@
! This wrapper for MPI_Wtime is not actually used in this version.
! See mpi-f08-interfaces.F90 where the C implementation is called
! directly.
!
function MPI_Wtime_f08()
use :: mpi_f08, only : ompi_wtime_f
implicit none
DOUBLE PRECISION :: MPI_Wtime_f08
MPI_Wtime_f08 = ompi_wtime_f()
end function MPI_Wtime_f08