Module Total.Automaton

Check that every variable defined in an automaton

type entry = {
  1. e_loc : Zlocation.location;
  2. mutable e_state : Deftypes.defnames;
  3. mutable e_until : Deftypes.defnames;
  4. mutable e_unless : Deftypes.defnames;
}
type table = {
  1. t_initial : Zident.t * entry;
  2. t_remaining : entry Zident.Env.t;
}
val table : Zelus.state_handler list -> table
val add_state : Zident.Env.key -> Deftypes.defnames -> table -> unit
val add_transition : bool -> Deftypes.tentry Zident.Env.t -> Zident.Env.key -> Deftypes.defnames -> table -> unit
val check_all_states_are_accessible : Zlocation.location -> Zelus.state_handler list -> unit