Update of /cvsroot/monetdb/sql/src/backends/monet5
In directory sfp-cvsdas-1.v30.ch3.sourceforge.com:/tmp/cvs-serv8846

Modified Files:
        sql.mx 
Log Message:
Added primitives for bid exchange on the level of mal plans.



Index: sql.mx
===================================================================
RCS file: /cvsroot/monetdb/sql/src/backends/monet5/sql.mx,v
retrieving revision 1.397
retrieving revision 1.398
diff -u -d -r1.397 -r1.398
--- sql.mx      18 Feb 2010 08:55:38 -0000      1.397
+++ sql.mx      19 Feb 2010 15:35:28 -0000      1.398
@@ -888,6 +888,32 @@
        return getVariable:= b;
 end octopus.getVariable;
 
+function octopus.register(dbname:str, fn:str):void;
+       conn := remote.connect(dbname,"monetdb", "monetdb", "msql");
+       remote.register(conn,"octopus",fn);
+       catch ANYexception:str ;
+       exit ANYexception:str ;
+    remote.disconnect(conn);
+end octopus.register;
+
+function octopus.getBid(dbname:str, fn:str, bidtype:sht):lng;
+res:lng := calc.lng(-1);
+barrier remotewrk := calc.!=(dbname,"NOTworker");
+       conn := remote.connect(dbname,"monetdb", "monetdb", "msql");
+    r_fn := remote.put(conn,fn);
+    r_bt := remote.put(conn,bidtype);
+    r_getBid := remote.put(conn,getBid);
+    r_getBid := remote.exec(conn,"trader","makeBid",r_fn,r_bt);
+    res:lng  := remote.get(conn,r_getBid);
+  catch ANYexception:str ;
+    remote.disconnect(conn);
+    raise ANYexception:str ;
+  exit ANYexception:str ;
+    remote.disconnect(conn);
+exit remotewrk;
+    return getBid:lng := res;
+end getBid;
+
 pattern rdfshred (location:str, gname:str, schema:str)
 address SQLrdfShred
 comment "Procedure that wraps around the shredder of the rdf module in MAL. 


------------------------------------------------------------------------------
Download Intel® Parallel Studio Eval
Try the new software tools for yourself. Speed compiling, find bugs
proactively, and fine-tune applications for parallel performance.
See why Intel Parallel Studio got high marks during beta.
http://p.sf.net/sfu/intel-sw-dev
_______________________________________________
Monetdb-sql-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-sql-checkins

Reply via email to