home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / XML Utilities / Professional Programmer XSL IDE / Xselerator25.msi / Data.Cab / F28460_append.xsl < prev    next >
Encoding:
Extensible Markup Language  |  2001-11-03  |  1.0 KB  |  30 lines
  1. <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
  2. xmlns:append-foldr-func="append-foldr-func"
  3. exclude-result-prefixes="xsl append-foldr-func"
  4. >
  5.    <xsl:import href="foldr.xsl"/>
  6.  
  7.    <append-foldr-func:append-foldr-func/>
  8.  
  9.     <xsl:template name="append">
  10.       <xsl:param name="pList1" select="/.."/>
  11.       <xsl:param name="pList2" select="/.."/>
  12.  
  13.       <xsl:variable name="vFoldrFun" select="document('')/*/append-foldr-func:*[1]"/>
  14.  
  15.       <xsl:call-template name="foldr">
  16.         <xsl:with-param name="pFunc" select="$vFoldrFun"/>
  17.         <xsl:with-param name="pList" select="$pList1"/>
  18.         <xsl:with-param name="pA0" select="$pList2"/>
  19.       </xsl:call-template>
  20.     </xsl:template>
  21.  
  22.     <xsl:template name="appendL" match="*[namespace-uri() = 'append-foldr-func']">
  23.          <xsl:param name="arg1" select="/.."/>
  24.          <xsl:param name="arg2" select="/.."/>
  25.          
  26.          <xsl:copy-of select="$arg1"/>
  27.          <xsl:copy-of select="$arg2"/>
  28.     </xsl:template>
  29.  
  30. </xsl:stylesheet>