Commit 336c5f71 authored by erwan's avatar erwan

New: add the --luciole-last option to lurette

which was added to rdbg in sha:0c9ef786865a0572c8f789e43defcaf10be180d2
parent 48331295
(* Time-stamp: <modified the 19/09/2019 (at 16:21) by Erwan Jahier> *)
(* Time-stamp: <modified the 06/02/2020 (at 17:25) by Erwan Jahier> *)
(* Mimick the behavior of 'rdbg -lurette', but without the dependency
on ocaml *)
......@@ -84,7 +84,8 @@ let (gen_reactive_program : string -> RdbgArg.reactive_program) =
Dynlink.loadfile cmxs;
Sasa.SasaRun.make (Array.of_list (args@["-rif"]))
*)
| _ -> StdioRun.make str
| "sasa" -> StdioRun.make (str ^ " -rif") (* don't work without this option *)
| _ -> StdioRun.make str
in
Ocaml(plugin)
......@@ -98,6 +99,7 @@ let _ =
args.envs <- env_plugins;
args.oracles <- oracle_plugins;
args.luciole_at_the_end <- !luciole_at_the_end;
args.step_nb <- !test_length;
args.display_sim2chro <- !display_sim2chro ;
args.display_gnuplot <- !display_gnuplot ;
......@@ -119,11 +121,9 @@ let _ =
(**********************************************************************************)
let _ =
if args.suts = [] then (
Printf.printf "\027[35mW: Please set at least one sut \027[00m\n\n" ;
if args.suts = [] && args.envs = [] then (
Printf.printf "\027[35mE: Please set at least one sut or one env \027[00m\n\n" ;
flush stdout;
help()
)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment