16 lines
245 B
Text
16 lines
245 B
Text
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);
|
|
}
|