Update of /cvsroot/monetdb/pathfinder/runtime/Tests
In directory 
sfp-cvsdas-1.v30.ch3.sourceforge.com:/tmp/cvs-serv25430/runtime/Tests

Added Files:
        deep_recursion.xq.in 
Log Message:
propagated changes of Tuesday Dec 15 2009 - Thursday Dec 17 2009
from the Nov2009 branch to the development trunk

  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  2009/12/15 - stmane: runtime/Tests/deep_recursion.xq.in,1.1.2.1
  
  added test for a recently reported (too) deep recusion problem;
  let's see, how it works on our various testing platforms ...
  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~


--- NEW FILE: deep_recursion.xq.in ---
pf:add-doc("$TSTSRCDIR/deep_recursion.xml","document.xml")
<>
element result {
 for $name in distinct-values( (
  let $var1 :=
   let $var2 :=
    let $var3 :=
     let $var4 :=
      let $var5 :=
       let $var6 :=
        let $var7 :=
         let $var8 :=
          let $var9 :=
           let $var10 :=
            let $var11 :=
             let $var12 := doc('document.xml')//properties/..
             return $var12[ (self::registry) ]
            return $var11/ancestor-or-self::file[1]/properties/..
           return $var10[ properties/(name)[ contains( lower-case(.),
'system' ) ]  ]
          return $var9/child::registry/properties/..
         return $var8/child::key/properties/..
        return $var7/child::key/properties/..
       return $var6/child::key/properties/..
      return $var5[ properties/(name)[ . = 'Enum' ]  ]
     return $var4/descendant-or-self::key/properties/..
    return $var3[ properties/(name)[ contains( lower-case(.), 'usb' ) ]
]
   return $var2/descendant-or-self::value/properties/..
  return $var1[ properties/(name)[ . = 'LocationInformation' ]  ]
  )/properties/*/name()
 )
 return element name { $name }
}
<>
pf:del-doc("document.xml")


------------------------------------------------------------------------------
This SF.Net email is sponsored by the Verizon Developer Community
Take advantage of Verizon's best-in-class app development support
A streamlined, 14 day to market process makes app distribution fast and easy
Join now and get one step closer to millions of Verizon customers
http://p.sf.net/sfu/verizon-dev2dev 
_______________________________________________
Monetdb-pf-checkins mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/monetdb-pf-checkins

Reply via email to