code: 9ferno

ref: 52f8d420c74c33aed20043fbea77752bbac4bc95
dir: /tests/array2.b/

View raw version 
implement Sample;
include "sys.m";
	sys: Sys;

Sample: module
{
	init: fn();
};

init()
{
	sys = load Sys Sys->PATH;
	z := array[20] of {0 or 2 or 4 or 6 or 8 => 1,
			1 or 3 or 5 or 7 or 9 => 0,
			* => -1
			};

	sys->print("should print -1 result %d\n", z[11]);
}