Update of /cvsroot/monetdb/pathfinder/tests/BugTracker/Tests
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv3201/Tests

Modified Files:
      Tag: Aug2009
        All 
Added Files:
      Tag: Aug2009
        child-steps-and-replace.SF-2716723.stable.err 
        child-steps-and-replace.SF-2716723.stable.out 
        child-steps-and-replace.SF-2716723.xml 
        child-steps-and-replace.SF-2716723.xq.in 
Log Message:
adding test for bug SF-2716723.

U All
Index: All
===================================================================
RCS file: /cvsroot/monetdb/pathfinder/tests/BugTracker/Tests/All,v
retrieving revision 1.144.2.2
retrieving revision 1.144.2.3
diff -u -d -r1.144.2.2 -r1.144.2.3
--- All 7 Sep 2009 22:16:09 -0000       1.144.2.2
+++ All 8 Sep 2009 07:34:10 -0000       1.144.2.3
@@ -210,6 +210,7 @@
 nil-value-in-elem-construct.SF-2815820
 oidInDocMgmt.SF-2686121
 distinct-values-two-sequences.SF-2853441
+child-steps-and-replace.SF-2716723
 #
 # Test "Zombie_document.SF-2009556" currently seems to corrupt the database 
and hence should be last in this list! 
 Zombie_document.SF-2009556

--- NEW FILE: child-steps-and-replace.SF-2716723.xq.in ---
declare function local:normCompanyName($name as xs:string) as xs:string {
 normalize-space(replace(
   upper-case(translate($name,",./()-","      "))
 ,"LIMITED","LTD"))
};

declare function local:companyList($rootnode as node()*) {
   let $all := $rootnode//company/addressbook/name
   let $uniqueNames := distinct-values(for $i in $all
                                       return local:normCompanyName($i))
   for $i in $uniqueNames
   let $firstNode := $all[local:normCompanyName(.)=$i][1]
   return $firstNode/../..
};

let $col := doc("$TSTSRCDIR/child-steps-and-replace.SF-2716723.xml")
return local:companyList($col)

--- NEW FILE: child-steps-and-replace.SF-2716723.xml ---
<dummy>
  <company>
  <addressbook>
  <name>X LIMITED</name>
  </addressbook>
  </company>
  <company>
  <addressbook>
  <name>Y</name>
  </addressbook>
  </company>
  <company>
  <addressbook>
  <name>X LTD</name>
  </addressbook>
  </company>
  <company>
  <addressbook>
  <name>Y....</name>
  </addressbook>
  </company>
</dummy>

--- NEW FILE: child-steps-and-replace.SF-2716723.stable.err ---
stderr of test 'child-steps-and-replace.SF-2716723` in directory 
'tests/BugTracker` itself:


# 09:25:10 >  
# 09:25:10 >  ./child-steps-and-replace.SF-2716723.sh 
child-steps-and-replace.SF-2716723 
# 09:25:10 >  


# 09:27:25 >  
# 09:27:25 >  mclient -lxquery -fxml -umonetdb -Pmonetdb --host=localhost 
--port=39458 child-steps-and-replace.SF-2716723.xq
# 09:27:25 >  



# 09:27:26 >  
# 09:27:26 >  Done.
# 09:27:26 >  


--- NEW FILE: child-steps-and-replace.SF-2716723.stable.out ---
stdout of test 'child-steps-and-replace.SF-2716723` in directory 
'tests/BugTracker` itself:


# 09:25:10 >  
# 09:25:10 >  ./child-steps-and-replace.SF-2716723.sh 
child-steps-and-replace.SF-2716723 
# 09:25:10 >  

# MonetDB Server v4.32.0
# based on GDK   v1.32.0
# Copyright (c) 1993-July 2008, CWI. All rights reserved.
# Copyright (c) August 2008-2009, MonetDB B.V.. All rights reserved.
# Compiled for x86_64-unknown-linux-gnu/64bit with 64bit OIDs; dynamically 
linked.
# Visit http://monetdb.cwi.nl/ for further information.
# PF/Tijah module v0.13.0 loaded. http://dbappl.cs.utwente.nl/pftijah
# MonetDB/XQuery module v0.28.3 loaded (default back-end is 'algebra')
# XRPC administrative console at http://127.0.0.1:48456/admin

printf("\nReady.\n");

Ready.
quit();

Over..

# 09:31:27 >  
# 09:31:27 >  mclient -lxquery -fxml -umonetdb -Pmonetdb --host=localhost 
--port=36249 child-steps-and-replace.SF-2716723.xq
# 09:31:27 >  

<?xml version="1.0" encoding="utf-8"?>
<XQueryResult><company>
  <addressbook>
  <name>X LIMITED</name>
  </addressbook>
  </company><company>
  <addressbook>
  <name>Y</name>
  </addressbook>
  </company></XQueryResult>

# 09:31:28 >  
# 09:31:28 >  Done.
# 09:31:28 >  



------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day 
trial. Simplify your report design, integration and deployment - and focus on 
what you do best, core application coding. Discover what's new with 
Crystal Reports now.  http://p.sf.net/sfu/bobj-july
_______________________________________________
Monetdb-pf-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-pf-checkins

Reply via email to