reload.mal

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

MMO_location := bat.new(:oid,:str);
bat.setName(MMO_location,"MMO_location");
bat.setPersistent(MMO_location);

b0:bat[:oid,:str] := bbp.bind("MMO_location");
bat.insert(b0,0:oid,"http://www.metacrawler.com/");
bat.insert(b0,1:oid,"http://www.yahoo.com/");
bat.insert(b0,2:oid,"http://www.altavista.com/");
bat.insert(b0,3:oid,"http://www.searchengineshowdown.com/");

io.print(b0);

transaction.commit();
MMO_location:= nil;
b0:= nil;

b1:bat[:oid,:str]:= bbp.bind("MMO_location");
bat.delete(b1,0:oid);
bat.delete(b1,2:oid);

bat.insert(b1,0:oid,"http://www.metacrawler.com/");
bat.insert(b1,2:oid,"http://www.altavista.com/");

io.print(b1);

transaction.commit();

b1:bat[:oid,:str]:= bbp.bind("MMO_location");
z:= bat.unload("MMO_location");
io.print(z);

bat.insert(b1,4:oid,"http://www.ibiblio.org/javafaq/");

io.print(b1);

clients.quit();