Trace_event.SubscriberSubscriber that emits events
Callback for events.
module Callbacks : 
  Trace_event.Event.Sub.Callbacks.S with type st = event_consumerval subscriber : event_consumer -> Trace_event.Event.Sub.tA subscriber that turns calls into events that are passed to the event_consumer