tst902.mal

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

# what is the overhead of MAL in multiplex situations
# using a BATloop !! This is 40x slower as the V4.3 multiplex implementation
b:= bat.new(:lng,:lng);
barrier (k,v):= language.newRange(0:lng);
	bat.insert(b,v,v);
	redo (k,v):= language.nextElement(1:lng,10:lng);
exit (k,v);

c:= algebra.copy(b);

d:= bat.new(:lng,:lng);
barrier (w,h,t):= bat.newIterator(b);
	B1:= algebra.find(b,h);
	B2:= algebra.find(c,h);
	t:= B1+B2;
	bat.insert(d,h,t);
	redo (w,h,t):= bat.hasMoreElements(b);
catch 	GDKerror:str;
exit	GDKerror;
exit w;
io.print(d);