1Filter: module 2{ 3 DEFLATEPATH: con "/dis/lib/deflate.dis"; 4 INFLATEPATH: con "/dis/lib/inflate.dis"; 5 SLIPPATH: con "/dis/lib/slip.dis"; 6 7 Rq: adt { 8 pick { 9 Start => 10 pid: int; 11 Fill or Result => 12 buf: array of byte; 13 reply: chan of int; 14 Info => 15 msg: string; 16 Finished => 17 buf: array of byte; 18 Error => 19 e: string; 20 } 21 }; 22 23 init: fn(); 24 start: fn(param: string): chan of ref Rq; 25}; 26