Ojs_filetree_server.ServerServer side of filetree
module type S = sig ... endmodule Make
(P : Ojs_filetree.Types.P) :
S
with type P.server_msg = P.server_msg
and type P.client_msg = P.client_msg
and type P.app_server_msg = P.app_server_msg
and type P.app_client_msg = P.app_client_msg