tst4620.mal

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

#some join operations
function algebra.joinPath( a:bat[:any_1,:any_2],
                b:bat[:any_2,:any_3],
                c:bat[:any_3,:any_4]):bat[:any_1,:any_4];
    z:= algebra.join(a,b);
    zz:= algebra.join(z,c);
    return zz;
end joinPath;

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

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

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

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