tst201.stable.out

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

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


# 07:59:19 >  
# 07:59:19 >  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  tst201.mal </dev/null
# 07:59:19 >  

# 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.
## Mil compiler Version 1.0)
## Copyright (c) 1993-2001, CWI. All rights reserved.
#
## Predefined code segment
##use "mal/iterator";		CAUSES an ERROR!!
#	_v0:= oid(20000000);
#	_v1:= setoid(_v0);
##setoid(oid(20000000));
###test basic functionality of the BAT library.
###focussed on strings
###it includes insertions,deletions,selections, and joins.
##
#	_v2:= new(:str,:int);
#	b := _v2;
##b:= new(str,int);
#	_v3:= insert(b,"the",1);
##b.insert("the",1);
#	_v4:= insert(b,"quick",2);
##b.insert("quick",2);
#	_v5:= insert(b,"brown",3);
##b.insert("brown",3);
#	_v6:= insert(b,"fox",4);
##b.insert("fox",4);
#	_v7:= insert(b,"jumps",5);
##b.insert("jumps",5);
#	_v8:= insert(b,"over",6);
##b.insert("over",6);
#	_v9:= insert(b,"lazy",7);
##b.insert("lazy",7);
#	_v10:= insert(b,"dog",8);
##b.insert("dog",8);
#	_v11:= str(nil);
#	_v12:= insert(b,_v11,9);
##b.insert(str(nil),9);
#	_v13:= insert(b,".",10);
##b.insert(".",10);
#	_v14:= int(nil);
#	_v15:= insert(b,"",_v14);
##b.insert("",int(nil));
#	_v16:= str(nil);
#	_v17:= int(nil);
#	_v18:= insert(b,_v16,_v17);
##b.insert(str(nil),int(nil));
#	_v19:= print(b);
##b.print;
##
##
### Testing simple retrievals
#	_v20:= find(b,"the");
#	_v21:= print(_v20);
##b.find("the").print;
#	_v22:= find(b,"fox");
#	_v23:= print(_v22);
##b.find("fox").print;
#	_v24:= str(nil);
#	_v25:= find(b,_v24);
#	_v26:= print(_v25);
##b.find(str(nil)).print;
### This should cause an error
#	_v27:= find(b,"cat");
#	_v28:= print(_v27);
#catch MALException;
#	print(MALException);
#exit  MALException;
##b.find("cat").print;
##
### Can we delete them and re-insert them later on
#	_v29:= delete(b,"fox",4);
##b.delete("fox",4);
#	_v30:= delete(b,"the",1);
##b.delete("the",1);
#	_v31:= delete(b,".",10);
##b.delete(".",10);
#	_v32:= print(b);
##b.print;
##
#	_v33:= insert(b,"fox",4);
##b.insert("fox",4);
#	_v34:= insert(b,"the",1);
##b.insert("the",1);
#	_v35:= insert(b,".",10);
##b.insert(".",10);
#	_v36:= count(b);
#	_v37:= print(_v36);
##b.count.print;
##
### Lets cut out a few sections
#	_v38:= select(b,2,4);
#	_v39:= print(_v38);
##b.select(2,4).print;
#	_v40:= int(nil);
#	_v41:= select(b,7,_v40);
#	_v42:= print(_v41);
##b.select(7,int(nil)).print;
#	_v43:= int(nil);
#	_v44:= int(nil);
#	_v45:= select(b,_v43,_v44);
#	_v46:= print(_v45);
##b.select(int(nil),int(nil)).print;
##
### A 2-dimensional cut
#	_v47:= fragment(b,"fox","quick",1,5);
#	bns := _v47;
#	_v48:= print(bns);
##bns:=b.fragment("fox","quick",1,5);bns.print;
#	_v49:= str(nil);
#	_v50:= fragment(b,"fox",_v49,1,5);
#	_v51:= print(_v50);
##b.fragment("fox",str(nil),1,5).print;
#	_v52:= str(nil);
#	_v53:= int(nil);
#	_v54:= int(nil);
#	_v55:= fragment(b,"fox",_v52,_v53,_v54);
#	_v56:= print(_v55);
##b.fragment("fox",str(nil),int(nil),int(nil)).print;
#	_v57:= str(nil);
#	_v58:= int(nil);
#	_v59:= int(nil);
#	_v60:= fragment(b,_v57,"f",_v58,_v59);
#	_v61:= print(_v60);
##b.fragment(str(nil),"f",int(nil),int(nil)).print;
#	_v62:= reverse(b);
#	_v63:= int(nil);
#	_v64:= int(nil);
#	_v65:= str(nil);
#	_v66:= fragment(_v62,_v63,_v64,_v65,"f");
#	_v67:= print(_v66);
##b.reverse.fragment(int(nil),int(nil),str(nil),"f").print;
##
#	_v68:= reverse(bns);
#	_v69:= join(b,_v68);
#	bnj := _v69;
##bnj:= b.join(bns.reverse);
#	_v70:= print(bnj);
##bnj.print;
##
#	_v71:= reverse(bnj);
#	_v72:= semijoin(b,_v71);
#	bnk := _v72;
##bnk:= b.semijoin(bnj.reverse);
#	_v73:= print(bnk);
##bnk.print;
##
### testing the like command
#	_v74:= reverse(b);
#	_v75:= like(_v74,"ox");
#	_v76:= print(_v75);
##b.reverse.like("ox").print;
#	_v77:= reverse(b);
#	_v78:= like(_v77,"fo");
#	_v79:= print(_v78);
##b.reverse.like("fo").print;
#	_v80:= reverse(b);
#	_v81:= like(_v80,"fox");
#	_v82:= print(_v81);
##b.reverse.like("fox").print;
#	_v83:= reverse(b);
#	_v84:= like(_v83," fox");
#	_v85:= print(_v84);
##b.reverse.like(" fox").print;
##quit;
#
function user.main():void;	# 0  (main:void)
# Mil compiler Version 1.0) 	# 1  (_1:str)
# Copyright (c) 1993-2001, CWI. All rights reserved. 	# 2  (_2:str)
# Predefined code segment 	# 3  (_3:str)
#use "mal/iterator";		CAUSES an ERROR!! 	# 4  (_4:str)
    v0 := calc.oid(20000000);	# 5 CALCint2oid (v0:oid)<-(_6:int)
    v1 := calc.setoid(v0);	# 6 CALCsetoidInc (v1:oid)<-(v0:oid)
#setoid(oid(20000000)); 	# 7  (_8:str)
##test basic functionality of the BAT library. 	# 8  (_9:str)
##focussed on strings 	# 9  (_10:str)
##it includes bat.insertions,deletions,selections, and joins. 	# 10  (_11:str)
    v2 := bat.new(:str,:oid);	# 11 CMDBATnew (v2:bat[:str,:oid])<-(_13:str)(_14:oid)
    b := v2;	# 12  (b:bat[:str,:oid])<-(v2:bat[:str,:oid])
#b:= new(str,int); 	# 13  (_16:str)
    v3 := bat.insert(b,"the",1@0);	# 14 BKCinsert_bun (v3:void)<-(b:bat[:str,:oid])(_18:str)(_19:oid)
#b.insert("the",1); 	# 15  (_20:str)
    v4 := bat.insert(b,"quick",2@0);	# 16 BKCinsert_bun (v4:void)<-(b:bat[:str,:oid])(_22:str)(_23:oid)
#b.insert("quick",2); 	# 17  (_24:str)
    v5 := bat.insert(b,"brown",3@0);	# 18 BKCinsert_bun (v5:void)<-(b:bat[:str,:oid])(_26:str)(_27:oid)
#b.insert("brown",3); 	# 19  (_28:str)
    v6 := bat.insert(b,"fox",4@0);	# 20 BKCinsert_bun (v6:void)<-(b:bat[:str,:oid])(_30:str)(_31:oid)
#b.insert("fox",4); 	# 21  (_32:str)
    v7 := bat.insert(b,"jumps",5@0);	# 22 BKCinsert_bun (v7:void)<-(b:bat[:str,:oid])(_34:str)(_35:oid)
#b.insert("jumps",5); 	# 23  (_36:str)
    v8 := bat.insert(b,"over",6@0);	# 24 BKCinsert_bun (v8:void)<-(b:bat[:str,:oid])(_38:str)(_39:oid)
#b.insert("over",6); 	# 25  (_40:str)
    v9 := bat.insert(b,"lazy",7@0);	# 26 BKCinsert_bun (v9:void)<-(b:bat[:str,:oid])(_42:str)(_43:oid)
#b.insert("lazy",7); 	# 27  (_44:str)
    v10 := bat.insert(b,"dog",8@0);	# 28 BKCinsert_bun (v10:void)<-(b:bat[:str,:oid])(_46:str)(_47:oid)
#b.insert("dog",8); 	# 29  (_48:str)
    v11 := calc.str(nil:void);	# 30 CALCnil2str (v11:str)<-(_50:void)
    v12 := bat.insert(b,v11,9@0);	# 31 BKCinsert_bun (v12:void)<-(b:bat[:str,:oid])(v11:str)(_52:oid)
#b.insert(str(nil),9); 	# 32  (_53:str)
    v13 := bat.insert(b,".",10@0);	# 33 BKCinsert_bun (v13:void)<-(b:bat[:str,:oid])(_55:str)(_56:oid)
#b.insert(".",10); 	# 34  (_57:str)
    v14 := calc.oid(nil:void);	# 35 CALCnil2oid (v14:oid)<-(_50:void)
    v15 := bat.insert(b,"",v14);	# 36 BKCinsert_bun (v15:void)<-(b:bat[:str,:oid])(_60:str)(v14:oid)
#b.insert("",int(nil)); 	# 37  (_61:str)
    v16 := calc.str(nil:void);	# 38 CALCnil2str (v16:str)<-(_50:void)
    v17 := calc.oid(nil:void);	# 39 CALCnil2oid (v17:oid)<-(_50:void)
    v18 := bat.insert(b,v16,v17);	# 40 BKCinsert_bun (v18:void)<-(b:bat[:str,:oid])(v16:str)(v17:oid)
#b.insert(str(nil),int(nil)); 	# 41  (_65:str)
    v19 := io.print(b);	# 42 IOprint_val (v19:void)<-(b:bat[:str,:oid])
#b.print; 	# 43  (_67:str)
## Testing simple retrievals 	# 44  (_68:str)
    v20 := algebra.find(b,"the");	# 45 ALGfind (v20:oid)<-(b:bat[:str,:oid])(_70:str)
    v21 := io.print(v20);	# 46 IOprint_val (v21:void)<-(v20:oid)
#b.find("the").print; 	# 47  (_72:str)
    v22 := algebra.find(b,"fox");	# 48 ALGfind (v22:oid)<-(b:bat[:str,:oid])(_74:str)
    v23 := io.print(v22);	# 49 IOprint_val (v23:void)<-(v22:oid)
#b.find("fox").print; 	# 50  (_76:str)
    v24 := calc.str(nil:void);	# 51 CALCnil2str (v24:str)<-(_50:void)
    v25 := algebra.find(b,v24);	# 52 ALGfind (v25:oid)<-(b:bat[:str,:oid])(v24:str)
    v26 := io.print(v25);	# 53 IOprint_val (v26:void)<-(v25:oid)
#b.find(str(nil)).print; 	# 54  (_80:str)
## This should cause an error 	# 55  (_81:str)
    v27 := algebra.find(b,"cat");	# 56 ALGfind (v27:oid)<-(b:bat[:str,:oid])(_83:str)
    v28 := io.print(v27);	# 57 IOprint_val (v28:void)<-(v27:oid)
catch MALException:str ;	# 58  (MALException:str) jump 60
    io.print(MALException);	# 59 IOprint_val (_86:void)<-(MALException:str)
exit MALException:str ;	# 60  (MALException:str)
#b.find("cat").print; 	# 61  (_87:str)