<!-- $Id$ - - Generate test case PDUs for left-right protocol. Invoke thusly: - - $ xsltproc left-right-protocol-samples.xsl ../docs/left-right-xml --> <xsl:transform xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0" xmlns:exsl="http://exslt.org/common" extension-element-prefixes="exsl"> <xsl:param name="dir">left-right-protocol-samples</xsl:param> <xsl:param name="msgs" select="1"/> <xsl:strip-space elements="*"/> <xsl:template match="/completely_gratuitous_wrapper_element_to_let_me_run_this_through_xmllint"> <xsl:for-each select="*"> <xsl:variable name="filename" select="concat($dir, '/pdu.', format-number(position(), '000'), '.xml')"/> <xsl:if test="$msgs"> <xsl:message><xsl:text>Writing </xsl:text><xsl:value-of select="$filename"/></xsl:message> </xsl:if> <exsl:document href="{$filename}" indent="yes" encoding="US-ASCII"> <xsl:comment>Automatically generated, do not edit.</xsl:comment> <xsl:copy-of select="." /> </exsl:document> </xsl:for-each> </xsl:template> </xsl:transform> <!-- - Local variables: - mode: sgml - compile-command: "xsltproc left-right-protocol-samples.xsl ../docs/left-right-xml" - End: -->