We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent c617048 commit ed0565cCopy full SHA for ed0565c
src/stdlib_system.F90
@@ -168,7 +168,7 @@ end function process_is_completed
168
!! If the process is still running, the value returned reflects the time from the creation of the process
169
!! until the call to this function. Otherwise, the total process duration until completion is returned.
170
!!
171
- module real(RTICKS) function process_lifetime(process) result(delta_t)
+ module function process_lifetime(process) result(delta_t)
172
!> The process object for which to calculate elapsed time.
173
class(process_type), intent(in) :: process
174
!> The elapsed time in seconds since the process started.
0 commit comments