tst4001.mal

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

#tesing the optimizers

#setDebug();
function qry(i:dbl):dbl;
   i:= 1.0:dbl;
   z:= mmath.sin(i);
   j:= 1.0:dbl;
   k:= mmath.sin(j);
   l:= k+i;
   return z;
end qry;
t0:= alarm.usec();
optimizer.aliases("user","qry");
optimizer.commonTerms("user","qry");
optimizer.aliases("user","qry");
t1:= alarm.usec();
t2:= t1-t0;
io.print("execute");
z:= user.qry(0.0:dbl);
io.print(z);
io.print("done");
mdb.list("user","qry");
mdb.list();