test wrapping a sequence of elements

arrow-wrap-test.xq

xquery version "3.1";

(: 
 : the children of <arrow> and <for-each> must be equal inside <return-element>
 : and <wrap-element>
 : 
 : in eXistdb 4.1.0 the contents are not equal in wrap-element
:)

declare variable $local:xml :=
    <root>
        <item>1</item>
        <item>2</item>
        <item>3</item>
        <item>4</item>
    </root>
;

declare function local:return ($item as item()) as item() { $item };
declare function local:wrap ($item as item()) as item() { <wrap>{ $item }</wrap> };

<result>
    <return-element>
        <for-each>{ for-each($local:xml//item, local:return#1) }</for-each>
        <arrow>{ $local:xml//item => for-each(local:return#1) }</arrow>
    </return-element>
    <wrap-element>
        <for-each>{ for-each($local:xml//item, local:wrap#1) }</for-each>
        <arrow>{ $local:xml//item => for-each(local:wrap#1) }</arrow>
    </wrap-element>
</result>