sig val version : string val machine_uuid : OBus_uuid.t Lwt.t Lazy.t val protocol_version : int val max_name_length : int val max_message_size : int end