tst171.stable.out

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

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


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

# 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.
## Testing for nil values.
#    tv:= true;
#    print(tv);
#    fv:= false;
#    print(fv);
#    print("strings");
#    z := str("nil");
#    x := calc.isnil(z);
#    print(x);
#    y := calc.isnil("something");
#    print(y);
#    a := str(nil);
#    x := calc.isnil(a);
#    print(x);
#
#    print("integers");
#    i := int("nil");
#    x := calc.isnil(i);
#    print(x);
#    y := calc.isnil(0);
#    print(y);
#
#    print("floats");
#    f := flt(nil);
#    x := calc.isnil(f);
#    print(x);
#    x := calc.isnil(3.14);
#    print(x);
#
#    print("nil");
#    g:= nil;
#    x:= calc.isnil(g);
#    print(x);
#    x:= calc.isnotnil(g);
#    print(x);
#
function user.main():void;	# 0  (main:void)
# Testing for nil values. 	# 1  (_1:str)
    tv := true;	# 2  (tv:bit)<-(_3:bit)
    io.print(tv);	# 3 IOprint_val (_4:void)<-(tv:bit)
    fv := false;	# 4  (fv:bit)<-(_6:bit)
    io.print(fv);	# 5 IOprint_val (_7:void)<-(fv:bit)
    io.print("strings");	# 6 IOprint_val (_8:void)<-(_9:str)
    z := calc.str("nil");	# 7 CALCstr2str (z:str)<-(_11:str)
    x := calc.isnil(z);	# 8 CALCisnil_str (x:bit)<-(z:str)
    io.print(x);	# 9 IOprint_val (_13:void)<-(x:bit)
    y := calc.isnil("something");	# 10 CALCisnil_str (y:bit)<-(_15:str)
    io.print(y);	# 11 IOprint_val (_16:void)<-(y:bit)
    a := calc.str(nil:void);	# 12 CALCnil2str (a:str)<-(_18:void)
    x := calc.isnil(a);	# 13 CALCisnil_str (x:bit)<-(a:str)
    io.print(x);	# 14 IOprint_val (_19:void)<-(x:bit)
    io.print("integers");	# 15 IOprint_val (_20:void)<-(_21:str)
    i := calc.int("nil");	# 16 CALCstr2int (i:int)<-(_11:str)
    x := calc.isnil(i);	# 17 CALCisnil_int (x:bit)<-(i:int)
    io.print(x);	# 18 IOprint_val (_23:void)<-(x:bit)
    y := calc.isnil(0);	# 19 CALCisnil_int (y:bit)<-(_24:int)
    io.print(y);	# 20 IOprint_val (_25:void)<-(y:bit)
    io.print("floats");	# 21 IOprint_val (_26:void)<-(_27:str)
    f := calc.flt(nil:void);	# 22 CALCnil2flt (f:flt)<-(_18:void)
    x := calc.isnil(f);	# 23 CALCisnil_flt (x:bit)<-(f:flt)
    io.print(x);	# 24 IOprint_val (_29:void)<-(x:bit)
    x := calc.isnil(3.1400001);	# 25 CALCisnil_flt (x:bit)<-(_30:flt)
    io.print(x);	# 26 IOprint_val (_31:void)<-(x:bit)
    io.print("nil");	# 27 IOprint_val (_32:void)<-(_11:str)
    g := nil:void;	# 28  (g:void)<-(_18:void)
    x := calc.isnil(g);	# 29 CALCisnil_void (x:bit)<-(g:void)
    io.print(x);	# 30 IOprint_val (_34:void)<-(x:bit)
    x := calc.isnotnil(g);	# 31 CALCisnotnil_void (x:bit)<-(g:void)
    io.print(x);	# 32 IOprint_val (_35:void)<-(x:bit)
end main;	# 33  
[ true ]
[ false ]
[ "strings" ]
[ false ]
[ false ]
[ true ]
[ "integers" ]
[ true ]
[ false ]
[ "floats" ]
[ true ]
[ false ]
[ "nil" ]
[ true ]
[ false ]

# 07:59:14 >  
# 07:59:14 >  Done.
# 07:59:14 >