From 2df58b6191708b05f4c3dcee0e91354f109e81a5 Mon Sep 17 00:00:00 2001
From: Deyao Chen <chendeyao000@gmail.com>
Date: Mon, 19 Dec 2022 23:53:49 +0800
Subject: [PATCH] exit on null for target output

---
 R/race-wrapper.R | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/R/race-wrapper.R b/R/race-wrapper.R
index 639358bd..4e615534 100644
--- a/R/race-wrapper.R
+++ b/R/race-wrapper.R
@@ -527,6 +527,9 @@ execute.experiments <- function(experiments, scenario)
       scenario$targetRunnerParallel(experiments, exec.target.runner,
                                     scenario = scenario,
                                     target.runner = target.runner)
+    if (is.null(target.output)) {
+      irace.error("Stopping because the output of targetRunnerParallel is NULL.")
+    } 
   } else if (scenario$batchmode != 0) {
     target.output <- cluster.lapply (experiments, scenario = scenario)
   } else if (parallel > 1) {