Update of /cvsroot/monetdb/pathfinder/modules/pftijah
In directory sfp-cvsdas-1.v30.ch3.sourceforge.com:/tmp/cvs-serv23876

Modified Files:
        pftijah.mx 
Log Message:
Implemented translation to a MIL function of the following new tijah functions.

- tijah:terms(element*) as string*
- tijah:terms(element*,node) as string*
- tijah:tf-all(string) as integer
- tijah:tf-all(string,node) as integer
- tijah:tf(element*,string) as integer
- tijah:tf(element*,string,node) as integer
- tijah:fb-terms(element*) as string*
- tijah:fb-terms(element*,node) as string* 

The main MIL functions are still empty and Henning will fill te blanks.



Index: pftijah.mx
===================================================================
RCS file: /cvsroot/monetdb/pathfinder/modules/pftijah/pftijah.mx,v
retrieving revision 1.246
retrieving revision 1.247
diff -u -d -r1.246 -r1.247
--- pftijah.mx  6 Nov 2009 12:19:30 -0000       1.246
+++ pftijah.mx  4 Dec 2009 14:08:43 -0000       1.247
@@ -2712,6 +2712,87 @@
      return res;
 }
 
+PROC ALG_tj_terms(
+       BAT[void,any] par_loop,
+       BAT[oid,bat]  par_ws,
+       BAT[oid,bat]  par1_el,
+       BAT[oid,bat]  par2_options
+       ) : BAT[void,bat] 
+{
+       var iter := new(void,oid).seqbase(0...@0);
+       var item := new(void,oid).seqbase(0...@0);
+       var pos  := new(void,oid).seqbase(0...@0);
+       var frag := new(void,oid).seqbase(0...@0);
+       var ipik := iter;
+
+       printf("#! just fill in the blanks here Henning.....");
+
+        var res := ALG_tj_pfop(iter,item,frag,pos.materialize(ipik));
+
+        return res;
+}
+
+PROC ALG_tj_tfall(
+       BAT[void,any] par_loop,
+       BAT[oid,bat]  par_ws,
+       BAT[oid,bat]  par1_str,
+       BAT[oid,bat]  par2_options
+       ) : BAT[void,bat] 
+{
+       var iter := new(void,oid).seqbase(0...@0);
+       var item := new(void,oid).seqbase(0...@0);
+       var pos  := new(void,oid).seqbase(0...@0);
+       var frag := new(void,oid).seqbase(0...@0);
+       var ipik := iter;
+
+       printf("#! just fill in the blanks here Henning.....");
+
+        var res := ALG_tj_pfop(iter,item,frag,pos.materialize(ipik));
+
+        return res;
+}
+
+PROC ALG_tj_tf(
+       BAT[void,any] par_loop,
+       BAT[oid,bat]  par_ws,
+       BAT[oid,bat]  par1_el,
+       BAT[oid,bat]  par2_str,
+       BAT[oid,bat]  par3_options
+       ) : BAT[void,bat] 
+{
+       var iter := new(void,oid).seqbase(0...@0);
+       var item := new(void,oid).seqbase(0...@0);
+       var pos  := new(void,oid).seqbase(0...@0);
+       var frag := new(void,oid).seqbase(0...@0);
+       var ipik := iter;
+
+       printf("#! just fill in the blanks here Henning.....");
+
+        var res := ALG_tj_pfop(iter,item,frag,pos.materialize(ipik));
+
+        return res;
+}
+
+PROC ALG_tj_fbterms(
+       BAT[void,any] par_loop,
+       BAT[oid,bat]  par_ws,
+       BAT[oid,bat]  par1_el,
+       BAT[oid,bat]  par2_options
+       ) : BAT[void,bat] 
+{
+       var iter := new(void,oid).seqbase(0...@0);
+       var item := new(void,oid).seqbase(0...@0);
+       var pos  := new(void,oid).seqbase(0...@0);
+       var frag := new(void,oid).seqbase(0...@0);
+       var ipik := iter;
+
+       printf("#! just fill in the blanks here Henning.....");
+
+        var res := ALG_tj_pfop(iter,item,frag,pos.materialize(ipik));
+
+        return res;
+}
+
 #
 var ftindex;
 


------------------------------------------------------------------------------
Join us December 9, 2009 for the Red Hat Virtual Experience,
a free event focused on virtualization and cloud computing. 
Attend in-depth sessions from your desk. Your couch. Anywhere.
http://p.sf.net/sfu/redhat-sfdev2dev
_______________________________________________
Monetdb-pf-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-pf-checkins

Reply via email to