no.037.stable.out

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

stdout of test 'no.037` in directory 'tests/BugReports` itself:

#> Mtest:	milS no.037 milS
#> Mtest:	Mtimeout -timeout 210 Mserver -modulesilent -yaccsilent -d8 -db tests_BugReports -single no.037.milS
# Monet Database Server V4.1
# Copyright (c) 1993-1999, CWI & SION. All rights reserved.
# compiled for IRIX646.5/32bit on Fri Jan 14 19:36:03 MET 2000.
#script:no.037.milS


# Monet Database Server V4.7.3
# Copyright (c) 1993-2005, CWI. All rights reserved.
# Compiled for i686-redhat-linux-gnu/32bit; dynamically linked.
# config:/ufs/mk/monet5/src/mal/Tests/All.conf
# dbfarm:/ufs/mk/opensource/MonetDB/Linux/var/MonetDB5/dbfarm
# dbname:mTests_tests_BugReports
# Visit http://monetdb.cwi.nl/ for further information.
## Monet Mil to Mal compiler
#include mil;
#include mil_scenario;
#include mil_system_procs;
## Copyright (c) 2001-2004, CWI. All rights reserved.
# 
# >Description:
# "mem" is not properly handled (like  "cpu")
# 
function user.main():int;	# 0  (main:int)
# Copyright (c) 2001-2004, CWI. All rights reserved. 	# 1  (_32:str)
#Predefined code segment 	# 2  (_34:str)
#The compiler can not guarantee an accurate compilation, 	# 3  (_36:str)
#because MIL unlike MAL is a dynamically typed language. 	# 4  (_38:str)
#A few guidelines to maximize usefullness. 	# 5  (_40:str)
#- make the type of variables explicit, in particular 'nil' 	# 6  (_42:str)
#- upon advice of M2m to remap identifiers, change it in your program directly 	# 7  (_44:str)
#use the "mil_schema" for additional support routines 	# 8  (_46:str)
    mil.line("# >Number:         37\n");	# 9 MILline (_47:void)<-(_48:str)
    mil.line("# >Category:       Mserver\n");	# 10 MILline (_49:void)<-(_50:str)
    mil.line("# >Synopsis:       built-in bats\n");	# 11 MILline (_51:void)<-(_52:str)
    mil.line("# >Confidential:   no\n");	# 12 MILline (_53:void)<-(_54:str)
    mil.line("# >Severity:       serious\n");	# 13 MILline (_55:void)<-(_56:str)
    mil.line("# >Priority:       high\n");	# 14 MILline (_57:void)<-(_58:str)
    mil.line("# >Responsible:    mk\n");	# 15 MILline (_59:void)<-(_60:str)
    mil.line("# >State:          feedback\n");	# 16 MILline (_61:void)<-(_62:str)
    mil.line("# >Class:          sw-bug\n");	# 17 MILline (_63:void)<-(_64:str)
    mil.line("# >Submitter-Id:   unknown\n");	# 18 MILline (_65:void)<-(_66:str)
    mil.line("# >Arrival-Date:   Tue Oct  7 17:45:11 1997\n");	# 19 MILline (_67:void)<-(_68:str)
    mil.line("# >Originator:     mk\n");	# 20 MILline (_69:void)<-(_70:str)
    mil.line("# >Organization:\n");	# 21 MILline (_71:void)<-(_72:str)
    mil.line("# >Release:        970101\n");	# 22 MILline (_73:void)<-(_74:str)
    mil.line("# >Environment:\n");	# 23 MILline (_75:void)<-(_76:str)
    mil.line("# \n");	# 24 MILline (_77:void)<-(_78:str)
    mil.line("# >Description:\n");	# 25 MILline (_79:void)<-(_80:str)
    mil.line("# \"mem\" is not properly handled (like  \"cpu\")\n");	# 26 MILline (_81:void)<-(_82:str)
    mil.line("# \n");	# 27 MILline (_83:void)<-(_78:str)
    mil.line("# >ls;\n");	# 28 MILline (_84:void)<-(_85:str)
    mil.line("# #---------------------------------------------------------#\n");	# 29 MILline (_86:void)<-(_87:str)
    mil.line("# # name          | heat  | status| group | role            #\n");	# 30 MILline (_88:void)<-(_89:str)
    mil.line("# #---------------------------------------------------------#\n");	# 31 MILline (_90:void)<-(_87:str)
    mil.line("# [ \"car_age\",      0,      \"disk\", \"h\",    \"t\"             ]\n");	# 32 MILline (_91:void)<-(_92:str)
    mil.line("# [ \"car_gender\",   0,      \"disk\", \"h\",    \"t\"             ]\n");	# 33 MILline (_93:void)<-(_94:str)
    mil.line("# [ \"car_price\",    0,      \"disk\", \"h\",    \"t\"             ]\n");	# 34 MILline (_95:void)<-(_96:str)
    mil.line("# [ \"car_category\", 0,      \"disk\", \"h\",    \"t\"             ]\n");	# 35 MILline (_97:void)<-(_98:str)
    mil.line("# [ \"car_city\",     0,      \"disk\", \"h\",    \"t\"             ]\n");	# 36 MILline (_99:void)<-(_100:str)
    mil.line("# [ \"car_damage\",   0,      \"disk\", \"h\",    \"t\"             ]\n");	# 37 MILline (_101:void)<-(_102:str)
    mil.line("# [ \"a_b\",          0,      \"disk\", \"h\",    \"t\"             ]\n");	# 38 MILline (_103:void)<-(_104:str)
    mil.line("# [ \"telephone\",    0,      \"disk\", \"h\",    \"t\"             ]\n");	# 39 MILline (_105:void)<-(_106:str)
    mil.line("# [ \"p_name\",       0,      \"disk\", \"h\",    \"t\"             ]\n");	# 40 MILline (_107:void)<-(_108:str)
    mil.line("# [ \"p_gender\",     0,      \"disk\", \"h\",    \"t\"             ]\n");	# 41 MILline (_109:void)<-(_110:str)
    mil.line("# [ \"p_age\",        0,      \"disk\", \"h\",    \"t\"             ]\n");	# 42 MILline (_111:void)<-(_112:str)
    mil.line("# [ \"p_city\",       0,      \"disk\", \"h\",    \"t\"             ]\n");	# 43 MILline (_113:void)<-(_114:str)
    mil.line("# [ \"p_kind\",       0,      \"disk\", \"h\",    \"t\"             ]\n");	# 44 MILline (_115:void)<-(_116:str)
    mil.line("# [ \"mem\",          0,      \"disk\", \"h\",    \"t\"             ]\n");	# 45 MILline (_117:void)<-(_118:str)
    mil.line("# [ \"io\",           0,      \"disk\", \"h\",    \"t\"             ]\n");	# 46 MILline (_119:void)<-(_120:str)
    mil.line("# [ \"cpu\",          0,      \"disk\", \"h\",    \"t\"             ]\n");	# 47 MILline (_121:void)<-(_122:str)
    mil.line("# >mem.print;\n");	# 48 MILline (_123:void)<-(_124:str)
    mil.line("# !ERROR: atom 'monet_Mallinfo' unknown, in BAT 'mem'.!ERROR: BATprintf: BAT expected\n");	# 49 MILline (_125:void)<-(_126:str)
    mil.line("ls();");	# 50 MILline (_127:void)<-(_128:str)
    aa_a := mil_sys_procs.ls();	# 51  (aa_a:void)
    mil.line("mem.print();");	# 52 MILline (_130:void)<-(_131:str)
    mil.line("printf(\"#~BeginVariableOutput~#\\n\"); memory().print(); bat.printf(\"#~EndVariableOutput~#\\n\");");	# 53 MILline (_132:void)<-(_133:str)
    ca_a := io.printf("#~BeginVariableOutput~#\n");	# 54 IOprint_str (ca_a:int)<-(_135:str)
    da_a := status.memStatistics();	# 55 SYSmemStatistics (da_a:bat[:str,:int])
    ea_a := io.print(da_a);	# 56 IOprint_val (ea_a:int)<-(da_a:bat[:str,:int])
    fa_a := io.printf("#~EndVariableOutput~#\n");	# 57 IOprint_str (fa_a:int)<-(_139:str)
    mil.line("quit();");	# 58 MILline (_140:void)<-(_141:str)
    ga_a := clients.quit();	# 59 CLTquit (ga_a:void)
#Identifer 'memory' mapped to 'status.memStatistics' 	# 60  ($144:str)
end main;	# 61  
## >Number:         37\n
## >Category:       Mserver\n
## >Synopsis:       built-in bats\n
## >Confidential:   no\n
## >Severity:       serious\n
## >Priority:       high\n
## >Responsible:    mk\n
## >State:          feedback\n
## >Class:          sw-bug\n
## >Submitter-Id:   unknown\n
## >Arrival-Date:   Tue Oct  7 17:45:11 1997\n
## >Originator:     mk\n
## >Organization:\n
## >Release:        970101\n
## >Environment:\n
## \n
## >Description:\n
## \"mem\" is not properly handled (like  \"cpu\")\n
## \n
## >ls;\n
## #---------------------------------------------------------#\n
## # name          | heat  | status| group | role            #\n
## #---------------------------------------------------------#\n
## [ \"car_age\",      0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"car_gender\",   0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"car_price\",    0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"car_category\", 0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"car_city\",     0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"car_damage\",   0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"a_b\",          0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"telephone\",    0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"p_name\",       0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"p_gender\",     0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"p_age\",        0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"p_city\",       0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"p_kind\",       0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"mem\",          0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"io\",           0,      \"disk\", \"h\",    \"t\"             ]\n
## [ \"cpu\",          0,      \"disk\", \"h\",    \"t\"             ]\n
## >mem.print;\n
## !ERROR: atom 'monet_Mallinfo' unknown, in BAT 'mem'.!ERROR: BATprintf: BAT expected\n
#ls();
#---------------------------------------------------------------------------------------------------------#
# tmp_29	tmp_30	tmp_31	tmp_32	heat	dirty		status	kind		refcnt	lrefcnt		  # name
# str	str	str	lng	int	str		str	str		int	int		  # type
#---------------------------------------------------------------------------------------------------------#
#mem.print();
#printf(\"#~BeginVariableOutput~#\\n\"); memory().print(); printf(\"#~EndVariableOutput~#\\n\");
#~BeginVariableOutput~#
#---------------------------------#
# gdk		mem		  # name
# str		int		  # type
#---------------------------------#
[ "arena",	  3379200	  ]
[ "ordblks",	  36		  ]
[ "smblks",	  96		  ]
[ "hblkhd",	  0		  ]
[ "hblks",	  0		  ]
[ "usmblks",	  0		  ]
[ "fsmblks",	  3616		  ]
[ "uordblks",	  3229200	  ]
[ "fordblks",	  150000	  ]
#~EndVariableOutput~#
#quit();

# 17:06:48 >  
# 17:06:48 >  Done.
# 17:06:48 >