test_05.stable.out

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

stdout of test 'test_05` in directory 'tests/suite_00` itself:


# 00:12:27 >  
# 00:12:27 >  Mtimeout -timeout 60 Mserver "--config=/ufs/mk/monet5/src/mal/Tests/All.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/opensource/MonetDB/Linux/var/MonetDB5/dbfarm" --set "sql_logdir=/ufs/mk/opensource/MonetDB/Linux/var/MonetDB5/log" --set mapi_port=34380 --set sql_port=46008 --set xquery_port=58634 --set monet_prompt= --trace --dbname=mTests_tests_suite_00  test_05.mal </dev/null
# 00:12:27 >  

# Monet Database Server V4.99.19
# Copyright (c) 1993-2005, CWI. All rights reserved.
# Compiled for x86_64-redhat-linux-gnu/64bit with 32bit OIDs; dynamically linked.
# config:/ufs/mk/monet5/src/mal/Tests/All.conf
# dbfarm:/ufs/mk/opensource/MonetDB/Linux/var/MonetDB5/dbfarm
# dbname:mTests_tests_suite_00
# Visit http://monetdb.cwi.nl/ for further information.
## Monet Mil to Mal compiler
#include mil;
## Copyright (c) 2001-2004, CWI. All rights reserved.
#
##Predefined code segment
##The compiler can not guarantee an accurate compilation,
##because MIL unlike MAL is a dynamically typed language.
##A few guidelines to maximize usefullness.
##- make the type of variables explicit, in particular 'nil'
##- upon advice of M2m to remap identifiers, change it in your program directly
##use the "mil_schema" for additional support routines
#	mil.line("setoid(oid(20000000));");
#	aa_a := calc.oid(20000000);
#	ba_a := calc.setoid(aa_a);
#	mil.line("#test basic functionality of the BAT library.\n");
#	mil.line("#focussed on float\n");
#	mil.line("#it includes bat.insertions,deletions,selections, and joins.\n");
#	mil.line("print(3.147);");
#	ca_a := io.print(3.147);
#	mil.line("var b:= bbp.new(flt,flt);");
#	b := bbp.new(nil:flt,nil:flt);
#	mil.line("b.insert(1.2, 15.6);");
#	da_a := bat.insert(b,1.2,15.6);
#	mil.line("b.insert(2.3, 4.5);");
#	ea_a := bat.insert(b,2.3,4.5);
#	mil.line("b.insert(3.0, calc.flt(nil));");
#	fa_a := calc.flt(nil);
#	ga_a := bat.insert(b,3.0,fa_a);
#	mil.line("b.insert(4.5, 16.7);");
#	ha_a := bat.insert(b,4.5,16.7);
#	mil.line("b.insert(5.6, 25.6);");
#	ia_a := bat.insert(b,5.6,25.6);
#	mil.line("b.insert(6.6, 36.7);");
#	ja_a := bat.insert(b,6.6,36.7);
#	mil.line("b.insert(7.8, 49.0);");
#	ka_a := bat.insert(b,7.8,49.0);
#	mil.line("b.insert(8.9, 64.5);");
#	la_a := bat.insert(b,8.9,64.5);
#	mil.line("b.insert(9.0, calc.flt(nil));");
#	ma_a := calc.flt(nil);
#	na_a := bat.insert(b,9.0,ma_a);
#	mil.line("b.insert(flt(nil),flt(nil));");
#	oa_a := calc.flt(nil);
#	pa_a := calc.flt(nil);
#	qa_a := bat.insert(b,oa_a,pa_a);
#	mil.line("b.insert(flt(nil),81.2);");
#	ra_a := calc.flt(nil);
#	sa_a := bat.insert(b,ra_a,81.2);
#	mil.line("b.print();");
#	ta_a := io.print(b);
#	mil.line("# Testing simple retrievals\n");
#	ua_a := algebra.find(b,1.2);
#	va_a := io.print(ua_a);
#	mil.line("b.find(4.5).print();");
#	wa_a := algebra.find(b,4.5);
#	xa_a := io.print(wa_a);
#	mil.line("b.find(flt(nil)).print();");
#	ya_a := calc.flt(nil);
#	ab_a := algebra.find(b,ya_a);
#	bb_a := io.print(ab_a);
#	mil.line("# This should cause an error\n");
##ignore	cb_a := algebra.find(b,10.1);
##ignore	db_a := io.print(cb_a);
#	mil.line("# Can we delete them and re-insert them later on\n");
#	eb_a := bat.delete(b,4.5,16.7);
#	mil.line("b.delete(1.2, 15.6);");
#	fb_a := bat.delete(b,1.2,15.6);
#	mil.line("b.delete(flt(nil),81.2);");
#	gb_a := calc.flt(nil);
#	hb_a := bat.delete(b,gb_a,81.2);
#	mil.line("b.print();");
#	ib_a := io.print(b);
#	mil.line("b.insert(4.5, 16.7);");
#	jb_a := bat.insert(b,4.5,16.7);
#	mil.line("b.insert(1.2, 15.6);");
#	kb_a := bat.insert(b,1.2,15.6);
#	mil.line("b.insert(flt(nil),81.2);");
#	lb_a := calc.flt(nil);
#	mb_a := bat.insert(b,lb_a,81.2);
#	mil.line("b.count().print();");
#	nb_a := aggr.count(b);
#	ob_a := io.print(nb_a);
#	mil.line("# Lets cut out a few sections\n");
#	pb_a := algebra.select(b,25.6,64.5);
#	qb_a := io.print(pb_a);
#	mil.line("b.select(4.5,15.6).print();");
#	rb_a := algebra.select(b,4.5,15.6);
#	sb_a := io.print(rb_a);
#	mil.line("b.select(4.5,4.5).print();");
#	tb_a := algebra.select(b,4.5,4.5);
#	ub_a := io.print(tb_a);
#	mil.line("# This should cause an error\n");
#	vb_a := algebra.select(b,4.5,3.4);
#	wb_a := io.print(vb_a);
#	mil.line("b.select(81.2,flt(nil)).print();");
#	xb_a := calc.flt(nil);
#	yb_a := algebra.select(b,81.2,xb_a);
#	ac_a := io.print(yb_a);
#	mil.line("b.select(flt(nil),flt(nil)).print();");
#	bc_a := calc.flt(nil);
#	cc_a := calc.flt(nil);
#	dc_a := algebra.select(b,bc_a,cc_a);
#	ec_a := io.print(dc_a);
#	mil.line("# A 2-dimensional cut\n");
#	bn := algebra.fragment(b,1.2,5.6,4.5,15.6);
#	fc_a := io.print(bn);
#	mil.line("b.fragment(1.2,5.6,16.2,flt(nil)).print();");
#	gc_a := calc.flt(nil);
#	hc_a := algebra.fragment(b,1.2,5.6,16.2,gc_a);
#	ic_a := io.print(hc_a);
#	mil.line("b.fragment(1.2,flt(nil),16.2,flt(nil)).print();");
#	jc_a := calc.flt(nil);
#	kc_a := calc.flt(nil);
#	lc_a := algebra.fragment(b,1.2,jc_a,16.2,kc_a);
#	mc_a := io.print(lc_a);
#	mil.line("b.fragment(flt(nil),flt(nil),16.2,flt(nil)).print();");
#	nc_a := calc.flt(nil);
#	oc_a := calc.flt(nil);
#	pc_a := calc.flt(nil);
#	qc_a := algebra.fragment(b,nc_a,oc_a,16.2,pc_a);
#	rc_a := io.print(qc_a);
#	mil.line("var b1:= b.join(bn.reverse());");
#	sc_a := bat.reverse(bn);
#	b1 := algebra.join(b,sc_a);
#	mil.line("b1.print();");
#	tc_a := io.print(b1);
#	mil.line("var b2:= b.semijoin(b1);");
#	b2 := algebra.semijoin(b,b1);
#	mil.line("b2.print();");
#	uc_a := io.print(b2);
#	mil.line("# band join experiment\n");
#	c := algebra.copy(b);
#	mil.line("bandjoin(b,c,4.5,4.5).print();");
#	vc_a := algebra.bandjoin(b,c,4.5,4.5);
#	wc_a := io.print(vc_a);
#	mil.line("quit();");
#	xc_a := clients.quit();
#
function user.main():void;	# 0  (main:void)
# Monet Mil to Mal compiler 	# 1  (_1:str)
# Copyright (c) 2001-2004, CWI. All rights reserved. 	# 2  (_2:str)
#Predefined code segment 	# 3  (_3:str)
#The compiler can not guarantee an accurate compilation, 	# 4  (_4:str)
#because MIL unlike MAL is a dynamically typed language. 	# 5  (_5:str)
#A few guidelines to maximize usefullness. 	# 6  (_6:str)
#- make the type of variables explicit, in particular 'nil' 	# 7  (_7:str)
#- upon advice of M2m to remap identifiers, change it in your program directly 	# 8  (_8:str)
#use the "mil_schema" for additional support routines 	# 9  (_9:str)
#	io.print("setoid(oid(20000000));"); 	# 10  (_10:str)
    aa_a := calc.oid(20000000);	# 11 CALCint2oid (aa_a:oid)<-(_12:int)
    ba_a := calc.setoid(aa_a);	# 12 CALCsetoidInc (ba_a:oid)<-(aa_a:oid)
#	io.print("#test basic functionality of the BAT library.\n"); 	# 13  (_14:str)
#	io.print("#focussed on float\n"); 	# 14  (_15:str)
#	io.print("#it includes bat.insertions,deletions,selections, and joins.\n"); 	# 15  (_16:str)
#	io.print("print(3.147);"); 	# 16  (_17:str)
    ca_a := io.print(3.14700007);	# 17 IOprint_val (ca_a:void)<-(_19:flt)
#	io.print("var b:= bat.new(flt,flt);"); 	# 18  (_20:str)
    b := bat.new(nil:flt,nil:flt);	# 19 CMDBATnew (b:bat[:flt,:flt])<-(_22:flt)(_22:flt)
#	io.print("b.insert(1.2, 15.6);"); 	# 20  (_23:str)
    da_a := bat.insert(b,1.20000005,15.6000004);	# 21 BKCinsert_bun (da_a:void)<-(b:bat[:flt,:flt])(_25:flt)(_26:flt)
#	io.print("b.insert(2.3, 4.5);"); 	# 22  (_27:str)
    ea_a := bat.insert(b,2.29999995,4.5);	# 23 BKCinsert_bun (ea_a:void)<-(b:bat[:flt,:flt])(_29:flt)(_30:flt)
#	io.print("b.insert(3.0, calc.flt(nil));"); 	# 24  (_31:str)
    fa_a := calc.flt(nil:void);	# 25 CALCnil2flt (fa_a:flt)<-(_33:void)
    ga_a := bat.insert(b,3,fa_a);	# 26 BKCinsert_bun (ga_a:void)<-(b:bat[:flt,:flt])(_35:flt)(fa_a:flt)
#	io.print("b.insert(4.5, 16.7);"); 	# 27  (_36:str)
    ha_a := bat.insert(b,4.5,16.7000008);	# 28 BKCinsert_bun (ha_a:void)<-(b:bat[:flt,:flt])(_30:flt)(_38:flt)
#	io.print("b.insert(5.6, 25.6);"); 	# 29  (_39:str)
    ia_a := bat.insert(b,5.5999999,25.6000004);	# 30 BKCinsert_bun (ia_a:void)<-(b:bat[:flt,:flt])(_41:flt)(_42:flt)
#	io.print("b.insert(6.6, 36.7);"); 	# 31  (_43:str)
    ja_a := bat.insert(b,6.5999999,36.7000008);	# 32 BKCinsert_bun (ja_a:void)<-(b:bat[:flt,:flt])(_45:flt)(_46:flt)
#	io.print("b.insert(7.8, 49.0);"); 	# 33  (_47:str)
    ka_a := bat.insert(b,7.80000019,49);	# 34 BKCinsert_bun (ka_a:void)<-(b:bat[:flt,:flt])(_49:flt)(_50:flt)
#	io.print("b.insert(8.9, 64.5);"); 	# 35  (_51:str)
    la_a := bat.insert(b,8.89999962,64.5);	# 36 BKCinsert_bun (la_a:void)<-(b:bat[:flt,:flt])(_53:flt)(_54:flt)
#	io.print("b.insert(9.0, calc.flt(nil));"); 	# 37  (_55:str)
    ma_a := calc.flt(nil:void);	# 38 CALCnil2flt (ma_a:flt)<-(_33:void)
    na_a := bat.insert(b,9,ma_a);	# 39 BKCinsert_bun (na_a:void)<-(b:bat[:flt,:flt])(_58:flt)(ma_a:flt)
#	io.print("b.insert(flt(nil),flt(nil));"); 	# 40  (_59:str)
    oa_a := calc.flt(nil:void);	# 41 CALCnil2flt (oa_a:flt)<-(_33:void)
    pa_a := calc.flt(nil:void);	# 42 CALCnil2flt (pa_a:flt)<-(_33:void)
    qa_a := bat.insert(b,oa_a,pa_a);	# 43 BKCinsert_bun (qa_a:void)<-(b:bat[:flt,:flt])(oa_a:flt)(pa_a:flt)
#	io.print("b.insert(flt(nil),81.2);"); 	# 44  (_63:str)
    ra_a := calc.flt(nil:void);	# 45 CALCnil2flt (ra_a:flt)<-(_33:void)
    sa_a := bat.insert(b,ra_a,81.1999969);	# 46 BKCinsert_bun (sa_a:void)<-(b:bat[:flt,:flt])(ra_a:flt)(_66:flt)
#	io.print("b.print();"); 	# 47  (_67:str)
    ta_a := io.print(b);	# 48 IOprint_val (ta_a:void)<-(b:bat[:flt,:flt])
#	io.print("# Testing simple retrievals\n"); 	# 49  (_69:str)
    ua_a := algebra.find(b,1.20000005);	# 50 ALGfind (ua_a:flt)<-(b:bat[:flt,:flt])(_71:flt)
    va_a := io.print(ua_a);	# 51 IOprint_val (va_a:void)<-(ua_a:flt)
#	io.print("b.find(4.5).print();"); 	# 52  (_73:str)
    wa_a := algebra.find(b,4.5);	# 53 ALGfind (wa_a:flt)<-(b:bat[:flt,:flt])(_75:flt)
    xa_a := io.print(wa_a);	# 54 IOprint_val (xa_a:void)<-(wa_a:flt)
#	io.print("b.find(flt(nil)).print();"); 	# 55  (_77:str)
    ya_a := calc.flt(nil:void);	# 56 CALCnil2flt (ya_a:flt)<-(_79:void)
    ab_a := algebra.find(b,ya_a);	# 57 ALGfind (ab_a:flt)<-(b:bat[:flt,:flt])(ya_a:flt)
    bb_a := io.print(ab_a);	# 58 IOprint_val (bb_a:void)<-(ab_a:flt)
#	io.print("# This should cause an error\n"); 	# 59  (_82:str)
#ignore	cb_a := algebra.find(b,10.1); 	# 60  (_83:str)
#ignore	db_a := io.print(cb_a); 	# 61  (_84:str)
#	io.print("# Can we delete them and re-insert them later on\n"); 	# 62  (_85:str)
    eb_a := bat.delete(b,4.5,16.7000008);	# 63 BKCdelete_bun (eb_a:void)<-(b:bat[:flt,:flt])(_75:flt)(_87:flt)
#	io.print("b.delete(1.2, 15.6);"); 	# 64  (_88:str)
    fb_a := bat.delete(b,1.20000005,15.6000004);	# 65 BKCdelete_bun (fb_a:void)<-(b:bat[:flt,:flt])(_71:flt)(_90:flt)
#	io.print("b.delete(flt(nil),81.2);"); 	# 66  (_91:str)
    gb_a := calc.flt(nil:void);	# 67 CALCnil2flt (gb_a:flt)<-(_79:void)
    hb_a := bat.delete(b,gb_a,81.1999969);	# 68 BKCdelete_bun (hb_a:void)<-(b:bat[:flt,:flt])(gb_a:flt)(_66:flt)
#	io.print("b.print();"); 	# 69  (_67:str)
    ib_a := io.print(b);	# 70 IOprint_val (ib_a:void)<-(b:bat[:flt,:flt])
#	io.print("b.insert(4.5, 16.7);"); 	# 71  (_95:str)
    jb_a := bat.insert(b,4.5,16.7000008);	# 72 BKCinsert_bun (jb_a:void)<-(b:bat[:flt,:flt])(_75:flt)(_87:flt)
#	io.print("b.insert(1.2, 15.6);"); 	# 73  (_97:str)
    kb_a := bat.insert(b,1.20000005,15.6000004);	# 74 BKCinsert_bun (kb_a:void)<-(b:bat[:flt,:flt])(_71:flt)(_90:flt)
#	io.print("b.insert(flt(nil),81.2);"); 	# 75  (_63:str)
    lb_a := calc.flt(nil:void);	# 76 CALCnil2flt (lb_a:flt)<-(_79:void)
    mb_a := bat.insert(b,lb_a,81.1999969);	# 77 BKCinsert_bun (mb_a:void)<-(b:bat[:flt,:flt])(lb_a:flt)(_66:flt)
#	io.print("b.count().print();"); 	# 78  (_101:str)
    nb_a := aggr.count(b);	# 79 ALGcount_bat (nb_a:int)<-(b:bat[:flt,:flt])
    ob_a := io.print(nb_a);	# 80 IOprint_val (ob_a:void)<-(nb_a:int)
#	io.print("# Lets cut out a few sections\n"); 	# 81  (_104:str)
    pb_a := algebra.select(b,25.6000004,64.5);	# 82 ALGselect (pb_a:bat[:flt,:flt])<-(b:bat[:flt,:flt])(_106:flt)(_107:flt)
    qb_a := io.print(pb_a);	# 83 IOprint_val (qb_a:void)<-(pb_a:bat[:flt,:flt])