tst890.mal

来自「一个内存数据库的源代码这是服务器端还有客户端」· MAL 代码 · 共 18 行

#test reference counting of batcalc
b:= bat.new(:oid,:int);
bat.setName(b,"b");
bat.insert(b,1@0,1);
c:=batcalc.+(b,2);
c:=batcalc.+(b,3);
c:=batcalc.+(b,4);
c:=batcalc.+(b,5);
c:=batcalc.+(b,6);
c:=batcalc.+(b,7);
c:=batcalc.+(b,8);
io.print(c);
d:= bbp.getRefCount();
dl:=bbp.getLRefCount();
dn:= bbp.getNames();
io.print(dn,d,dl);