package rfsm

  1. Overview
  2. Docs
exception Error of string
type config = {
  1. mutable max_micro_reactions : int;
}
val cfg : config
type stimulus = Fsm_dyn.loc * Expr.value
type response = Fsm_dyn.loc * Expr.value
type reaction = Types.date * string * Stimuli.stimuli list * response list * string
type context = {
  1. c_date : Types.date;
  2. c_inputs : (string * (Types.typ * Expr.value)) list;
  3. c_outputs : (string * (Types.typ * Expr.value)) list;
  4. c_fns : (string * (Types.typ * Expr.value)) list;
  5. c_csts : (string * (Types.typ * Expr.value)) list;
  6. c_vars : (string * (Types.typ * Expr.value)) list;
  7. c_evs : (string * (Types.typ * Expr.value)) list;
  8. c_fsms : Fsm_dyn.t list * Fsm_dyn.t list;
}
exception OverReaction of Types.date
val react : Types.date -> context -> stimulus list -> context * response list
val run : Sysm.t -> context * (Types.date * response list) list
val dump_context : context -> unit
val dump_reaction : (int * Fsm_dyn.event list) -> unit
OCaml

Innovation. Community. Security.