From cbb0d6f17a45cf9f07aab8d007fb73709d14d74f Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Mon, 31 Aug 2020 17:21:35 +0200
Subject: SLURM: Implement cancel_task

---
 src/gui_backend_slurm.c | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'src/gui_backend_slurm.c')

diff --git a/src/gui_backend_slurm.c b/src/gui_backend_slurm.c
index 92adc391..33e35959 100644
--- a/src/gui_backend_slurm.c
+++ b/src/gui_backend_slurm.c
@@ -70,7 +70,12 @@ static int get_task_status(void *job_priv,
 
 static void cancel_task(void *job_priv)
 {
-	//struct slurm_job *job = job_priv;
+	int i;
+	struct slurm_job *job = job_priv;
+	for ( i=0; i<job->n_blocks; i++) {
+		STATUS("Stopping SLURM job %i\n", job->job_ids[i]);
+		slurm_kill_job(job->job_ids[i], SIGINT, 0);
+	}
 }
 
 
-- 
cgit v1.2.3