tst4300.mal

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

#some join operations

#mdb.start();
b:= bat.new(:lng,:lng);
barrier (k,v):= language.newRange(0:lng);
        bat.insert(b,v,v);
        redo (k,v):= language.nextElement(1:lng,100:lng);
exit (k,v);

i:= aggr.count(b);
io.print(i);

c:= algebra.select(b,0:lng,9:lng);
i:= aggr.count(c);
io.print(i);
d:= algebra.select(b,0:lng,49:lng);
i:= aggr.count(d);
io.print(i);

zz:= algebra.joinPath(b,c,d);
i:= aggr.count(zz);
io.print(i);

#to be detected by join inversion
#z:= joinPath(b,c);
#zz:= joinPath(zz,d);
#i:= aggr.count(z);
#io.print(i);