ci fix for sasa 4.0.3 again

expe/Makefile.inc

-# Time-stamp: <modified the 18/04/2021 (at 12:04) by Erwan Jahier>
+# Time-stamp: <modified the 18/04/2021 (at 13:28) by Erwan Jahier>
 #
 # This Makefile is meant to be includes by directories below
 
 .PRECIOUS: .ml .rif .cmxs .dot
-%.ml: %.dot 
+%.ml: %.dot
+	rm -f config.ml
 	sasa -reg $<
+	touch config.ml # so that it compiles under sasa 4.0.3
 
 %.cmxs: %.ml
-	rm -f config.ml ; touch config.ml # so that it compiles under sasa 4.0.3
 	ocamlfind ocamlopt -package algo -shared state.ml $(shell sasa -algo $*.dot) config.ml $< -o $@
 
 

expe/dijkstra-ring/config.ml

-
-
-open State
-
-let potential = None
-let fault = None 
-
-let (legitimate: t Algo.legitimate_fun) =
-  fun  pidl get -> 
-  (* only one node is enabled *)
-  let incr_token i pid =
-    let s, nl = get pid in
-    let nl = List.map fst nl in
-    let have_token = (if s.root then Root.enable_f s nl else P.enable_f s nl) <> [] in
-    let ni = if have_token then i+1 else i in
-    ni
-  in
-  let token_nb = List.fold_left incr_token 0 pidl in
-  token_nb = 1
-
-let legitimate = Some legitimate
-(* let legitimate = None *)