From e7718ec062c5fa1a38555e27e71eabbfdf8aebb4 Mon Sep 17 00:00:00 2001 From: Allan Blanchard <allan.blanchard@cea.fr> Date: Fri, 29 Sep 2023 13:08:48 +0200 Subject: [PATCH] [ptests] removes an unused parameter --- tools/ptests/ptests.ml | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/tools/ptests/ptests.ml b/tools/ptests/ptests.ml index dba1675fd59..09da1de6707 100644 --- a/tools/ptests/ptests.ml +++ b/tools/ptests/ptests.ml @@ -826,7 +826,7 @@ end = struct enabled_if = select ~prev:deps.enabled_if ~config:config.dc_enabled_if } - let config_exec ~once ~drop:_ ~file ~dir:_ s current = + let config_exec ~once ~drop:_ ~file s current = let s = Macros.expand ~file current.dc_macros s in { current with dc_execnow = @@ -1016,8 +1016,12 @@ end = struct (fun ~drop:_ ~file:_ ~dir:_ _ current -> { current with dc_dont_run = true }); - "EXECNOW", config_exec ~once:true; - "EXEC", config_exec ~once:false; + "EXECNOW", + (fun ~drop ~file ~dir:_ s acc -> + config_exec ~once:true ~file ~drop s acc); + "EXEC", + (fun ~drop ~file ~dir:_ s acc -> + config_exec ~once:false ~file ~drop s acc); "MACRO", config_macro; "LIBS", config_libs; -- GitLab