code: purgatorio

ref: d7809194db6f52a6fc87a6d10bff7e78cc03c4d2
dir: /appl/cmd/pause.b/

View raw version 
implement Pause;
#
# init program to do nothing but pause
#

include "sys.m";
include "draw.m";

Pause: module
{
	init:	fn(nil: ref Draw->Context, nil: list of string);
};

init(nil: ref Draw->Context, nil: list of string)
{
	<-chan of int;
}