Fix: the potential for internal daemons was shifted of one step (ahead) in rdbg

lib/sasa/sasaRun.ml

@@ -117,6 +117,7 @@ let (make_do: string array -> SasArg.t ->
       let e = !sasa_env in
       (* 1: Get enable processes *)
       let pnall, enab_ll = Sasacore.Main.get_enable_processes p_nl_l e in
+      let pot_sl = compute_potentiel p_nl_l e in
       let silent = List.for_all (fun b -> not b) (List.flatten enab_ll) in
       if silent then (
         ("silent", Data.B true)::(from_sasa_env p_nl_l e) @ (get_sl_out true pl enab_ll) 
@@ -129,7 +130,6 @@ let (make_do: string array -> SasArg.t ->
         in
         (* 3: Do the steps *)
         let ne = Sasacore.Step.f pnal e in
-        let pot_sl = compute_potentiel p_nl_l ne in
         sasa_env := ne;
         ("silent", Data.B false)::pot_sl @
         (from_sasa_env p_nl_l e) @ (get_sl_out true pl enab_ll) @