Skip to content

Commit 9b74bea

Browse files
committed
process example 2: set max_wait_time
1 parent 5a1bd54 commit 9b74bea

File tree

2 files changed

+2
-4
lines changed

2 files changed

+2
-4
lines changed

example/system/example_process_2.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -16,6 +16,6 @@ program run_async
1616
end if
1717

1818
! Wait for the process to complete
19-
call wait(p)
19+
call wait(p, max_wait_time = 5.0)
2020
print *, "Process has now completed."
2121
end program run_async

example/system/example_process_4.f90

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -30,8 +30,6 @@ program example_process_kill
3030

3131
! Verify the process is no longer running
3232
running = is_running(process)
33-
print *, "Process running after kill:", running,' runtime=',elapsed(process)
34-
35-
stop 0
33+
print *, "Process running after kill:", running
3634

3735
end program example_process_kill

0 commit comments

Comments
 (0)