tst654.mal

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

# An extensive test for the new tablet layout
tablet.display(2,"strong");
tablet.display(2,"strong",true);
first:=1;
last:= 2;
tablet.display(first,last);

tablet.setFormat(first,last);
tablet.setProperties("name,type");
tablet.setName(0,"Eerste");
#tablet.setRowBracket("|","|");

b1:= bat.new(:oid,:int);
bat.append(b1,42);
bat.append(b1,49);
b2:= bat.new(:oid,:str);
bat.append(b2,"hello world");
bat.append(b2,"goodbye world");

tablet.setProperties("name,type,dense,sorted,key,min,max");
tablet.display(b1,b2);

in:= calc.int(nil);
sn := calc.str(nil);
bat.append(b1,in);
bat.append(b2,sn);
tablet.setProperties(sn);
tablet.setDecimal(0,3,1);
tablet.setNull(1,"unknown");
tablet.display(b1,b2);

tablet.setTableBracket("<rowset>","</rowset>");
tablet.setRowBracket("<row>","</row>");
tablet.setBracket(0,"<age>","</age>");
tablet.setBracket(1,"<title>","</title>");
tablet.page(b1,b2);

#leftover typeing
#function someone(i:any...);
#print("good");
#end someone;
#someone(2,"strong");
#someone(2,"strong",true);
#someone(1,2);
#b:= new(void,int);