Update of /cvsroot/monetdb/MonetDB5/src/modules/atoms/Tests
In directory
sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv31571/src/modules/atoms/Tests
Modified Files:
color.stable.out inet01.stable.out inet02.stable.out
inet03.stable.out time00.stable.out xml100.stable.out
Log Message:
The output of the instructions is cleaned up.
Amongst others, the properties of instructions are also displayed.
U = types not yet resolved
P = polymorphic instruction
G = subject to garbage control
R = subject to recycler control
J = jump towards other statement
A few tests are not handled yet.
Index: inet03.stable.out
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/modules/atoms/Tests/inet03.stable.out,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- inet03.stable.out 3 Dec 2006 22:43:13 -0000 1.8
+++ inet03.stable.out 15 Mar 2008 19:36:37 -0000 1.9
@@ -78,49 +78,49 @@
#i20 := inet.abbrev(i3);
#io.print(i20);
#
-function user.main():void; # 0 (main:void)
-# these tests are from the PostgreSQL documentation examples # 1 (_1:str)
-# function tests # 2 (_2:str)
- i1 := inet.new("192.168.1.5/24"); # 3 INETnew (i1:inet)<-(_4:str)
- io.print(i1); # 4 IOprint_val (_5:void)<-(i1:inet)
- i2 := inet.broadcast(i1); # 5 INETbroadcast (i2:inet)<-(i1:inet)
- io.print(i2); # 6 IOprint_val (_7:void)<-(i2:inet)
- i3 := inet.new("192.168.0.1/25"); # 7 INETnew (i3:inet)<-(_9:str)
- io.print(i3); # 8 IOprint_val (_10:void)<-(i3:inet)
- i4 := inet.broadcast(i3); # 9 INETbroadcast (i4:inet)<-(i3:inet)
- io.print(i4); # 10 IOprint_val (_12:void)<-(i4:inet)
- i5 := inet.host(i1); # 11 INEThost (i5:str)<-(i1:inet)
- io.print(i5); # 12 IOprint_val (_14:void)<-(i5:str)
- i6 := inet.masklen(i1); # 13 INETmasklen (i6:int)<-(i1:inet)
- io.print(i6); # 14 IOprint_val (_16:void)<-(i6:int)
- i7 := inet.setmasklen(i1,16); # 15 INETsetmasklen
(i7:inet)<-(i1:inet)(_18:int)
- io.print(i7); # 16 IOprint_val (_19:void)<-(i7:inet)
- i8 := inet.netmask(i1); # 17 INETnetmask (i8:inet)<-(i1:inet)
- io.print(i8); # 18 IOprint_val (_21:void)<-(i8:inet)
- i9 := inet.netmask(i3); # 19 INETnetmask (i9:inet)<-(i3:inet)
- io.print(i9); # 20 IOprint_val (_23:void)<-(i9:inet)
- i10 := inet.new("192.168.23.20/30"); # 21 INETnew
(i10:inet)<-(_25:str)
- io.print(i10); # 22 IOprint_val (_26:void)<-(i10:inet)
- i11 := inet.hostmask(i10); # 23 INEThostmask (i11:inet)<-(i10:inet)
- io.print(i11); # 24 IOprint_val (_28:void)<-(i11:inet)
- i12 := inet.hostmask(i3); # 25 INEThostmask (i12:inet)<-(i3:inet)
- io.print(i12); # 26 IOprint_val (_30:void)<-(i12:inet)
- i13 := inet.network(i1); # 27 INETnetwork (i13:inet)<-(i1:inet)
- io.print(i13); # 28 IOprint_val (_32:void)<-(i13:inet)
- i14 := inet.network(i3); # 29 INETnetwork (i14:inet)<-(i3:inet)
- io.print(i14); # 30 IOprint_val (_34:void)<-(i14:inet)
- i15 := inet.network(i10); # 31 INETnetwork (i15:inet)<-(i10:inet)
- io.print(i15); # 32 IOprint_val (_36:void)<-(i15:inet)
- i16 := inet.new("192.168.0.32"); # 33 INETnew (i16:inet)<-(_38:str)
- io.print(i16); # 34 IOprint_val (_39:void)<-(i16:inet)
- i17 := inet.text(i16); # 35 INETtext (i17:str)<-(i16:inet)
- io.print(i17); # 36 IOprint_val (_41:void)<-(i17:str)
- i18 := inet.new("10.1.0.0/16"); # 37 INETnew (i18:inet)<-(_43:str)
- io.print(i18); # 38 IOprint_val (_44:void)<-(i18:inet)
- i19 := inet.abbrev(i18); # 39 INETabbrev (i19:str)<-(i18:inet)
- io.print(i19); # 40 IOprint_val (_46:void)<-(i19:str)
- i20 := inet.abbrev(i3); # 41 INETabbrev (i20:str)<-(i3:inet)
- io.print(i20); # 42 IOprint_val (_48:void)<-(i20:str)
+function user.main():void; # 0 main:void {G}
+# these tests are from the PostgreSQL documentation examples
+# function tests
+ i1 := inet.new("192.168.1.5/24"); # 3 i1:inet := INETnew(_4:str)
+ io.print(i1); # 4 _5:void := IOprint_val(i1:inet)
+ i2 := inet.broadcast(i1); # 5 i2:inet := INETbroadcast(i1:inet)
+ io.print(i2); # 6 _7:void := IOprint_val(i2:inet)
+ i3 := inet.new("192.168.0.1/25"); # 7 i3:inet := INETnew(_9:str)
+ io.print(i3); # 8 _10:void := IOprint_val(i3:inet)
+ i4 := inet.broadcast(i3); # 9 i4:inet := INETbroadcast(i3:inet)
+ io.print(i4); # 10 _12:void := IOprint_val(i4:inet)
+ i5 := inet.host(i1); # 11 i5:str := INEThost(i1:inet) {G}
+ io.print(i5); # 12 _14:void := IOprint_val(i5:str)
+ i6 := inet.masklen(i1); # 13 i6:int := INETmasklen(i1:inet)
+ io.print(i6); # 14 _16:void := IOprint_val(i6:int)
+ i7 := inet.setmasklen(i1,16); # 15 i7:inet :=
INETsetmasklen(i1:inet, _18:int)
+ io.print(i7); # 16 _19:void := IOprint_val(i7:inet)
+ i8 := inet.netmask(i1); # 17 i8:inet := INETnetmask(i1:inet)
+ io.print(i8); # 18 _21:void := IOprint_val(i8:inet)
+ i9 := inet.netmask(i3); # 19 i9:inet := INETnetmask(i3:inet)
+ io.print(i9); # 20 _23:void := IOprint_val(i9:inet)
+ i10 := inet.new("192.168.23.20/30");# 21 i10:inet := INETnew(_25:str)
+ io.print(i10); # 22 _26:void := IOprint_val(i10:inet)
+ i11 := inet.hostmask(i10); # 23 i11:inet :=
INEThostmask(i10:inet)
+ io.print(i11); # 24 _28:void := IOprint_val(i11:inet)
+ i12 := inet.hostmask(i3); # 25 i12:inet := INEThostmask(i3:inet)
+ io.print(i12); # 26 _30:void := IOprint_val(i12:inet)
+ i13 := inet.network(i1); # 27 i13:inet := INETnetwork(i1:inet)
+ io.print(i13); # 28 _32:void := IOprint_val(i13:inet)
+ i14 := inet.network(i3); # 29 i14:inet := INETnetwork(i3:inet)
+ io.print(i14); # 30 _34:void := IOprint_val(i14:inet)
+ i15 := inet.network(i10); # 31 i15:inet := INETnetwork(i10:inet)
+ io.print(i15); # 32 _36:void := IOprint_val(i15:inet)
+ i16 := inet.new("192.168.0.32"); # 33 i16:inet := INETnew(_38:str)
+ io.print(i16); # 34 _39:void := IOprint_val(i16:inet)
+ i17 := inet.text(i16); # 35 i17:str := INETtext(i16:inet) {G}
+ io.print(i17); # 36 _41:void := IOprint_val(i17:str)
+ i18 := inet.new("10.1.0.0/16"); # 37 i18:inet := INETnew(_43:str)
+ io.print(i18); # 38 _44:void := IOprint_val(i18:inet)
+ i19 := inet.abbrev(i18); # 39 i19:str := INETabbrev(i18:inet)
{G}
+ io.print(i19); # 40 _46:void := IOprint_val(i19:str)
+ i20 := inet.abbrev(i3); # 41 i20:str := INETabbrev(i3:inet) {G}
+ io.print(i20); # 42 _48:void := IOprint_val(i20:str)
end main; # 43
[ 192.168.1.5/24 ]
[ 192.168.1.255/24 ]
Index: inet02.stable.out
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/modules/atoms/Tests/inet02.stable.out,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- inet02.stable.out 3 Dec 2006 22:43:13 -0000 1.7
+++ inet02.stable.out 15 Mar 2008 19:36:37 -0000 1.8
@@ -50,36 +50,36 @@
#e := inet.>>=(i3, i3);
#io.print(e);
#
-function user.main():void; # 0 (main:void)
-# these tests are from the PostgreSQL documentation examples # 1 (_1:str)
- i1 := inet.new("192.168.1.5"); # 2 INETnew (i1:inet)<-(_3:str)
- io.print(i1); # 3 IOprint_val (_4:void)<-(i1:inet)
- i2 := inet.new("192.168.1.6"); # 4 INETnew (i2:inet)<-(_6:str)
- io.print(i2); # 5 IOprint_val (_7:void)<-(i2:inet)
- i3 := inet.new("192.168.1/24"); # 6 INETnew (i3:inet)<-(_9:str)
- io.print(i3); # 7 IOprint_val (_10:void)<-(i3:inet)
- i4 := inet.new("192.168.1.4"); # 8 INETnew (i4:inet)<-(_12:str)
- io.print(i4); # 9 IOprint_val (_13:void)<-(i4:inet)
- e := inet.<(i1,i2); # 10 INET_comp_LT (e:bit)<-(i1:inet)(i2:inet)
- io.print(e); # 11 IOprint_val (_15:void)<-(e:bit)
- e := inet.<=(i1,i1); # 12 INET_comp_LE (e:bit)<-(i1:inet)(i1:inet)
- io.print(e); # 13 IOprint_val (_16:void)<-(e:bit)
- e := inet.=(i1,i1); # 14 INET_comp_EQ (e:bit)<-(i1:inet)(i1:inet)
- io.print(e); # 15 IOprint_val (_17:void)<-(e:bit)
- e := inet.>=(i1,i1); # 16 INET_comp_GE (e:bit)<-(i1:inet)(i1:inet)
- io.print(e); # 17 IOprint_val (_18:void)<-(e:bit)
- e := inet.>(i1,i4); # 18 INET_comp_GT (e:bit)<-(i1:inet)(i4:inet)
- io.print(e); # 19 IOprint_val (_19:void)<-(e:bit)
- e := inet.!=(i1,i4); # 20 INET_comp_NEQ (e:bit)<-(i1:inet)(i4:inet)
- io.print(e); # 21 IOprint_val (_20:void)<-(e:bit)
- e := inet.<<(i1,i3); # 22 INET_comp_CW (e:bit)<-(i1:inet)(i3:inet)
- io.print(e); # 23 IOprint_val (_21:void)<-(e:bit)
- e := inet.<<=(i3,i3); # 24 INET_comp_CWE (e:bit)<-(i3:inet)(i3:inet)
- io.print(e); # 25 IOprint_val (_22:void)<-(e:bit)
- e := inet.>>(i3,i1); # 26 INET_comp_CS (e:bit)<-(i3:inet)(i1:inet)
- io.print(e); # 27 IOprint_val (_23:void)<-(e:bit)
- e := inet.>>=(i3,i3); # 28 INET_comp_CSE (e:bit)<-(i3:inet)(i3:inet)
- io.print(e); # 29 IOprint_val (_24:void)<-(e:bit)
+function user.main():void; # 0 main:void
+# these tests are from the PostgreSQL documentation examples
+ i1 := inet.new("192.168.1.5"); # 2 i1:inet := INETnew(_3:str)
+ io.print(i1); # 3 _4:void := IOprint_val(i1:inet)
+ i2 := inet.new("192.168.1.6"); # 4 i2:inet := INETnew(_6:str)
+ io.print(i2); # 5 _7:void := IOprint_val(i2:inet)
+ i3 := inet.new("192.168.1/24"); # 6 i3:inet := INETnew(_9:str)
+ io.print(i3); # 7 _10:void := IOprint_val(i3:inet)
+ i4 := inet.new("192.168.1.4"); # 8 i4:inet := INETnew(_12:str)
+ io.print(i4); # 9 _13:void := IOprint_val(i4:inet)
+ e := inet.<(i1,i2); # 10 e:bit := INET_comp_LT(i1:inet,
i2:inet)
+ io.print(e); # 11 _15:void := IOprint_val(e:bit)
+ e := inet.<=(i1,i1); # 12 e:bit := INET_comp_LE(i1:inet,
i1:inet)
+ io.print(e); # 13 _16:void := IOprint_val(e:bit)
+ e := inet.=(i1,i1); # 14 e:bit := INET_comp_EQ(i1:inet,
i1:inet)
+ io.print(e); # 15 _17:void := IOprint_val(e:bit)
+ e := inet.>=(i1,i1); # 16 e:bit := INET_comp_GE(i1:inet,
i1:inet)
+ io.print(e); # 17 _18:void := IOprint_val(e:bit)
+ e := inet.>(i1,i4); # 18 e:bit := INET_comp_GT(i1:inet,
i4:inet)
+ io.print(e); # 19 _19:void := IOprint_val(e:bit)
+ e := inet.!=(i1,i4); # 20 e:bit := INET_comp_NEQ(i1:inet,
i4:inet)
+ io.print(e); # 21 _20:void := IOprint_val(e:bit)
+ e := inet.<<(i1,i3); # 22 e:bit := INET_comp_CW(i1:inet,
i3:inet)
+ io.print(e); # 23 _21:void := IOprint_val(e:bit)
+ e := inet.<<=(i3,i3); # 24 e:bit := INET_comp_CWE(i3:inet,
i3:inet)
+ io.print(e); # 25 _22:void := IOprint_val(e:bit)
+ e := inet.>>(i3,i1); # 26 e:bit := INET_comp_CS(i3:inet,
i1:inet)
+ io.print(e); # 27 _23:void := IOprint_val(e:bit)
+ e := inet.>>=(i3,i3); # 28 e:bit := INET_comp_CSE(i3:inet,
i3:inet)
+ io.print(e); # 29 _24:void := IOprint_val(e:bit)
end main; # 30
[ 192.168.1.5 ]
[ 192.168.1.6 ]
Index: color.stable.out
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/modules/atoms/Tests/color.stable.out,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- color.stable.out 28 Dec 2006 22:16:12 -0000 1.12
+++ color.stable.out 15 Mar 2008 19:36:37 -0000 1.13
@@ -54,60 +54,59 @@
# V94 := color.blue(c);
# io.print(V94);
#end testcolor;
-
-function user.testcolor():void; # 0 (testcolor:void)
- c := color.rgb(100,101,102); # 1 CLRrgb
(c:color)<-(_2:int)(_3:int)(_4:int)
- io.print(c); # 2 IOprint_val (_5:void)<-(c:color)
- V38 := color.red(c); # 3 CLRred (V38:int)<-(c:color)
- io.print(V38); # 4 IOprint_val (_7:void)<-(V38:int)
- V41 := color.green(c); # 5 CLRgreen (V41:int)<-(c:color)
- io.print(V41); # 6 IOprint_val (_9:void)<-(V41:int)
- V44 := color.blue(c); # 7 CLRblue (V44:int)<-(c:color)
- io.print(V44); # 8 IOprint_val (_11:void)<-(V44:int)
- V47 := color.hsv(90,0.5,1); # 9 CLRhsv
(V47:color)<-(_13:flt)(_14:flt)(_15:flt)
- c := V47; # 10 (c:color)<-(V47:color)
- color.print(c); # 11 CLRprintf (_16:void)<-(c:color)
-# don't print hue, saturation, and value: architectural differences can
# 12 (_18:str)
-# cause differences in the output produced. instead, use them to produce
# 13 (_20:str)
-# a new color which should be the same as the original color # 14
(_22:str)
-# print(hue(c)); # 15 (_24:str)
-# print(saturation(c)); # 16 (_26:str)
-# print(value(c)); # 17 (_28:str)
- V62 := color.hue(c); # 18 CLRhue (V62:flt)<-(c:color)
- V63 := color.saturation(c); # 19 CLRsaturation (V63:flt)<-(c:color)
- V64 := color.value(c); # 20 CLRvalue (V64:flt)<-(c:color)
- V61 := color.hsv(V62,V63,V64); # 21 CLRhsv
(V61:color)<-(V62:flt)(V63:flt)(V64:flt)
- color.print(V61); # 22 CLRprintf (_27:void)<-(V61:color)
- V66 := color.ycc(200,100,50); # 23 CLRycc
(V66:color)<-(_29:int)(_2:int)(_30:int)
- c := V66; # 24 (c:color)<-(V66:color)
- color.print(c); # 25 CLRprintf (_31:void)<-(c:color)
- V73 := color.luminance(c); # 26 CLRluminance (V73:int)<-(c:color)
- io.print(V73); # 27 IOprint_val (_33:void)<-(V73:int)
- V76 := color.cr(c); # 28 CLRcr (V76:int)<-(c:color)
- io.print(V76); # 29 IOprint_val (_35:void)<-(V76:int)
- V79 := color.cb(c); # 30 CLRcb (V79:int)<-(c:color)
- io.print(V79); # 31 IOprint_val (_37:void)<-(V79:int)
- V82 := color.color("0x0012ABcd"); # 32 CLRcolor (V82:color)<-(_39:str)
- c := V82; # 33 (c:color)<-(V82:color)
- color.print(c); # 34 CLRprintf (_40:void)<-(c:color)
- V88 := color.red(c); # 35 CLRred (V88:int)<-(c:color)
- io.print(V88); # 36 IOprint_val (_42:void)<-(V88:int)
- V91 := color.green(c); # 37 CLRgreen (V91:int)<-(c:color)
- io.print(V91); # 38 IOprint_val (_44:void)<-(V91:int)
- V94 := color.blue(c); # 39 CLRblue (V94:int)<-(c:color)
- io.print(V94); # 40 IOprint_val (_46:void)<-(V94:int)
- bc := bat.new(:oid,:color); # 41 CMDBATnew
(bc:bat[:oid,:color])<-(_48:oid)(_49:color)
- bat.append(bc,0x00000000:color); # 42 BKCappend_val_wrap
(_50:void)<-(bc:bat[:oid,:color])(_51:color)
- bat.append(bc,0x0033FF44:color); # 43 BKCappend_val_wrap
(_52:void)<-(bc:bat[:oid,:color])(_53:color)
- bat.append(bc,0x00003F44:color); # 44 BKCappend_val_wrap
(_54:void)<-(bc:bat[:oid,:color])(_55:color)
- io.print(bc); # 45 IOprint_val (_56:void)<-(bc:bat[:oid,:color])
- z := batcolor.red(bc); # 46 CLRbatRed
(z:bat[:oid,:int])<-(bc:bat[:oid,:color])
- io.print(z); # 47 IOprint_val (_58:void)<-(z:bat[:oid,:int])
+function user.testcolor():void; # 0 testcolor:void {G}
+ c := color.rgb(100,101,102); # 1 c:color := CLRrgb(_2:int, _3:int,
_4:int)
+ io.print(c); # 2 _5:void := IOprint_val(c:color)
+ V38 := color.red(c); # 3 V38:int := CLRred(c:color)
+ io.print(V38); # 4 _7:void := IOprint_val(V38:int)
+ V41 := color.green(c); # 5 V41:int := CLRgreen(c:color)
+ io.print(V41); # 6 _9:void := IOprint_val(V41:int)
+ V44 := color.blue(c); # 7 V44:int := CLRblue(c:color)
+ io.print(V44); # 8 _11:void := IOprint_val(V44:int)
+ V47 := color.hsv(90,0.5,1); # 9 V47:color := CLRhsv(_13:flt,
_14:flt, _15:flt)
+ c := V47; # 10 c:color := V47:color
+ color.print(c); # 11 _16:void := CLRprintf(c:color)
+# don't print hue, saturation, and value: architectural differences can
+# cause differences in the output produced. instead, use them to produce
+# a new color which should be the same as the original color
+# print(hue(c));
+# print(saturation(c));
+# print(value(c));
+ V62 := color.hue(c); # 18 V62:flt := CLRhue(c:color)
+ V63 := color.saturation(c); # 19 V63:flt := CLRsaturation(c:color)
+ V64 := color.value(c); # 20 V64:flt := CLRvalue(c:color)
+ V61 := color.hsv(V62,V63,V64); # 21 V61:color := CLRhsv(V62:flt,
V63:flt, V64:flt)
+ color.print(V61); # 22 _27:void := CLRprintf(V61:color)
+ V66 := color.ycc(200,100,50); # 23 V66:color := CLRycc(_29:int,
_2:int, _30:int)
+ c := V66; # 24 c:color := V66:color
+ color.print(c); # 25 _31:void := CLRprintf(c:color)
+ V73 := color.luminance(c); # 26 V73:int := CLRluminance(c:color)
+ io.print(V73); # 27 _33:void := IOprint_val(V73:int)
+ V76 := color.cr(c); # 28 V76:int := CLRcr(c:color)
+ io.print(V76); # 29 _35:void := IOprint_val(V76:int)
+ V79 := color.cb(c); # 30 V79:int := CLRcb(c:color)
+ io.print(V79); # 31 _37:void := IOprint_val(V79:int)
+ V82 := color.color("0x0012ABcd"); # 32 V82:color := CLRcolor(_39:str)
+ c := V82; # 33 c:color := V82:color
+ color.print(c); # 34 _40:void := CLRprintf(c:color)
+ V88 := color.red(c); # 35 V88:int := CLRred(c:color)
+ io.print(V88); # 36 _42:void := IOprint_val(V88:int)
+ V91 := color.green(c); # 37 V91:int := CLRgreen(c:color)
+ io.print(V91); # 38 _44:void := IOprint_val(V91:int)
+ V94 := color.blue(c); # 39 V94:int := CLRblue(c:color)
+ io.print(V94); # 40 _46:void := IOprint_val(V94:int)
+ bc := bat.new(:oid,:color); # 41 bc:bat[:oid,:color] :=
CMDBATnew(_48:oid, _49:color) {G}
+ bat.append(bc,0x00000000:color); # 42 _50:void :=
BKCappend_val_wrap(bc:bat[:oid,:color], _51:color)
+ bat.append(bc,0x0033FF44:color); # 43 _52:void :=
BKCappend_val_wrap(bc:bat[:oid,:color], _53:color)
+ bat.append(bc,0x00003F44:color); # 44 _54:void :=
BKCappend_val_wrap(bc:bat[:oid,:color], _55:color)
+ io.print(bc); # 45 _56:void :=
IOprint_val(bc:bat[:oid,:color])
+ z := batcolor.red(bc); # 46 z:bat[:oid,:int] :=
CLRbatRed(bc:bat[:oid,:color]) {G}
+ io.print(z); # 47 _58:void :=
IOprint_val(z:bat[:oid,:int])
end testcolor; # 48
#user.testcolor();
#
-function user.main():void; # 0 (main:void)
- user.testcolor(); # 1 (_1:void)
+function user.main():void; # 0 main:void
+ user.testcolor(); # 1 _1:void
end main; # 2
[ 0x00646566 ]
[ 100 ]
Index: inet01.stable.out
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/modules/atoms/Tests/inet01.stable.out,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- inet01.stable.out 3 Dec 2006 22:43:13 -0000 1.4
+++ inet01.stable.out 15 Mar 2008 19:36:37 -0000 1.5
@@ -53,33 +53,33 @@
#e := inet.>>=(i6, i7);
#io.print(e);
#
-function user.main():void; # 0 (main:void)
- i1 := inet.new("127.0.0.1"); # 1 INETnew (i1:inet)<-(_2:str)
- io.print(i1); # 2 IOprint_val (_3:void)<-(i1:inet)
- i2 := inet.new("192.168.0.0/24"); # 3 INETnew (i2:inet)<-(_5:str)
- io.print(i2); # 4 IOprint_val (_6:void)<-(i2:inet)
- i3 := inet.new("192.168/16"); # 5 INETnew (i3:inet)<-(_8:str)
- io.print(i3); # 6 IOprint_val (_9:void)<-(i3:inet)
- i4 := inet.new("192.168.0.3/24"); # 7 INETnew (i4:inet)<-(_11:str)
- io.print(i4); # 8 IOprint_val (_12:void)<-(i4:inet)
- i5 := inet.new("/0"); # 9 INETnew (i5:inet)<-(_14:str)
- io.print(i5); # 10 IOprint_val (_15:void)<-(i5:inet)
- i6 := inet.new("127/32"); # 11 INETnew (i6:inet)<-(_17:str)
- io.print(i6); # 12 IOprint_val (_18:void)<-(i6:inet)
- i7 := inet.new("127.0.0.0"); # 13 INETnew (i7:inet)<-(_20:str)
- io.print(i7); # 14 IOprint_val (_21:void)<-(i7:inet)
- e := inet.<(i2,i3); # 15 INET_comp_LT (e:bit)<-(i2:inet)(i3:inet)
- io.print(e); # 16 IOprint_val (_23:void)<-(e:bit)
- e := inet.>(i2,i3); # 17 INET_comp_GT (e:bit)<-(i2:inet)(i3:inet)
- io.print(e); # 18 IOprint_val (_24:void)<-(e:bit)
- e := inet.=(i6,i1); # 19 INET_comp_EQ (e:bit)<-(i6:inet)(i1:inet)
- io.print(e); # 20 IOprint_val (_25:void)<-(e:bit)
- e := inet.=(i6,i7); # 21 INET_comp_EQ (e:bit)<-(i6:inet)(i7:inet)
- io.print(e); # 22 IOprint_val (_26:void)<-(e:bit)
- e := inet.<<(i4,i3); # 23 INET_comp_CW (e:bit)<-(i4:inet)(i3:inet)
- io.print(e); # 24 IOprint_val (_27:void)<-(e:bit)
- e := inet.>>=(i6,i7); # 25 INET_comp_CSE (e:bit)<-(i6:inet)(i7:inet)
- io.print(e); # 26 IOprint_val (_28:void)<-(e:bit)
+function user.main():void; # 0 main:void
+ i1 := inet.new("127.0.0.1"); # 1 i1:inet := INETnew(_2:str)
+ io.print(i1); # 2 _3:void := IOprint_val(i1:inet)
+ i2 := inet.new("192.168.0.0/24"); # 3 i2:inet := INETnew(_5:str)
+ io.print(i2); # 4 _6:void := IOprint_val(i2:inet)
+ i3 := inet.new("192.168/16"); # 5 i3:inet := INETnew(_8:str)
+ io.print(i3); # 6 _9:void := IOprint_val(i3:inet)
+ i4 := inet.new("192.168.0.3/24"); # 7 i4:inet := INETnew(_11:str)
+ io.print(i4); # 8 _12:void := IOprint_val(i4:inet)
+ i5 := inet.new("/0"); # 9 i5:inet := INETnew(_14:str)
+ io.print(i5); # 10 _15:void := IOprint_val(i5:inet)
+ i6 := inet.new("127/32"); # 11 i6:inet := INETnew(_17:str)
+ io.print(i6); # 12 _18:void := IOprint_val(i6:inet)
+ i7 := inet.new("127.0.0.0"); # 13 i7:inet := INETnew(_20:str)
+ io.print(i7); # 14 _21:void := IOprint_val(i7:inet)
+ e := inet.<(i2,i3); # 15 e:bit := INET_comp_LT(i2:inet,
i3:inet)
+ io.print(e); # 16 _23:void := IOprint_val(e:bit)
+ e := inet.>(i2,i3); # 17 e:bit := INET_comp_GT(i2:inet,
i3:inet)
+ io.print(e); # 18 _24:void := IOprint_val(e:bit)
+ e := inet.=(i6,i1); # 19 e:bit := INET_comp_EQ(i6:inet,
i1:inet)
+ io.print(e); # 20 _25:void := IOprint_val(e:bit)
+ e := inet.=(i6,i7); # 21 e:bit := INET_comp_EQ(i6:inet,
i7:inet)
+ io.print(e); # 22 _26:void := IOprint_val(e:bit)
+ e := inet.<<(i4,i3); # 23 e:bit := INET_comp_CW(i4:inet,
i3:inet)
+ io.print(e); # 24 _27:void := IOprint_val(e:bit)
+ e := inet.>>=(i6,i7); # 25 e:bit := INET_comp_CSE(i6:inet,
i7:inet)
+ io.print(e); # 26 _28:void := IOprint_val(e:bit)
end main; # 27
[ 127.0.0.1 ]
[ 192.168.0.0/24 ]
Index: xml100.stable.out
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/modules/atoms/Tests/xml100.stable.out,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- xml100.stable.out 3 Sep 2007 19:46:16 -0000 1.2
+++ xml100.stable.out 15 Mar 2008 19:36:42 -0000 1.3
@@ -31,22 +31,22 @@
#xs:= xml.str(xx);
#io.print(xs);
#
-function user.main():void; # 0 (main:void)
- b := "Mary Ann Walker"; # 1 (b:str)<-(_2:str)
- c := "brown"; # 2 (c:str)<-(_4:str)
- n := nil:xml; # 3 (n:xml)<-(_6:xml)
- io.print(n); # 4 IOprint_val (_7:void)<-(n:xml)
- ns := xml.str(n); # 5 XMLxml2str (ns:str)<-(n:xml)
- io.print(ns); # 6 IOprint_val (_9:void)<-(ns:str)
- bx := xml.xml(b); # 7 XMLstr2xml (bx:xml)<-(b:str)
- cx := xml.xml(c); # 8 XMLstr2xml (cx:xml)<-(c:str)
- xp := xml.element("person",bx); # 9 XMLelementSmall
(xp:xml)<-(_13:str)(bx:xml)
- io.print(xp); # 10 IOprint_val (_14:void)<-(xp:xml)
- xh := xml.element("hair",nil:str,nil:xml,cx); # 11 XMLelement
(xh:xml)<-(_16:str)(_17:str)(_6:xml)(cx:xml)
- io.print(xh); # 12 IOprint_val (_18:void)<-(xh:xml)
- xx := xml.forest(xp,xh); # 13 XMLforest (xx:xml)<-(xp:xml)(xh:xml)
- xs := xml.str(xx); # 14 XMLxml2str (xs:str)<-(xx:xml)
- io.print(xs); # 15 IOprint_val (_21:void)<-(xs:str)
+function user.main():void; # 0 main:void {G}
+ b := "Mary Ann Walker"; # 1 b:str := _2:str {G}
+ c := "brown"; # 2 c:str := _4:str {G}
+ n := nil:xml; # 3 n:xml := _6:xml {G}
+ io.print(n); # 4 _7:void := IOprint_val(n:xml)
+ ns := xml.str(n); # 5 ns:str := XMLxml2str(n:xml) {G}
+ io.print(ns); # 6 _9:void := IOprint_val(ns:str)
+ bx := xml.xml(b); # 7 bx:xml := XMLstr2xml(b:str) {G}
+ cx := xml.xml(c); # 8 cx:xml := XMLstr2xml(c:str) {G}
+ xp := xml.element("person",bx); # 9 xp:xml :=
XMLelementSmall(_13:str, bx:xml) {G}
+ io.print(xp); # 10 _14:void := IOprint_val(xp:xml)
+ xh := xml.element("hair",nil:str,nil:xml,cx);# 11 xh:xml :=
XMLelement(_16:str, _17:str, _6:xml, cx:xml) {G}
+ io.print(xh); # 12 _18:void := IOprint_val(xh:xml)
+ xx := xml.forest(xp,xh); # 13 xx:xml := XMLforest(xp:xml,
xh:xml) {G}
+ xs := xml.str(xx); # 14 xs:str := XMLxml2str(xx:xml) {G}
+ io.print(xs); # 15 _21:void := IOprint_val(xs:str)
end main; # 16
[ ]
[ nil ]
Index: time00.stable.out
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/modules/atoms/Tests/time00.stable.out,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- time00.stable.out 29 Oct 2007 20:09:57 -0000 1.3
+++ time00.stable.out 15 Mar 2008 19:36:42 -0000 1.4
@@ -38,39 +38,39 @@
#zd:= batmtime.day(b);
#io.print(zd);
#
-function user.main():void; # 0 (main:void)
-# temporal stuff. # 1 (_1:str)
- date_01 := mtime.date("5000-JAN-01"); # 2 MTIMEdate_fromstr
(date_01:date)<-(_3:str)
- date_02 := mtime.date("1968-FEBR-29"); # 3 MTIMEdate_fromstr
(date_02:date)<-(_5:str)
- date_03 := mtime.date("1-MARCH-01"); # 4 MTIMEdate_fromstr
(date_03:date)<-(_7:str)
- date_04 := mtime.date("-5867411-JAN-1"); # 5 MTIMEdate_fromstr
(date_04:date)<-(_9:str)
- date_05 := mtime.date("-768/octobe/01"); # 6 MTIMEdate_fromstr
(date_05:date)<-(_11:str)
- date_06 := mtime.date("5000\\novembe\\01"); # 7 MTIMEdate_fromstr
(date_06:date)<-(_13:str)
- date_07 := mtime.date("-1999/jun/01"); # 8 MTIMEdate_fromstr
(date_07:date)<-(_15:str)
- date_08 := mtime.date(nil:void); # 9 MTIMEnil2date
(date_08:date)<-(_17:void)
- f := calc.min(date_01,date_02); # 10 MTIMEdate_min
(f:date)<-(date_01:date)(date_02:date)
- io.print(f); # 11 IOprint_val (_19:void)<-(f:date)
- f := calc.min(date_02,date_01); # 12 MTIMEdate_min
(f:date)<-(date_02:date)(date_01:date)
- io.print(f); # 13 IOprint_val (_20:void)<-(f:date)
- f := calc.min(date_02,date_08); # 14 MTIMEdate_min
(f:date)<-(date_02:date)(date_08:date)
- io.print(f); # 15 IOprint_val (_21:void)<-(f:date)
- f := calc.min(date_08,date_08); # 16 MTIMEdate_min
(f:date)<-(date_08:date)(date_08:date)
- io.print(f); # 17 IOprint_val (_22:void)<-(f:date)
- b := bat.new(:int,:date); # 18 CMDBATnew
(b:bat[:int,:date])<-(_24:int)(_25:date)
- bat.insert(b,1,date_01); # 19 BKCinsert_bun
(_26:void)<-(b:bat[:int,:date])(_27:int)(date_01:date)
- bat.insert(b,2,date_02); # 20 BKCinsert_bun
(_28:void)<-(b:bat[:int,:date])(_29:int)(date_02:date)
- bat.insert(b,3,date_03); # 21 BKCinsert_bun
(_30:void)<-(b:bat[:int,:date])(_31:int)(date_03:date)
- bat.insert(b,4,date_04); # 22 BKCinsert_bun
(_32:void)<-(b:bat[:int,:date])(_33:int)(date_04:date)
- bat.insert(b,5,date_05); # 23 BKCinsert_bun
(_34:void)<-(b:bat[:int,:date])(_35:int)(date_05:date)
- bat.insert(b,6,date_06); # 24 BKCinsert_bun
(_36:void)<-(b:bat[:int,:date])(_37:int)(date_06:date)
- bat.insert(b,7,date_07); # 25 BKCinsert_bun
(_38:void)<-(b:bat[:int,:date])(_39:int)(date_07:date)
- io.print(b); # 26 IOprint_val (_40:void)<-(b:bat[:int,:date])
- zy := batmtime.year(b); # 27 MTIMEdate_extract_year_bulk
(zy:bat[:int,:int])<-(b:bat[:int,:date])
- io.print(zy); # 28 IOprint_val (_42:void)<-(zy:bat[:int,:int])
- zm := batmtime.month(b); # 29 MTIMEdate_extract_month_bulk
(zm:bat[:int,:int])<-(b:bat[:int,:date])
- io.print(zm); # 30 IOprint_val (_44:void)<-(zm:bat[:int,:int])
- zd := batmtime.day(b); # 31 MTIMEdate_extract_day_bulk
(zd:bat[:int,:int])<-(b:bat[:int,:date])
- io.print(zd); # 32 IOprint_val (_46:void)<-(zd:bat[:int,:int])
+function user.main():void; # 0 main:void {G}
+# temporal stuff.
+ date_01 := mtime.date("5000-JAN-01");# 2 date_01:date :=
MTIMEdate_fromstr(_3:str)
+ date_02 := mtime.date("1968-FEBR-29");# 3 date_02:date :=
MTIMEdate_fromstr(_5:str)
+ date_03 := mtime.date("1-MARCH-01");# 4 date_03:date :=
MTIMEdate_fromstr(_7:str)
+ date_04 := mtime.date("-5867411-JAN-1");# 5 date_04:date :=
MTIMEdate_fromstr(_9:str)
+ date_05 := mtime.date("-768/octobe/01");# 6 date_05:date :=
MTIMEdate_fromstr(_11:str)
+ date_06 := mtime.date("5000\\novembe\\01");# 7 date_06:date :=
MTIMEdate_fromstr(_13:str)
+ date_07 := mtime.date("-1999/jun/01");# 8 date_07:date :=
MTIMEdate_fromstr(_15:str)
+ date_08 := mtime.date(nil:void); # 9 date_08:date :=
MTIMEnil2date(_17:void)
+ f := calc.min(date_01,date_02); # 10 f:date :=
MTIMEdate_min(date_01:date, date_02:date)
+ io.print(f); # 11 _19:void := IOprint_val(f:date)
+ f := calc.min(date_02,date_01); # 12 f:date :=
MTIMEdate_min(date_02:date, date_01:date)
+ io.print(f); # 13 _20:void := IOprint_val(f:date)
+ f := calc.min(date_02,date_08); # 14 f:date :=
MTIMEdate_min(date_02:date, date_08:date)
+ io.print(f); # 15 _21:void := IOprint_val(f:date)
+ f := calc.min(date_08,date_08); # 16 f:date :=
MTIMEdate_min(date_08:date, date_08:date)
+ io.print(f); # 17 _22:void := IOprint_val(f:date)
+ b := bat.new(:int,:date); # 18 b:bat[:int,:date] :=
CMDBATnew(_24:int, _25:date) {G}
+ bat.insert(b,1,date_01); # 19 _26:void :=
BKCinsert_bun(b:bat[:int,:date], _27:int, date_01:date)
+ bat.insert(b,2,date_02); # 20 _28:void :=
BKCinsert_bun(b:bat[:int,:date], _29:int, date_02:date)
+ bat.insert(b,3,date_03); # 21 _30:void :=
BKCinsert_bun(b:bat[:int,:date], _31:int, date_03:date)
+ bat.insert(b,4,date_04); # 22 _32:void :=
BKCinsert_bun(b:bat[:int,:date], _33:int, date_04:date)
+ bat.insert(b,5,date_05); # 23 _34:void :=
BKCinsert_bun(b:bat[:int,:date], _35:int, date_05:date)
+ bat.insert(b,6,date_06); # 24 _36:void :=
BKCinsert_bun(b:bat[:int,:date], _37:int, date_06:date)
+ bat.insert(b,7,date_07); # 25 _38:void :=
BKCinsert_bun(b:bat[:int,:date], _39:int, date_07:date)
+ io.print(b); # 26 _40:void :=
IOprint_val(b:bat[:int,:date])
+ zy := batmtime.year(b); # 27 zy:bat[:int,:int] :=
MTIMEdate_extract_year_bulk(b:bat[:int,:date]) {G}
+ io.print(zy); # 28 _42:void :=
IOprint_val(zy:bat[:int,:int])
+ zm := batmtime.month(b); # 29 zm:bat[:int,:int] :=
MTIMEdate_extract_month_bulk(b:bat[:int,:date]) {G}
+ io.print(zm); # 30 _44:void :=
IOprint_val(zm:bat[:int,:int])
+ zd := batmtime.day(b); # 31 zd:bat[:int,:int] :=
MTIMEdate_extract_day_bulk(b:bat[:int,:date]) {G}
+ io.print(zd); # 32 _46:void :=
IOprint_val(zd:bat[:int,:int])
end main; # 33
[ 1968-02-29 ]
[ 1968-02-29 ]
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Monetdb-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-checkins
