tst280.mal

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

function pow(i:int,j:int):int;
	z:= i+j;
	io.printf("result %d\n",z);
	return z;
end pow;
function tst(A2:bat[:oid,:int],A3:bat[:oid,:int]):bat[:oid,:int]; 
	io.print(A2);
	resB := bat.new(:oid,:int); 
	lim:= aggr.count(A2);
	io.printf("count %d\n",lim);
	l:= calc.lng(lim);
barrier (mloop,m):=language.newRange(0:lng);
	io.printf("loopindex %d\n",m);
        B2 := algebra.fetch(A2,m);       
	io.printf("B2 value %d\n",B2);
        B3 := algebra.fetch(A3,m);       
	io.printf("B3 value %d\n",B3);
        cr := user.pow(B2,B3);
        bat.append(resB,cr); 
        redo (mloop,m) :=language.nextElement(1:lng,l);    
catch   MALException:str;  
exit    MALException; 
exit    (mloop,m) ;  
        return resB;    
end tst;   

	b := bat.new(:oid,:int);
	bat.append(b,1);
	bat.append(b,2);
	e:= algebra.fetch(b,1:lng);
	io.print(e);
	io.print(b);
	c:= algebra.copy(b);
	z:= user.tst(b,c);
	io.print(z);