Source code in the limbo programming language

implement Command;

include "sys.m";
sys: Sys;

include "draw.m";

include "sh.m";

init(nil: ref Draw->Context, nil: list of string)
{
	sys = load Sys Sys->PATH;

	a := array[] of {"apple", "orange"};
	sys->print("length of a: %d\n", len a);
}