tst014.mal

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

# conditionally redo a block
	i:=1;
barrier b:= calc.==(i,1);
	i:= i+1;
	io.print(i);
	redo b:= calc.<(i,3);
exit 	b;