Update of /cvsroot/monetdb/pathfinder/runtime/xrpc/demo
In directory sc8-pr-cvs16.sourceforge.net:/tmp/cvs-serv16570/xrpc/demo

Modified Files:
      Tag: xrpcdemo
        demo-xrpcmod.xq index.html 
Log Message:
- several old (minor) changes in the demo
- fix in xrpc_client.mx: in iterative xrpc, there is no $t, since we
  don't use batloop here.



U index.html
Index: index.html
===================================================================
RCS file: /cvsroot/monetdb/pathfinder/runtime/xrpc/demo/Attic/index.html,v
retrieving revision 1.1.2.12
retrieving revision 1.1.2.13
diff -u -d -r1.1.2.12 -r1.1.2.13
--- index.html  12 Jun 2008 19:37:17 -0000      1.1.2.12
+++ index.html  3 Jul 2008 08:42:19 -0000       1.1.2.13
@@ -353,13 +353,13 @@
         default_val = (i==0) ? "192.168.0.1:50001" : "xmark1.xml";
       } else if (val == "nestedRPC") {
         if(i == 0)
-          default_val = "192.168.0.1:50001";
+          default_val = "localhost:50001";
         else if(i == 1)
-          default_val = "jarl.ins.cwi.nl:8080";
-        else if(i == 2)
           default_val = "localhost:60001";
+        else if(i == 2)
+          default_val = "localhost:60005";
         else
-          default_val = "xmark1.xml";
+          default_val = "file:///home/jennie/xmark1.xml";
       } else if (val == "insertPerson") {
         default_val = (i==0) ? "xmark1.xml" : '<person 
id=\"new1\"><name>Ronald</name></person>';
       } else if (val == "insertPersonNested") {

U demo-xrpcmod.xq
Index: demo-xrpcmod.xq
===================================================================
RCS file: /cvsroot/monetdb/pathfinder/runtime/xrpc/demo/Attic/demo-xrpcmod.xq,v
retrieving revision 1.1.2.3
retrieving revision 1.1.2.4
diff -u -d -r1.1.2.3 -r1.1.2.4
--- demo-xrpcmod.xq     12 Jun 2008 19:36:50 -0000      1.1.2.3
+++ demo-xrpcmod.xq     3 Jul 2008 08:42:19 -0000       1.1.2.4
@@ -18,9 +18,9 @@
                        $dst as xs:string,
                        $doc as xs:string) as node()*
 { 
-       for $pid in doc($doc)//person/@id
+       for $pid in subsequence(doc($doc)//person/@id,0,5)
        return  
-               execute at {$dst} {f2:auctionsByPerson($doc, $pid)}
+               execute at {$dst} {f2:auctionsByPerson($doc, 'person10')}
 };
 
 declare function dfx:nestedRPC(
@@ -70,10 +70,9 @@
 declare function dfx:repeatable($dst as xs:string) as node()*
 {
        let $d1 := execute at {$dst} {dfx:getdoc("hello.xml")},
-           $slow := (for $i in 1 to 1000
-                                       return count(doc("xmark1.xml")//*)),
+           $slow := count(for $i in 1 to 10 return element bla 
{doc("xmark2.xml")}),
            $d2 := execute at {$dst} {dfx:getdoc("hello.xml")}
-       return ($d1/hello, $d2/hello)
+       return ($d1//hello, $d2//hello, <slow>{$slow}</slow>)
 };
 
 declare function dfx:getdoc($url as xs:string) as document-node()?


-------------------------------------------------------------------------
Sponsored by: SourceForge.net Community Choice Awards: VOTE NOW!
Studies have shown that voting for your favorite open source project,
along with a healthy diet, reduces your potential for chronic lameness
and boredom. Vote Now at http://www.sourceforge.net/community/cca08
_______________________________________________
Monetdb-pf-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-pf-checkins

Reply via email to