diff options
author | Jeffrey Armstrong <jeff@approximatrix.com> | 2022-06-27 16:52:40 -0400 |
---|---|---|
committer | Jeffrey Armstrong <jeff@approximatrix.com> | 2022-06-27 16:57:17 -0400 |
commit | a9fc9ce2035e0db07baa6e732200265a90f66332 (patch) | |
tree | d31b4d46cb14608b3bdf1f2a65b7186841949d0c /player/instructions.f90 | |
parent | 1e7a526f569ebce3687c43a907b45fc2e44fab23 (diff) | |
download | levitating-a9fc9ce2035e0db07baa6e732200265a90f66332.tar.gz levitating-a9fc9ce2035e0db07baa6e732200265a90f66332.zip |
Added player report of task type, which the captain will show in the job summary.
Diffstat (limited to 'player/instructions.f90')
-rw-r--r-- | player/instructions.f90 | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/player/instructions.f90 b/player/instructions.f90 index 300fa2a..f9be1f9 100644 --- a/player/instructions.f90 +++ b/player/instructions.f90 @@ -405,6 +405,7 @@ contains logical::res character(len=:), pointer::captured_filename character(len=1024)::url + character(len=40)::operation task_count = get_task_count(j) @@ -412,8 +413,9 @@ contains ! Remember to zero-index your json! do i = 1, task_count + call get_task_operation(j, i, operation) + call get_status_url(job_id, i, url, status=STATUS_STARTING, task_type=operation) - call get_status_url(job_id, i, url, status=STATUS_STARTING) Print *, "Reporting: "//trim(url) server_status = request_to_ignored(url) |