diff options
-rw-r--r-- | player/instructions.f90 | 2 | ||||
-rw-r--r-- | player/player.F90 | 5 |
2 files changed, 3 insertions, 4 deletions
diff --git a/player/instructions.f90 b/player/instructions.f90 index f110dae..a1aaa9d 100644 --- a/player/instructions.f90 +++ b/player/instructions.f90 @@ -366,6 +366,8 @@ contains task_count = get_task_count(j) + Print *, "Task count: ", task_count + ! Remember to zero-index your json! do i = 1, task_count diff --git a/player/player.F90 b/player/player.F90 index 49803c5..308be3b 100644 --- a/player/player.F90 +++ b/player/player.F90 @@ -72,14 +72,11 @@ implicit none instr_json_available = request_json(url, j_instructions) if(instr_json_available) then - Print *, "instructions available" - ! Task loop call perform_tasks(j_instructions, job_id) call destroy_instructions(j_instructions) end if - else #ifdef GNU @@ -219,7 +216,7 @@ contains status_code = request_to_temporary_file(url, filename) if(status_code == STATUS_SUCCESS) then j = parse_instructions(filename) - call delete_file(filename) + request_json = .true. else request_json = .false. end if |