Full implem BU Oracle + eval_form in Formula (impossible in Asta) + transitions_lab...

[tatoo.git] / src / stateSet.ml

diff --git a/src/stateSet.ml b/src/stateSet.ml
index 082ac8e..b97be4e 100644 (file)
--- a/src/stateSet.ml
+++ b/src/stateSet.ml
@@ -22,6 +22,6 @@ let print ppf s =
     if is_empty s
     then fprintf ppf "ø"
     else
-      (Pretty.print_list ~sep:" " (State.print)) ppf (elements s) in
+      (Pretty.print_list ~sep:"," (State.print)) ppf (elements s) in
   fprintf ppf "{ %a }" p_set s