tst150.mal

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

command user.lookup(nme:str):bat[:str,:str] 
address CMDlookup; 
function sample(nme:str, val:any_1):bit;
   b := user.lookup(nme); #find a bat
   h := algebra.select(b,val,val);
   t := aggr.count(h);
   x := io.print(t);
   y := io.print(val);
   return sample:=true;
end sample;
user.sample("hello","world");
user.sample("hello",1);