Update of /cvsroot/monetdb/sql/src/backends/monet5
In directory sc8-pr-cvs7.sourceforge.net:/tmp/cvs-serv4907

Modified Files:
        sql.mx sql_scenario.mx 
Log Message:
sql.start2();
enables executing mal code in SQL environment.


Index: sql_scenario.mx
===================================================================
RCS file: /cvsroot/monetdb/sql/src/backends/monet5/sql_scenario.mx,v
retrieving revision 1.247
retrieving revision 1.248
diff -u -d -r1.247 -r1.248
--- sql_scenario.mx     19 Feb 2007 10:53:59 -0000      1.247
+++ sql_scenario.mx     20 Feb 2007 12:52:15 -0000      1.248
@@ -34,6 +34,7 @@
 /* #define _SQL_PARSER_DEBUG */
 
 sql5_export str SQLsession(str *ret);
+sql5_export str SQLsession2(str *ret);
 sql5_export str SQLprelude(void);
 sql5_export str SQLepilogue(void);
 sql5_export str SQLstartQuery(int *ret, str *qry);
@@ -132,6 +133,16 @@
 }
 
 str
+SQLsession2(str *ret)
+{
+       str msg = MAL_SUCCEED;
+
+       msg = setScenario(MCgetClient(), "msql");
+       *ret = 0;
+       return msg;
+}
+
+str
 SQLprelude(void)
 {
        int res = 0;
@@ -149,6 +160,23 @@
        /* s->optimizer = "SQLoptimizer";
         * s->tactics = .. */
        s->engine = "SQLengine";
+       (void)SABAOTHmarchScenario(&res, &s->name);
+
+        s = getFreeScenario();
+        if (!s)
+                return NULL; /* should be an error */
+
+        s->name = "msql";
+        s->language = "msql";
+        s->initSystem = "SQLinit";
+        s->exitSystem = "SQLexit";
+        s->initClient = "SQLinitClient";
+        s->exitClient = "SQLexitClient";
+        s->reader = "MALreader";
+        s->parser = "MALparser";
+        s->optimizer = "MALoptimizer";
+        /* s->tactics = .. */
+        s->engine = "MALengine";
        return SABAOTHmarchScenario(&res, &s->name);
 }
 

Index: sql.mx
===================================================================
RCS file: /cvsroot/monetdb/sql/src/backends/monet5/sql.mx,v
retrieving revision 1.210
retrieving revision 1.211
diff -u -d -r1.210 -r1.211
--- sql.mx      20 Feb 2007 11:50:45 -0000      1.210
+++ sql.mx      20 Feb 2007 12:52:15 -0000      1.211
@@ -30,6 +30,10 @@
 address SQLsession
 comment "Switch to processing SQL statements";
 
+command start2():void
+address SQLsession2
+comment "Switch to processing precompiled sql statements";
+
 command trace():void 
 address SQLtrace
 comment "Enable/disable saving the sql statement traces on a client basis.";


-------------------------------------------------------------------------
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

Reply via email to