Update of /cvsroot/monetdb/sql/src/backends/monet5
In directory sc8-pr-cvs7.sourceforge.net:/tmp/cvs-serv28404/src/backends/monet5
Modified Files:
Tag: SQL_2-16
sql.mx
Log Message:
approved output
added missing mark_grp and rank_grp
Index: sql.mx
===================================================================
RCS file: /cvsroot/monetdb/sql/src/backends/monet5/sql.mx,v
retrieving revision 1.207.2.7
retrieving revision 1.207.2.8
diff -u -d -r1.207.2.7 -r1.207.2.8
--- sql.mx 16 Mar 2007 14:54:35 -0000 1.207.2.7
+++ sql.mx 1 Apr 2007 22:09:34 -0000 1.207.2.8
@@ -460,6 +460,31 @@
@:mal_interval(int)@
@:mal_interval(lng)@
+function aggr.mark_grp( b:bat[:oid,:any_1], a:bat[:any_2,:any_3],
g:bat[:oid,:oid]) :bat[:oid,:int];
+ x := algebra.mark_grp(b,g,0:oid);
+ return batcalc.int(x);
+end aggr.mark_grp;
+
+function aggr.mark_grp( b:bat[:oid,:any_1]) :bat[:oid,:int];
+ x := algebra.markT(b,0:oid);
+ return batcalc.int(x);
+end aggr.mark_grp;
+
+function aggr.rank_grp( b:bat[:oid,:any_1], gp:bat[:oid,:oid],
gpe:bat[:oid,:oid]) :bat[:oid,:int];
+ (h1,m1) := group.new(gp);
+ (hist,m) := group.derive(h1,m1,b);
+ ext := bat.mirror(hist);
+ e := batcalc.int(ext);
+ return algebra.join(m, e);
+end aggr.rank_grp;
+
+function aggr.rank_grp( b:bat[:oid,:any_1]) :bat[:oid,:int];
+ (hist,m) := group.new(b);
+ ext := bat.mirror(hist);
+ e := batcalc.int(ext);
+ return algebra.join(m, e);
+end aggr.rank_grp;
+
@-
Include the sql_cache functionality
@mal
-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys-and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Monetdb-sql-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-sql-checkins
