code: purgatorio

ref: 063c3f398e949895bb9795539e83a2e0be364376
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);
};