tst600.mal

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

# checking box management

chest:=box.open("chest");
pi :=3.417;
box.deposit("chest","pi",pi);
f:flt := box.take("chest","pi");
io.print(f);
f:= f+1.0:flt;
box.release("chest","pi",pi);
g:flt := box.take("chest","pi");
io.print(g);
box.discard("chest","pi");
box.close("chest");