bpt03.mal

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

#testing the BAT partition table
a1:= bat.new(:oid,:int);
bat.insert(a1,0@0,0);
a2:= bat.new(:oid,:int);
bat.insert(a2,10@0,0);
a3:= bat.new(:oid,:int);
bat.insert(a3,20@0,0);

barrier (go,i):= language.newRange(1);
	bat.append(a1,i);
	bat.append(a2,i);
	bat.append(a3,i);
	redo (go,i):= language.nextElement(1,10);
exit (go,i);

# now really add it
partitions.deposit(a1);
partitions.deposit(a1,a2);
partitions.deposit(a1,a3);
partitions.dump();

#retrieve a range
barrier (idx,b):= partitions.newIterator(a1,12@0,24@0);
	io.print(idx);
	io.print(b);
	redo (idx,b):= partitions.hasMoreElements(a1,12@0,24@0);
exit (idx,b);