Refactor pretty printing of transitions and fix some depracated function uses.

[tatoo.git] / src / ata.mli

diff --git a/src/ata.mli b/src/ata.mli
index 443bb0b..54ed1b4 100644 (file)
--- a/src/ata.mli
+++ b/src/ata.mli
@@ -102,7 +102,7 @@ end
 
 module TransList : sig
   include Hlist.S with type elt = Transition.t
-  val print : Format.formatter -> ?sep:string -> t -> unit
+  val print : ?sep:string -> Format.formatter  -> t -> unit
 end
 (** Hashconsed lists of transitions, with a printing facility *)