Module Simulator.Events

type timeout_label = string
exception NotFound of string
module type Message = sig ... end

Signature required for a Message module.

module type Event = sig ... end

Module containing required operations to handle events.

module MakeEvent (Msg : Message) : Event with type msg = Msg.t

Functor to create an implementation for Event, given a Message module.

module type EventQueue = sig ... end

Contains the operations required for the Event Queue.

module MakeQueue (Event : Event) : EventQueue with type ev = Event.t

Functor to create an implementation for the EventQueue, given the Event module.