tst051.stable.out

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

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


# 22:29:41 >  
# 22:29:41 >  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=34113 --set sql_port=49714 --set xquery_port=50869 --set monet_prompt= --trace "--config=/ufs/mk/monet5/src/mal/Tests/All.conf" --dbname=mTests_src_mal  tst051.mal < /dev/null
# 22:29:41 >  

# 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_src_mal
# Visit http://monetdb.cwi.nl/ for further information.
## testing string stuff
#s:= "hello world";
#
#t:= str.string(s,0,2);	io.print(t);
#t:= str.string(s,-4,2);	io.print(t);
#t:= str.string(s,0,15);	io.print(t);
#t:= str.string(nil:str,0,15);	io.print(t);
#
#t:= str.string(s,5);	io.print(t);
#t:= str.prefix(s,4);	io.print(t);
#t:= str.suffix(s,4);	io.print(t);
#
#i:= str.locate(s,"hello"); io.print(i);
#i:= str.locate(s,"xyz"); io.print(i);
#i:= str.locate(s,nil:str); io.print(i);
#i:= str.locate(nil:str,"hello"); io.print(i);
#i:= str.locate(nil:str,"xyz"); io.print(i);
#i:= str.locate(nil:str,nil:str); io.print(i);
#
#t:= str.repeat("abc",3);	io.print(t);
#t:= str.repeat(nil:str,3);	io.print(t);
#
#t:= str.insert("hello world",5,1,"brave new "); io.print(t);
#t:= str.insert("",5,1,"brave new "); io.print(t);
#t:= str.insert(nil:str,5,1,"brave new "); io.print(t);
#t:= str.insert("",5,1,"brave new "); io.print(t);
#t:= str.insert("",0,1,"brave new "); io.print(t);
#t:= str.insert("hello world",5,1,""); io.print(t);
#t:= str.insert("hello world",5,1,nil:str); io.print(t);
#
#t:= str.replace("hello world","world","brave new world"); io.print(t);
#
#
function user.main():void;	# 0  (main:void)
# testing string stuff 	# 1  (_1:str)
    s := "hello world";	# 2  (s:str)<-(_3:str)
    t := str.string(s,0,2);	# 3 STRSubString (t:str)<-(s:str)(_5:int)(_6:int)
    io.print(t);	# 4 IOprint_val (_7:void)<-(t:str)
    t := str.string(s,-4,2);	# 5 STRSubString (t:str)<-(s:str)(_8:int)(_6:int)
    io.print(t);	# 6 IOprint_val (_9:void)<-(t:str)
    t := str.string(s,0,15);	# 7 STRSubString (t:str)<-(s:str)(_5:int)(_10:int)
    io.print(t);	# 8 IOprint_val (_11:void)<-(t:str)
    t := str.string(nil:str,0,15);	# 9 STRSubString (t:str)<-(_12:str)(_5:int)(_10:int)
    io.print(t);	# 10 IOprint_val (_13:void)<-(t:str)
    t := str.string(s,5);	# 11 STRTail (t:str)<-(s:str)(_14:int)
    io.print(t);	# 12 IOprint_val (_15:void)<-(t:str)
    t := str.prefix(s,4);	# 13 STRprefix (t:str)<-(s:str)(_16:int)
    io.print(t);	# 14 IOprint_val (_17:void)<-(t:str)
    t := str.suffix(s,4);	# 15 STRsuffix (t:str)<-(s:str)(_16:int)
    io.print(t);	# 16 IOprint_val (_18:void)<-(t:str)
    i := str.locate(s,"hello");	# 17 STRlocate (i:int)<-(s:str)(_20:str)
    io.print(i);	# 18 IOprint_val (_21:void)<-(i:int)
    i := str.locate(s,"xyz");	# 19 STRlocate (i:int)<-(s:str)(_22:str)
    io.print(i);	# 20 IOprint_val (_23:void)<-(i:int)
    i := str.locate(s,nil:str);	# 21 STRlocate (i:int)<-(s:str)(_12:str)
    io.print(i);	# 22 IOprint_val (_24:void)<-(i:int)
    i := str.locate(nil:str,"hello");	# 23 STRlocate (i:int)<-(_12:str)(_20:str)
    io.print(i);	# 24 IOprint_val (_25:void)<-(i:int)
    i := str.locate(nil:str,"xyz");	# 25 STRlocate (i:int)<-(_12:str)(_22:str)
    io.print(i);	# 26 IOprint_val (_26:void)<-(i:int)
    i := str.locate(nil:str,nil:str);	# 27 STRlocate (i:int)<-(_12:str)(_12:str)
    io.print(i);	# 28 IOprint_val (_27:void)<-(i:int)
    t := str.repeat("abc",3);	# 29 STRrepeat (t:str)<-(_28:str)(_29:int)
    io.print(t);	# 30 IOprint_val (_30:void)<-(t:str)
    t := str.repeat(nil:str,3);	# 31 STRrepeat (t:str)<-(_12:str)(_29:int)
    io.print(t);	# 32 IOprint_val (_31:void)<-(t:str)
    t := str.insert("hello world",5,1,"brave new ");	# 33 STRinsert (t:str)<-(_3:str)(_14:int)(_32:int)(_33:str)
    io.print(t);	# 34 IOprint_val (_34:void)<-(t:str)
    t := str.insert("",5,1,"brave new ");	# 35 STRinsert (t:str)<-(_35:str)(_14:int)(_32:int)(_33:str)
    io.print(t);	# 36 IOprint_val (_36:void)<-(t:str)
    t := str.insert(nil:str,5,1,"brave new ");	# 37 STRinsert (t:str)<-(_12:str)(_14:int)(_32:int)(_33:str)
    io.print(t);	# 38 IOprint_val (_37:void)<-(t:str)
    t := str.insert("",5,1,"brave new ");	# 39 STRinsert (t:str)<-(_35:str)(_14:int)(_32:int)(_33:str)
    io.print(t);	# 40 IOprint_val (_38:void)<-(t:str)
    t := str.insert("",0,1,"brave new ");	# 41 STRinsert (t:str)<-(_35:str)(_5:int)(_32:int)(_33:str)
    io.print(t);	# 42 IOprint_val (_39:void)<-(t:str)
    t := str.insert("hello world",5,1,"");	# 43 STRinsert (t:str)<-(_40:str)(_14:int)(_32:int)(_35:str)
    io.print(t);	# 44 IOprint_val (_41:void)<-(t:str)
    t := str.insert("hello world",5,1,nil:str);	# 45 STRinsert (t:str)<-(_40:str)(_14:int)(_32:int)(_12:str)
    io.print(t);	# 46 IOprint_val (_42:void)<-(t:str)
    t := str.replace("hello world","world","brave new world");	# 47 STRreplace (t:str)<-(_40:str)(_43:str)(_44:str)
    io.print(t);	# 48 IOprint_val (_45:void)<-(t:str)
end main;	# 49  
[ "he" ]
[ "or" ]
[ "hello world" ]
[ nil ]
[ " world" ]
[ "hell" ]
[ "orld" ]
[ 0 ]
[ 0 ]
[ 0 ]
[ 0 ]
[ 0 ]
[ 0 ]
[ "abcabcabc" ]
[ nil ]
[ "hellobrave new world" ]
[ "brave new " ]
[ nil ]
[ "brave new " ]
[ "brave new " ]
[ "helloworld" ]
[ nil ]
[ "hello brave new world" ]

# 22:29:41 >  
# 22:29:41 >  Done.
# 22:29:41 >