module/timers.m


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

Timers: module
{
	PATH: con "/dis/lib/timers.dis";

	Sec: con 1000;

	Timer: adt {
		dt:	int;
		timeout:	chan of int;

		start:	fn(msec: int): ref Timer;
		stop:	fn(t: self ref Timer);
	};

	init:	fn(gran: int): int;
	shutdown:	fn();
};