X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fata.mli;h=1f8e8637ee6a1b1487bab295d9d7118b2487d4e9;hp=443bb0bd170c78ad3e855cb2426aabc6101c6323;hb=e3ad6d6f098809af95ddaf8b1e9bc4ec5cb7b0f4;hpb=6844beef9142975d1bf4a2b3fb72b93dfa3402dc

diff --git a/src/ata.mli b/src/ata.mli
index 443bb0b..1f8e863 100644
--- 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 *)
 
@@ -207,7 +207,7 @@ sig
   val finalize : t  -> auto
 (** Finalize the automaton and return it. Clean-up unused states
     (states that do not occur in any transitions and remove
-    instantes of negative [move] atoms by creating fresh states
+    instances of negative [move] atoms by creating fresh states
     that accept the complement of the negated state.  *)
 end
   (** Builder facility for the automaton *)