tst401.mal

一个内存数据库的源代码这是服务器端还有客户端

# testing the simple iterators on builtin types
barrier (v1,i) := language.newRange(0.0:flt);
	io.print(i);
	v:= "do something";
	redo (v1,i) :=language.nextElement(1.3:flt,2.5:flt);
exit	(v1,i) ;