tst237.mal

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

b:= bat.new(:oid,:oid);
bat.insert(b,1@0,1@0);
bat.insert(b,2@0,2@0);
bat.insert(b,3@0,3@0);

io.print(b);
bl:= batcalc.lng(b);
io.print(bl);

bb:= bat.new(:oid,:oid);
bat.insert(bb,1@0,1@0);
bat.insert(bb,2@0,2@0);
bat.insert(bb,3@0,3@0);

io.print(bb);
bbl:= batcalc.lng(bb);
io.print(bbl);

c:= bat.new(:oid,:oid);
bat.append(c,1@0);
o:= algebra.fetch(c,0);
io.print(o);
bat.append(c,2@0);
bat.append(c,3@0);
o:= 1@0;
io.print(o);
bat.append(c,o);
o:= 2@0;
bat.append(c,o);
o:= 3@0;
bat.append(c,o);

io.print(c);
cl:= batcalc.lng(c);
io.print(cl);