tst870.mal

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

#testing the multiplex operations on simple groups

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

io.print(b);
ma_a := io.printf("#~BeginVariableOutput~#\n");
na_a := bat.info(b);
oa_a := io.print(na_a);
pa_a := io.printf("#~EndVariableOutput~#\n");


g:= group.min(b);
io.print(g);

h:= group.max(b);
io.print(h);