shithub: purgatorio

ref: 41e27b2d10c6a60c49931332e8677438736a1e36
dir: /appl/collab/srvmgr.m/

View raw version 
Srvmgr: module
{
	PATH:	con "/dis/collab/srvmgr.dis";
	Srvreq: adt {
		sname: string;
		id: string;
		pick {
		Acquire =>
			uname: string;
			reply: chan of Srvreply;
		Release =>
		}
	};

	Srvreply: type (
		string,		# error
		string,		# root path
		ref Sys->FD	# styx fd
	);

	init: fn(cfg: string): (string, chan of ref Srvreq);
};