test_10.mils

来自「一个内存数据库的源代码这是服务器端还有客户端」· MILS 代码 · 共 21 行

setoid(oid(20000000));
# Sorting activities
# left->right shift + left boundary;
var s:=new(int,int);
insert(s,5,5);insert(s,3,3);insert(s,4,2);insert(s,2,1);
insert(s,1,1);insert(s,4,2); insert(s,4,3);
printf("#~BeginVariableOutput~#\n");
sort(s).print();
printf("#~EndVariableOutput~#\n");
sort_ht(s).print();

# right->left shift + right boundary;
s:=new(int,int);
insert(s,2,1);insert(s,4,1); insert(s,3,1); insert(s,5,1);
insert(s,6,1);insert(s,4,2);insert(s,1,1);
printf("#~BeginVariableOutput~#\n");
sort(s).print();
printf("#~EndVariableOutput~#\n");
sort_ht(s).print();
quit();