RosettaCodeData/Task/Array-length/Limbo/array-length.limbo

17 lines
245 B
Plaintext

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);
}