Update of /cvsroot/monetdb/MonetDB5/src/modules/mal
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv24625/src/modules/mal

Modified Files:
        batxml.mx 
Log Message:
introduce correct atom TYPE_xml's


Index: batxml.mx
===================================================================
RCS file: /cvsroot/monetdb/MonetDB5/src/modules/mal/batxml.mx,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -d -r1.12 -r1.13
--- batxml.mx   31 Aug 2007 16:57:12 -0000      1.12
+++ batxml.mx   31 Aug 2007 17:57:52 -0000      1.13
@@ -244,7 +244,7 @@
        int elm,len,size= BUFSIZ;
 
        prepareOperand(b,bid,"str");
-       prepareResult(bn,b,TYPE_str,"str");
+       prepareResult(bn,b,TYPE_xml,"str");
        BATloopFast(b,p,q,xx){
                ptr h= BUNhead(b,p);
                str t= (str) BUNtail(b,p);
@@ -324,7 +324,7 @@
        int tlen= strlen(*name)+2, len, size= BUFSIZ;
 
        prepareOperand(b,bid,"tag");
-       prepareResult(bn,b,TYPE_str,"tag");
+       prepareResult(bn,b,TYPE_xml,"tag");
        snprintf(buf,size,"<%s>",*name);
 
        BATloopFast(b,p,q,xx){
@@ -370,7 +370,7 @@
        int size= BUFSIZ, len=strlen(*name);
 
        prepareOperand(b,bid,"options");
-       prepareResult(bn,b,TYPE_str,"options");
+       prepareResult(bn,b,TYPE_xml,"options");
 
        if( strcmp(*options,"abscent")==0)
                buf[0]=0;
@@ -422,7 +422,7 @@
        int len,size= BUFSIZ;
 
        prepareOperand(b,bid,"comment");
-       prepareResult(bn,b,TYPE_str,"comment");
+       prepareResult(bn,b,TYPE_xml,"comment");
        BATloopFast(b,p,q,xx){
                ptr h= BUNhead(b,p);
                str t= (str) BUNtail(b,p);
@@ -451,7 +451,7 @@
        int xx;
 
        prepareOperand(b,bid,"parse");
-       prepareResult(bn,b,TYPE_str,"parse");
+       prepareResult(bn,b,TYPE_xml,"parse");
        BATloopFast(b,p,q,xx){
        }
        finalizeResult(ret,bn,b);
@@ -467,7 +467,7 @@
 
        (void) operator;
        prepareOperand(b,bid,"pi");
-       prepareResult(bn,b,TYPE_str,"pi");
+       prepareResult(bn,b,TYPE_xml,"pi");
        BATloopFast(b,p,q,xx){
        }
        finalizeResult(ret,bn,b);
@@ -484,7 +484,7 @@
        int len,size= BUFSIZ;
 
        prepareOperand(b,bid,"root");
-       prepareResult(bn,b,TYPE_str,"root");
+       prepareResult(bn,b,TYPE_xml,"root");
 
        len= strlen(*version)+strlen(*standalone)+
                        strlen("<? version=\"\" standalone=\"\"?>");
@@ -519,7 +519,7 @@
        int len,size= BUFSIZ;
 
        prepareOperand(b,bid,"attribute");
-       prepareResult(bn,b,TYPE_str,"attribute");
+       prepareResult(bn,b,TYPE_xml,"attribute");
        BATloopFast(b,p,q,xx){
                ptr h= BUNhead(b,p);
                str t= (str) BUNtail(b,p);
@@ -557,7 +557,7 @@
        if( b== NULL)
                throw(MAL,"xml.element","Can not access BAT");
 
-       prepareResult(bn,b,TYPE_str,"element");
+       prepareResult(bn,b,TYPE_xml,"element");
 
        BATloopFast(b,p,q,xx){
                str t= (str) BUNtail(b,p);
@@ -629,7 +629,7 @@
                throw(MAL,"xml.forest","Can not access BAT");
        }
 
-       prepareResult(bn,b[pci->retc],TYPE_str,"attribute");
+       prepareResult(bn,b[pci->retc],TYPE_xml,"attribute");
 
        while(p[pci->retc] < q[pci->retc]){
                str t;
@@ -694,7 +694,7 @@
                throw(MAL,"xml.concat","Can not access BAT");
        }
 
-       prepareResult(bn,b,TYPE_str,"concat");
+       prepareResult(bn,b,TYPE_xml,"concat");
 
        while(p < q){
                str t= (str) BUNtail(b,p);


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

Reply via email to