implement T;
include "sys.m";
sys: Sys;
include "draw.m";
T: module
{
init: fn(ctxt: ref Draw->Context, args: list of string);
};
init(ctxt: ref Draw->Context, args: list of string)
{
sys = load Sys Sys->PATH;
a : list of int;
if(a == nil) {
sys->print("nil\n");
} else {
sys->print("length %d\n", len a);
}
}
|