Module Register

module Register: sig .. end

val journal_register : ?comment:string ->
bool ->
string -> 'a Type.t -> ('a -> unit) Pervasives.ref -> ('a -> unit) -> unit
val nojournal_register : 'a Pervasives.ref -> 'a -> unit
val main : unit -> unit