test: spring clean-up in test/*/Makefile

test/toy-example-sum/Makefile

-# Time-stamp: <modified the 18/05/2021 (at 18:08) by Erwan Jahier>
+# Time-stamp: <modified the 30/05/2022 (at 14:39) by Erwan Jahier>
 
+DECO_PATTERN="0-:p.ml"
+-include ../Makefile.dot
+-include ../Makefile.inc
+-include Makefile.untracked
 
-test: test1 test2
+##############################################################################
+# Non-regression tests
+
+test: test1 test2 clean
 test1: rooted3.cmxs
 	sasa rooted3.dot
 
 test2: rooted3.cmxs
 	sasa -gcd rooted3.dot
+clean: genclean
+	rm -f rooted3.ml
 
-DECO_PATTERN="0-:p.ml"
--include ../Makefile.dot
+##############################################################################
+# Other examples of use
 
 sim2chrogtk: rooted3.rif
 	sim2chrogtk -ecran -in $< > /dev/null
@@ -34,10 +43,3 @@ gui: rooted3.ml
 
 rdbg: rooted3.ml
 	rdbg -o rooted3.rif -env "$(sasa) rooted3.dot -gcd"
-
-clean: genclean
-	rm -f rooted3.ml
-
--include ../Makefile.inc
--include Makefile.untracked
-

test/unison/Makefile

-# Time-stamp: <modified the 11/05/2021 (at 16:49) by Erwan Jahier>
+# Time-stamp: <modified the 30/05/2022 (at 14:38) by Erwan Jahier>
 
-test: test1 test2 lurette0 lurette1 rdbg_test test3
+DECO_PATTERN="0-:unison.ml" 
+-include ../Makefile.dot
+-include ../Makefile.inc
+-include Makefile.untracked
+
+##############################################################################
+# Non-regression tests
+
+test: test1 test2 lurette0 lurette1 test3 ring10.rdbg-test clean
 
 test1: fig41.cmxs
 	$(sasa) -l 5 fig41.dot -sd  -rif
@@ -18,19 +26,6 @@ test3:
 
 sasaopt=-sd
 
-DECO_PATTERN="0-:unison.ml" 
--include ../Makefile.dot
-
-sim2chrogtk: ring.rif
-	sim2chrogtk -ecran -in $< > /dev/null
-
-gnuplot: ring.rif
-	gnuplot-rif $<
-
-luciole: ring.cmxs
-	luciole-rif $(sasa) ring.dot -custd  -rif -ifi
-
-
 lurette0: ring_oracle.lus
 	lurette --sasa -o lurette.rif \
       -sut "$(sasa) ring.dot -sd -rif" \
@@ -43,6 +38,23 @@ lurette1: ring.lut ring_oracle.lus
       -sut "lutin ring.lut -n synchronous"  \
       -oracle "lv6 ring_oracle.lus -n oracle"
 
+clean: genclean cleandot
+	rm -f ring_oracle.lus fig41.ml ring.ml
+
+##############################################################################
+# Other examples of use
+
+sim2chrogtk: ring.rif
+	sim2chrogtk -ecran -in $< > /dev/null
+
+gnuplot: ring.rif
+	gnuplot-rif $<
+
+luciole: ring.cmxs
+	luciole-rif $(sasa) ring.dot -custd  -rif -ifi
+
+
+
 #
 rdbg_daemon: ring.cmxs
 	rdbg  --sasa  -sut "sasa ring.dot -custd -rif"
@@ -57,12 +69,3 @@ rdbgui: ring.ml
 rdbg2: ring.ml 
 	rdbg --sasa -o unison.rif -sut "sasa ring.dot -custd -rif" 
 
-rdbg_test: ring.ml
-	printf "\nn\ns\nsi 4\nn\nni 3\nq\n" | rdbg --sasa -o unison.rif  \
-      -sut "$(sasa) ring.dot -sd -rif" \
-
--include ../Makefile.inc
--include Makefile.untracked
-
-clean: genclean cleandot
-	rm -f ring_oracle.lus fig41.ml ring.ml

test/unison/my-rdbg-tuning.ml

@@ -3,6 +3,7 @@
 #use "rdbg-cmds.ml";;
 #use "sasa-rdbg-cmds.ml";;
 
+(*
 let sync sl =
   let sl = List.filter (fun (n,v) -> String.length n > 5 && String.sub n 0 5 = "Enab_") sl in
   Some (List.map (fun (n,v) -> String.sub n 5 ((String.length n)-5),v) sl)
@@ -11,7 +12,4 @@ let _ =
   rdbg_mv_hook := None; 
   ()
 ;; 
-
-
-
-
+*)

test/unison/some_session

+legitimate
+wait 3
+print_event !e;;
+

tools/rdbg4sasa/sasa-rdbg-cmds.ml

@@ -34,7 +34,7 @@ type round_st = {
                                      (* maps event nb to round, round nb, and mask *)
   }
 
-let verbose = ref true
+let verbose = ref false
 
 let round_st_init = {
     cpt = 1;