Charles.Forsyth20060303-partialeea662d19 years agoHistory
16 lines · 251 B · Objective-C
RawDownload
Gamer: module{	PATH:	con "/dis/lib/gamer.dis"; 	Game: adt {		rf, wf: ref Sys->FD;		opponent: string;		player: int; 		In:	fn(g: self Game) : int;		Out:	fn(g: self Game, i: int);		Exit:	fn(g: self Game);	}; 	Join:	fn(game: string) : Game;};