sig val register_file : string -> unit val register_shm : string -> unit val delete_registered_objects : unit -> unit end
