Fixed bug introduced by the groupment of limits

dac73b72 · MARCHE Claude · ee430035 · dac73b72
Commit dac73b72 authored Mar 09, 2016 by MARCHE Claude
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

src/driver/whyconf.ml src/driver/whyconf.ml +1 -1

No files found.
--- a/src/driver/whyconf.ml
+++ b/src/driver/whyconf.ml
@@ -210,7 +210,7 @@ let cntexample m = m.cntexample
 exception StepsCommandNotSpecified of string

 let get_complete_command pc ~with_steps =
-  let comm = if with_steps then pc.command
+  let comm = if not with_steps then pc.command
    else
      match pc.command_steps with
      | None -> raise (StepsCommandNotSpecified