Update of /cvsroot/monetdb/MonetDB5/src/modules/atoms/Tests
In directory
sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv22590/src/modules/atoms/Tests
Modified Files:
time00.mal time00.stable.out
Log Message:
propagated changes of Thursday Oct 25 2007 - Monday Oct 29 2007
from the MonetDB_5-2 branch to the development trunk
Index: time00.stable.out
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/modules/atoms/Tests/time00.stable.out,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- time00.stable.out 3 Apr 2007 12:01:31 -0000 1.2
+++ time00.stable.out 29 Oct 2007 20:09:57 -0000 1.3
@@ -47,22 +47,35 @@
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)
- b := bat.new(:int,:date); # 9 CMDBATnew
(b:bat[:int,:date])<-(_17:int)(_18:date)
- bat.insert(b,1,date_01); # 10 BKCinsert_bun
(_19:void)<-(b:bat[:int,:date])(_20:int)(date_01:date)
- bat.insert(b,2,date_02); # 11 BKCinsert_bun
(_21:void)<-(b:bat[:int,:date])(_22:int)(date_02:date)
- bat.insert(b,3,date_03); # 12 BKCinsert_bun
(_23:void)<-(b:bat[:int,:date])(_24:int)(date_03:date)
- bat.insert(b,4,date_04); # 13 BKCinsert_bun
(_25:void)<-(b:bat[:int,:date])(_26:int)(date_04:date)
- bat.insert(b,5,date_05); # 14 BKCinsert_bun
(_27:void)<-(b:bat[:int,:date])(_28:int)(date_05:date)
- bat.insert(b,6,date_06); # 15 BKCinsert_bun
(_29:void)<-(b:bat[:int,:date])(_30:int)(date_06:date)
- bat.insert(b,7,date_07); # 16 BKCinsert_bun
(_31:void)<-(b:bat[:int,:date])(_32:int)(date_07:date)
- io.print(b); # 17 IOprint_val (_33:void)<-(b:bat[:int,:date])
- zy := batmtime.year(b); # 18 MTIMEdate_extract_year_bulk
(zy:bat[:int,:int])<-(b:bat[:int,:date])
- io.print(zy); # 19 IOprint_val (_35:void)<-(zy:bat[:int,:int])
- zm := batmtime.month(b); # 20 MTIMEdate_extract_month_bulk
(zm:bat[:int,:int])<-(b:bat[:int,:date])
- io.print(zm); # 21 IOprint_val (_37:void)<-(zm:bat[:int,:int])
- zd := batmtime.day(b); # 22 MTIMEdate_extract_day_bulk
(zd:bat[:int,:int])<-(b:bat[:int,:date])
- io.print(zd); # 23 IOprint_val (_39:void)<-(zd:bat[:int,:int])
-end main; # 24
+ 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])
+end main; # 33
+[ 1968-02-29 ]
+[ 1968-02-29 ]
+[ nil ]
+[ nil ]
#-------------------------#
# h t # name
# int date # type
Index: time00.mal
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/modules/atoms/Tests/time00.mal,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- time00.mal 1 Apr 2007 21:41:24 -0000 1.1
+++ time00.mal 29 Oct 2007 20:09:56 -0000 1.2
@@ -6,6 +6,16 @@
date_05:= mtime.date("-768/octobe/01");
date_06:= mtime.date("5000\\novembe\\01");
date_07:= mtime.date("-1999/jun/01");
+date_08:= mtime.date(nil);
+
+f:= calc.min(date_01,date_02);
+io.print(f);
+f:= calc.min(date_02,date_01);
+io.print(f);
+f:= calc.min(date_02,date_08);
+io.print(f);
+f:= calc.min(date_08,date_08);
+io.print(f);
b:= bat.new(:int,:date);
bat.insert(b,1,date_01);
-------------------------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc.
Still grepping through log files to find problems? Stop.
Now Search log events and configuration files using AJAX and a browser.
Download your FREE copy of Splunk now >> http://get.splunk.com/
_______________________________________________
Monetdb-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-checkins
