tst901c.mal

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

# what is the overhead of MAL in multiplex situations
profiler.setFilter("*","*");
b:= bat.new(:lng,:lng);
t0:= alarm.usec();
t0:= alarm.usec();
barrier (v,i):= mal.newRange(0:lng);
	bat.insert(b,i,i);
	redo (v,i):= mal.nextElement(1:lng,1000000:lng);
end (v,i);
t1:= alarm.usec();
c:= algebra.copy(b);
t2:= alarm.usec();
x:= batcalc.:+=(b,b,c);
t3:= alarm.usec();
d1:= t1-t0;
d2:= t3-t2;
xc:=count(x);
printf("count %d\n",xc);
printf("make %d \n",d1);
printf("multiplex %d\n",d2);