test_80.mils

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

setoid(oid(20000000));
# Testing key and set constraints ;
var b:= new(int,int);
b.key(true);
insert(b,1,2);
insert(b,2,2);
print(b);
insert(b,1,3);
print(b);
insert(b,2,4);
print(b);
var c:= new(int,int);
set(c,true);
insert(c,1,2);
insert(c,2,2);
print(c);
insert(c,1,2);
print(c);
insert(c,2,2);
print(c);
quit();