1
1

Fix the names of the profiled versions of wtick/wtime so that the

Fortran compiler knows the return type of the functions.

This commit was SVN r26662.
Этот коммит содержится в:
Jeff Squyres 2012-06-26 13:38:19 +00:00
родитель 2ec29ba8d6
Коммит d55e94678e

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

@ -2404,7 +2404,7 @@ interface PMPI_Wtick
function PMPI_Wtick_f08( ) BIND(C,name="MPI_Wtick")
use, intrinsic :: ISO_C_BINDING
implicit none
DOUBLE PRECISION :: MPI_Wtick_f08
DOUBLE PRECISION :: PMPI_Wtick_f08
end function PMPI_Wtick_f08
end interface PMPI_Wtick
@ -2414,7 +2414,7 @@ interface PMPI_Wtime
function PMPI_Wtime_f08( ) BIND(C,name="MPI_Wtime")
use, intrinsic :: ISO_C_BINDING
implicit none
DOUBLE PRECISION :: MPI_Wtime_f08
DOUBLE PRECISION :: PMPI_Wtime_f08
end function PMPI_Wtime_f08
end interface PMPI_Wtime