tst905.stable.out

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

stdout of test 'tst905` in directory 'src/mal` itself:


# 08:01:37 >  
# 08:01:37 >  Mtimeout -timeout 60 Mserver "--config=/ufs/mk/monet5/Linux/etc/MonetDB5.conf" --debug=10 --set "monet_mod_path=/ufs/mk/monet5/Linux/lib/MonetDB5:/ufs/mk/opensource/MonetDB/Linux/lib/MonetDB" --set "gdk_dbfarm=/ufs/mk/monet5/Linux/var/MonetDB5/dbfarm" --set "sql_logdir=/ufs/mk/monet5/Linux/var/MonetDB5/log" --set mapi_port=42158 --set sql_port=55708 --set monet_prompt= --trace "--config=/ufs/mk/monet5/src/mal/Tests/All.conf" --dbname=mTests_src_mal  tst905.mal </dev/null
# 08:01:37 >  

# Monet Database Server V4.99.19
# Copyright (c) 1993-2004, CWI. All rights reserved.
# Compiled for i686-redhat-linux-gnu/32bit; dynamically linked.
# config:/ufs/mk/monet5/Linux/etc/MonetDB5.conf
# dbfarm:/ufs/mk/monet5/Linux/var/MonetDB5/dbfarm
# dbname:mTests_src_mal
# Visit http://monetdb.cwi.nl/ for further information.
## the multiplex code blocks.
#
#b:= new(:lng,:lng);
#barrier (v,i):= newRange(0:lng);
#	insert(b,i,i);
#	redo (v,i):= nextElement(1:lng,10:lng);
#exit (v,i);
#
function user.main():void;	# 0  (main:void)
# the multiplex code blocks. 	# 1  (_1:str)
    b := bat.new(:lng,:lng);	# 2 CMDBATnew (b:bat[:lng,:lng])<-(_3:lng)(_3:lng)
barrier (v,i):= language.newRange(0:lng);	# 3 RNGnewRange_lng (v:bit)(i:lng)<-(_6:lng) jump 6
    bat.insert(b,i,i);	# 4 BKCinsert_bun (_7:void)<-(b:bat[:lng,:lng])(i:lng)(i:lng)
    redo (v,i):= language.nextElement(1:lng,10:lng);	# 5 RNGnextElement_lng (v:bit)(i:lng)<-(_8:lng)(_9:lng) jump 4
exit (v,i);	# 6  (v:bit)(i:lng)
    c := algebra.copy(b);	# 7 ALGcopy (c:bat[:lng,:lng])<-(b:bat[:lng,:lng])
    _15 := bat.new(nil:lng,nil:lng);	# 8 CMDBATnew (_15:bat[:lng,:lng])<-(_16:lng)(_16:lng)
barrier (_18,_19,_20):= bat.newIterator(b);	# 9 CHPbunIterator (_18:lng)(_19:lng)(_20:lng)<-(b:bat[:lng,:lng]) jump 17
    _22 := algebra.find(c,_19);	# 10 ALGfind (_22:lng)<-(c:bat[:lng,:lng])(_19:lng)
    _24 := calc.+(_20,_22);	# 11 CALCbinaryADDlnglng (_24:lng)<-(_20:lng)(_22:lng)
    bat.insert(_15,_19,_24);	# 12 BKCinsert_bun (_25:void)<-(_15:bat[:lng,:lng])(_19:lng)(_24:lng)
    redo (_18,_19,_20):= bat.hasMoreElements(b);	# 13 CHPbunHasMoreElements (_18:lng)(_19:lng)(_20:lng)<-(b:bat[:lng,:lng]) jump 10
catch MALException:str ;	# 14  (MALException:str) jump 16
    redo (_18,_19,_20):= bat.hasMoreElements(b);	# 15 CHPbunHasMoreElements (_18:lng)(_19:lng)(_20:lng)<-(b:bat[:lng,:lng]) jump 10
exit MALException:str ;	# 16  (MALException:str)
exit (_18,_19,_20);	# 17  (_18:lng)(_19:lng)(_20:lng)
    x:bat[:lng,:lng]  := _15;	# 18  (x:bat[:lng,:lng])<-(_15:bat[:lng,:lng])
    io.print(x);	# 19 IOprint_val (_14:void)<-(x:bat[:lng,:lng])
end main;	# 20  
#-----------------#
# h	tmp_6	  # name
# lng	lng	  # type
#-----------------#
[ 0,	  0	  ]
[ 1,	  2	  ]
[ 2,	  4	  ]
[ 3,	  6	  ]
[ 4,	  8	  ]
[ 5,	  10	  ]
[ 6,	  12	  ]
[ 7,	  14	  ]
[ 8,	  16	  ]
[ 9,	  18	  ]

# 08:01:37 >  
# 08:01:37 >  Done.
# 08:01:37 >