inspect00.stable.out

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

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


# 00:03:55 >  
# 00:03:55 >  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=33330 --set sql_port=49911 --set xquery_port=56575 --set monet_prompt= --trace --dbname=mTests_src_modules_mal  inspect00.mal </dev/null
# 00:03:55 >  

# 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_modules_mal
# Visit http://monetdb.cwi.nl/ for further information.
## test analysis of stack frames
#
#function tst():void;
#	i:= mdb.getStackDepth();
#	io.printf("stack depth %d\n",i);
#	t:= mdb.getStackTrace();
#	io.print(t);
#	b0:= mdb.getStackFrame(0);
#	io.print(b0);
#	b1:= mdb.getStackFrame(1);
#	io.print(b1);
#	# next one is illegal
#	b1:= mdb.getStackFrame(2);
#end tst;
function user.tst():void;	# 0  (tst:void)
    i := mdb.getStackDepth();	# 1 MDBStkDepth (i:int)
    io.printf("stack depth %d\n",i);	# 2 IOprint_formatted_int (_2:void)<-(_3:str)(i:int)
    t := mdb.getStackTrace();	# 3 MDBStkTrace (t:bat[:void,:str])
    io.print(t);	# 4 IOprint_val (_5:void)<-(t:bat[:void,:str])
    b0 := mdb.getStackFrame(0);	# 5 MDBgetStackFrameN (b0:bat[:str,:str])<-(_7:int)
    io.print(b0);	# 6 IOprint_val (_8:void)<-(b0:bat[:str,:str])
    b1 := mdb.getStackFrame(1);	# 7 MDBgetStackFrameN (b1:bat[:str,:str])<-(_10:int)
    io.print(b1);	# 8 IOprint_val (_11:void)<-(b1:bat[:str,:str])
# next one is illegal 	# 9  (_12:str)
    b1 := mdb.getStackFrame(2);	# 10 MDBgetStackFrameN (b1:bat[:str,:str])<-(_13:int)
end tst;	# 11  
#
#user.tst();
#
function user.main():void;	# 0  (main:void)
# test analysis of stack frames 	# 1  (_1:str)
    user.tst();	# 2  (_2:void)
end main;	# 3  
stack depth 2
#---------------------------------------------------------#
# view	stk						  # name
# int	str						  # type
#---------------------------------------------------------#
[ 0,	  "t := mdb.getStackTrace() at user.tst[3]"	  ]
[ 1,	  "user.tst() at user.main[2]"			  ]
#-----------------------------------------#
# view	stk				  # name
# str	str				  # type
#-----------------------------------------#
[ "tst",  "0@0"				  ]
[ "i",	  "2"				  ]
[ "_2",	  "0@0"				  ]
[ "_3",	  "\"stack depth %d\\n\""	  ]
[ "t",	  "<view_stk_trace>"		  ]
[ "_5",	  "0@0"				  ]
[ "b0",	  "<view_stk_frame>"		  ]
[ "_7",	  "0"				  ]
[ "_8",	  "0@0"				  ]
[ "b1",	  "nil"				  ]
[ "_10",  "1"				  ]
[ "_11",  "0@0"				  ]
[ "_12",  "nil"				  ]
[ "_13",  "2"				  ]
#-----------------#
# view	stk	  # name
# str	str	  # type
#-----------------#
[ "tst",  "0@0"	  ]
[ "i",	  "nil"	  ]
[ "_2",	  "0@0"	  ]
!MALException:mdb.getStackFrame:Illegal depth.

# 09:13:25 >  
# 09:13:25 >  Done.
# 09:13:25 >