RubyGems - simple-xspec-wrapper - Versions diffs - 0.1.0-java - Mend

simple-xspec-wrapper 0.1.0-java

Files changed (242) hide show

data/vendor/xspec-1.0.0/src/reporter/coverage-report.xsl ADDED Viewed

@@ -0,0 +1,378 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!-- ===================================================================== -->
+<!--  File:       coverage-report.xsl                                      -->
+<!--  Author:     Jeni Tennsion                                            -->
+<!--  Tags:                                                                -->
+<!--    Copyright (c) 2008, 2010 Jeni Tennsion (see end of file.)          -->
+<!-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -->
+<xsl:stylesheet version="2.0"
+  xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+  xmlns:xs="http://www.w3.org/2001/XMLSchema"
+  xmlns:test="http://www.jenitennison.com/xslt/unit-test"
+  xmlns="http://www.w3.org/1999/xhtml"
+  xmlns:pkg="http://expath.org/ns/pkg"
+  exclude-result-prefixes="xs">
+<xsl:import href="format-utils.xsl" />
+<pkg:import-uri>http://www.jenitennison.com/xslt/xspec/coverage-report.xsl</pkg:import-uri>
+<xsl:param name="pwd"   as="xs:string" required="yes"/>
+<xsl:param name="tests" as="xs:string" required="yes"/>
+<xsl:variable name="tests-uri" as="xs:anyURI" select="
+    resolve-uri(translate($tests, '\', '/'), $pwd)"/>
+<xsl:variable name="stylesheet-uri" as="xs:anyURI"
+  select="if (doc($tests-uri)/*/@stylesheet)
+          then resolve-uri(doc($tests-uri)/*/@stylesheet, $tests-uri)
+          else $tests-uri" />
+<xsl:variable name="trace" as="document-node()" select="/" />
+<xsl:variable name="stylesheet-trees" as="document-node()+"
+  select="test:collect-stylesheets(doc($stylesheet-uri))" />
+<xsl:function name="test:collect-stylesheets" as="document-node()+">
+  <xsl:param name="stylesheets" as="document-node()+" />
+  <xsl:variable name="imports" as="document-node()*"
+    select="document($stylesheets/*/(xsl:import|xsl:include)/@href)" />
+  <xsl:variable name="new-stylesheets" as="document-node()*"
+    select="$stylesheets | $imports" />
+  <xsl:choose>
+    <xsl:when test="$imports except $stylesheets">
+      <xsl:sequence select="test:collect-stylesheets($stylesheets | $imports)" />
+    </xsl:when>
+    <xsl:otherwise>
+      <xsl:sequence select="$stylesheets" />
+    </xsl:otherwise>
+  </xsl:choose>
+</xsl:function>
+<xsl:key name="modules" match="m" use="@u" />
+<xsl:key name="constructs" match="c" use="@id" />
+<xsl:key name="coverage" match="h" use="concat(@m, ':', @l)" />
+<xsl:template match="/">
+  <xsl:apply-templates select="." mode="test:coverage-report" />
+</xsl:template>
+<xsl:template match="/" mode="test:coverage-report">
+  <html>
+    <head>
+      <title>Test Coverage Report for <xsl:value-of select="test:format-URI($stylesheet-uri)" /></title>
+      <link rel="stylesheet" type="text/css"
+        href="{resolve-uri('test-report.css', static-base-uri())}" />
+    </head>
+    <body>
+      <h1>Test Coverage Report</h1>
+      <p>Stylesheet:  <a href="{$stylesheet-uri}"><xsl:value-of select="test:format-URI($stylesheet-uri)" /></a></p>
+      <xsl:apply-templates select="$stylesheet-trees/xsl:*" mode="test:coverage-report" />
+    </body>
+  </html>
+</xsl:template>
+<xsl:template match="xsl:stylesheet | xsl:transform" mode="test:coverage-report">
+  <xsl:variable name="stylesheet-uri" as="xs:anyURI"
+    select="base-uri(.)" />
+  <xsl:variable name="stylesheet-tree" as="document-node()"
+    select=".." />
+  <xsl:variable name="stylesheet-string" as="xs:string"
+    select="unparsed-text($stylesheet-uri)" />
+  <xsl:variable name="stylesheet-lines" as="xs:string+"
+    select="tokenize($stylesheet-string, '\n')" />
+  <xsl:variable name="number-of-lines" as="xs:integer"
+    select="count($stylesheet-lines)" />
+  <xsl:variable name="number-width" as="xs:integer"
+    select="string-length(xs:string($number-of-lines))" />
+  <xsl:variable name="number-format" as="xs:string"
+  select="string-join(for $i in 1 to $number-width return '0', '')" />
+  <xsl:variable name="module" as="xs:string?">
+    <xsl:variable name="uri" as="xs:string"
+      select="if (starts-with($stylesheet-uri, '/'))
+              then concat('file:', $stylesheet-uri)
+              else $stylesheet-uri" />
+    <xsl:sequence select="key('modules', $uri, $trace)/@id" />
+  </xsl:variable>
+  <h2>
+    module: <xsl:value-of select="$stylesheet-uri" />;
+    <xsl:value-of select="$number-of-lines" /> lines
+  </h2>
+  <xsl:choose>
+    <xsl:when test="empty($module)">
+      <p><span class="missed">not used</span></p>
+    </xsl:when>
+    <xsl:otherwise>
+      <pre>
+        <xsl:value-of select="format-number(1, $number-format)" />
+        <xsl:text>: </xsl:text>
+        <xsl:call-template name="test:output-lines">
+          <xsl:with-param name="line-number" select="0" />
+          <xsl:with-param name="stylesheet-string" select="$stylesheet-string" />
+          <xsl:with-param name="node" select="." />
+          <xsl:with-param name="number-format" tunnel="yes" select="$number-format" />
+          <xsl:with-param name="module" tunnel="yes" select="$module" />
+        </xsl:call-template>
+      </pre>
+    </xsl:otherwise>
+  </xsl:choose>
+</xsl:template>
+<xsl:variable name="attribute-regex" as="xs:string">
+  <xsl:value-of>
+    \s+
+    ([^>\s]+)      <!-- 1: the name of the attribute -->
+    \s*
+    =
+    \s*
+    (          <!-- 2: the value of the attribute (with quotes) -->
+      "([^"]*)"  <!-- 3: the value without quotes -->
+      |
+      '([^']*)'  <!-- 4: also the value without quotes -->
+    )
+  </xsl:value-of>
+</xsl:variable>
+<xsl:variable name="construct-regex" as="xs:string">
+  <xsl:value-of>
+    ^
+    (             <!-- 1: the construct -->
+      ([^&lt;]+)    <!-- 2: some text -->
+      |
+      (&lt;!--     <!-- 3: a comment -->
+        ([^-]|-[^-])*  <!-- 4: the content of the comment -->
+       --&gt;)
+      |
+      (&lt;\?      <!-- 5: a PI -->
+        ([^?]|\?[^>])*  <!-- 6: the content of the PI -->
+       \?&gt;)
+      |
+      (&lt;\[CDATA\[   <!-- 7: a CDATA section -->
+        ([^\]]|\][^\]]|\]\][^>])*  <!-- 8: the content of the CDATA section -->
+       \]\]>)
+      |
+      (&lt;/     <!-- 9: a close tag -->
+        ([^>]+)   <!-- 10: the name of the element being closed -->
+       >)
+      |
+      (&lt;      <!-- 11: an open tag -->
+        ([^>/\s]+)    <!-- 12: the name of the element being opened -->
+        (        <!-- 13: the attributes of the element -->
+          (      <!-- 14: wrapper for the attribute regex -->
+            <xsl:value-of select="$attribute-regex" />  <!-- 15-18 attribute stuff -->
+          )*
+        )
+        \s*
+        (/?)      <!-- 19: empty element tag flag -->
+        >
+      )
+    )
+    (.*)          <!-- 20: the rest of the string -->
+    $
+  </xsl:value-of>
+</xsl:variable>
+<xsl:template name="test:output-lines">
+  <xsl:param name="line-number" as="xs:integer" required="yes" />
+  <xsl:param name="stylesheet-string" as="xs:string" required="yes" />
+  <xsl:param name="node" as="node()" required="yes" />
+  <xsl:param name="number-format" tunnel="yes" as="xs:string" required="yes" />
+  <xsl:param name="module" tunnel="yes" as="xs:string" required="yes" />
+  <xsl:analyze-string select="$stylesheet-string"
+    regex="{$construct-regex}" flags="sx">
+    <xsl:matching-substring>
+      <xsl:variable name="construct" as="xs:string" select="regex-group(1)" />
+      <xsl:variable name="rest" as="xs:string" select="regex-group(20)" />
+      <xsl:variable name="construct-lines" as="xs:string+"
+      select="tokenize($construct, '\n')" />
+      <xsl:variable name="endTag" as="xs:boolean" select="regex-group(9) != ''" />
+      <xsl:variable name="emptyTag" as="xs:boolean" select="regex-group(19) != ''" />
+      <xsl:variable name="startTag" as="xs:boolean" select="not($emptyTag) and regex-group(11) != ''" />
+      <xsl:variable name="matches" as="xs:boolean"
+        select="($node instance of text() and
+                 regex-group(2) != '') or
+                ($node instance of element() and
+                 ($startTag or $endTag or $emptyTag) and
+                 name($node) = (regex-group(10), regex-group(12))) or
+                ($node instance of comment() and
+                 regex-group(3) != '') or
+                ($node instance of processing-instruction() and
+                regex-group(5) != '')" />
+      <xsl:variable name="coverage" as="xs:string"
+        select="if ($matches) then test:coverage($node, $module) else 'ignored'" />
+      <xsl:for-each select="$construct-lines">
+        <xsl:if test="position() != 1">
+          <xsl:text>&#xA;</xsl:text>
+          <xsl:value-of select="format-number($line-number + position(), $number-format)" />
+          <xsl:text>: </xsl:text>
+        </xsl:if>
+        <span class="{$coverage}">
+          <xsl:value-of select="." />
+        </span>
+      </xsl:for-each>
+      <xsl:if test="$rest != ''">
+        <xsl:call-template name="test:output-lines">
+          <xsl:with-param name="line-number" select="$line-number + count($construct-lines) - 1" />
+          <xsl:with-param name="stylesheet-string" select="$rest" />
+          <xsl:with-param name="node" as="node()">
+            <xsl:choose>
+              <xsl:when test="$matches">
+                <xsl:choose>
+                  <xsl:when test="$startTag">
+                    <xsl:choose>
+                      <xsl:when test="$node/node()">
+                        <xsl:sequence select="$node/node()[1]" />
+                      </xsl:when>
+                      <xsl:otherwise>
+                        <xsl:sequence select="$node" />
+                      </xsl:otherwise>
+                    </xsl:choose>
+                  </xsl:when>
+                  <xsl:otherwise>
+                    <xsl:choose>
+                      <xsl:when test="$node/following-sibling::node()">
+                        <xsl:sequence select="$node/following-sibling::node()[1]" />
+                      </xsl:when>
+                      <xsl:otherwise>
+                        <xsl:sequence select="$node/parent::node()" />
+                      </xsl:otherwise>
+                    </xsl:choose>
+                  </xsl:otherwise>
+                </xsl:choose>
+              </xsl:when>
+              <xsl:otherwise>
+                <xsl:sequence select="$node" />
+              </xsl:otherwise>
+            </xsl:choose>
+          </xsl:with-param>
+        </xsl:call-template>
+      </xsl:if>
+    </xsl:matching-substring>
+    <xsl:non-matching-substring>
+      <xsl:message terminate="yes">
+        unmatched string: <xsl:value-of select="." />
+      </xsl:message>
+    </xsl:non-matching-substring>
+  </xsl:analyze-string>
+</xsl:template>
+<xsl:function name="test:coverage" as="xs:string">
+  <xsl:param name="node" as="node()" />
+  <xsl:param name="module" as="xs:string" />
+  <xsl:variable name="coverage" as="xs:string+">
+    <xsl:apply-templates select="$node" mode="test:coverage">
+      <xsl:with-param name="module" tunnel="yes" select="$module" />
+    </xsl:apply-templates>
+  </xsl:variable>
+  <xsl:if test="count($coverage) > 1">
+    <xsl:message terminate="yes">
+      more than one coverage identified for:
+      <xsl:sequence select="$node" />
+    </xsl:message>
+  </xsl:if>
+  <xsl:sequence select="$coverage[1]" />
+</xsl:function>
+<xsl:template match="text()[normalize-space(.) = '' and not(parent::xsl:text)]" mode="test:coverage">ignored</xsl:template>
+<xsl:template match="processing-instruction() | comment()" mode="test:coverage">ignored</xsl:template>
+<!-- A hit on these nodes doesn't really count; you have to hit
+     their contents to hit them -->
+<xsl:template match="xsl:otherwise | xsl:when | xsl:matching-substring | xsl:non-matching-substring | xsl:for-each | xsl:for-each-group" mode="test:coverage">
+  <xsl:param name="module" tunnel="yes" as="xs:string" required="yes" />
+  <xsl:variable name="hits-on-content" as="element(h)*"
+    select="test:hit-on-nodes(node(), $module)" />
+  <xsl:choose>
+    <xsl:when test="exists($hits-on-content)">hit</xsl:when>
+    <xsl:otherwise>missed</xsl:otherwise>
+  </xsl:choose>
+</xsl:template>
+<xsl:template match="* | text()" mode="test:coverage">
+  <xsl:param name="module" tunnel="yes" as="xs:string" required="yes" />
+  <xsl:variable name="hit" as="element(h)*"
+    select="test:hit-on-nodes(., $module)" />
+  <xsl:choose>
+    <xsl:when test="exists($hit)">hit</xsl:when>
+    <xsl:when test="self::text() and normalize-space(.) = '' and not(parent::xsl:text)">ignored</xsl:when>
+    <xsl:when test="self::xsl:variable">
+      <xsl:sequence select="test:coverage(following-sibling::*[not(self::xsl:variable)][1], $module)" />
+    </xsl:when>
+    <xsl:when test="ancestor::xsl:variable">
+      <xsl:sequence select="test:coverage(ancestor::xsl:variable[1], $module)" />
+    </xsl:when>
+    <xsl:when test="self::xsl:stylesheet or self::xsl:transform">ignored</xsl:when>
+    <xsl:when test="self::xsl:function or self::xsl:template">missed</xsl:when>
+    <!-- A node within a top-level non-XSLT element -->
+    <xsl:when test="empty(ancestor::xsl:*[parent::xsl:stylesheet or parent::xsl:transform])">ignored</xsl:when>
+    <xsl:when test="self::xsl:param">
+      <xsl:sequence select="test:coverage(parent::*, $module)" />
+    </xsl:when>
+    <xsl:otherwise>missed</xsl:otherwise>
+  </xsl:choose>
+</xsl:template>
+<xsl:template match="/" mode="test:coverage">ignored</xsl:template>
+<xsl:function name="test:hit-on-nodes" as="element(h)*"
+              xmlns:saxon="http://saxon.sf.net/" exclude-result-prefixes="saxon">
+  <xsl:param name="nodes" as="node()*" />
+  <xsl:param name="module" as="xs:string" />
+  <xsl:for-each select="$nodes[not(self::text()[not(normalize-space())])]">
+    <xsl:variable name="hits" as="element(h)*"
+      select="test:hit-on-lines(saxon:line-number(.), $module)" />
+    <xsl:variable name="name" as="xs:string"
+      select="concat('{', namespace-uri(.), '}', local-name(.))" />
+    <xsl:for-each select="$hits">
+      <xsl:variable name="construct" as="xs:string"
+        select="key('constructs', @c)/@n" />
+      <xsl:if test="$name = $construct or
+                    not(starts-with($construct, '{'))">
+        <xsl:sequence select="." />
+      </xsl:if>
+    </xsl:for-each>
+  </xsl:for-each>
+</xsl:function>
+<xsl:function name="test:hit-on-lines" as="element(h)*">
+  <xsl:param name="line-numbers" as="xs:integer*" />
+  <xsl:param name="module" as="xs:string" />
+  <xsl:variable name="keys" as="xs:string*"
+    select="for $l in $line-numbers
+            return concat($module, ':', $l)" />
+  <xsl:sequence select="key('coverage', $keys, $trace)" />
+</xsl:function>
+</xsl:stylesheet>
+<!-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -->
+<!-- DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS COMMENT.             -->
+<!--                                                                       -->
+<!-- Copyright (c) 2008, 2010 Jeni Tennsion                                -->
+<!--                                                                       -->
+<!-- The contents of this file are subject to the MIT License (see the URI -->
+<!-- http://www.opensource.org/licenses/mit-license.php for details).      -->
+<!--                                                                       -->
+<!-- Permission is hereby granted, free of charge, to any person obtaining -->
+<!-- a copy of this software and associated documentation files (the       -->
+<!-- "Software"), to deal in the Software without restriction, including   -->
+<!-- without limitation the rights to use, copy, modify, merge, publish,   -->
+<!-- distribute, sublicense, and/or sell copies of the Software, and to    -->
+<!-- permit persons to whom the Software is furnished to do so, subject to -->
+<!-- the following conditions:                                             -->
+<!--                                                                       -->
+<!-- The above copyright notice and this permission notice shall be        -->
+<!-- included in all copies or substantial portions of the Software.       -->
+<!--                                                                       -->
+<!-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,       -->
+<!-- EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF    -->
+<!-- MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.-->
+<!-- IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY  -->
+<!-- CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,  -->
+<!-- TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE     -->
+<!-- SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.                -->
+<!-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -->

data/vendor/xspec-1.0.0/src/reporter/format-utils.xsl ADDED Viewed

@@ -0,0 +1,220 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!-- ===================================================================== -->
+<!--  File:       format-utils.xsl                                         -->
+<!--  Author:     Jeni Tennsion                                            -->
+<!--  Tags:                                                                -->
+<!--    Copyright (c) 2008, 2010 Jeni Tennsion (see end of file.)          -->
+<!-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -->
+<xsl:stylesheet version="2.0"
+                xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+                xmlns:xs="http://www.w3.org/2001/XMLSchema"
+                xmlns:test="http://www.jenitennison.com/xslt/unit-test"
+                xmlns:x="http://www.jenitennison.com/xslt/xspec"
+                xmlns="http://www.w3.org/1999/xhtml"
+                xmlns:pkg="http://expath.org/ns/pkg"
+                exclude-result-prefixes="test xs x pkg">
+<xsl:import href="../compiler/generate-tests-utils.xsl" />
+<pkg:import-uri>http://www.jenitennison.com/xslt/xspec/format-utils.xsl</pkg:import-uri>
+<xsl:output name="x:report" method="xml" indent="yes"/>
+<xsl:variable name="omit-namespaces" as="xs:string+"
+  select="('http://www.w3.org/XML/1998/namespace',
+           'http://www.w3.org/1999/XSL/Transform',
+           'http://www.w3.org/2001/XMLSchema',
+           'http://www.jenitennison.com/xslt/unit-test',
+           'http://www.jenitennison.com/xslt/xspec')" />
+<xsl:template match="*" mode="test:serialize" priority="20">
+  <xsl:param name="level" as="xs:integer" select="0" tunnel="yes" />
+  <xsl:param name="perform-comparison" tunnel="yes" as="xs:boolean" select="false()" />
+  <xsl:param name="comparison" as="node()?" select="()" />
+  <xsl:param name="expected" as="xs:boolean" select="true()" />
+  <xsl:text>&lt;</xsl:text>
+  <xsl:choose>
+    <xsl:when test="$perform-comparison">
+      <span class="{if (if ($expected) then test:deep-equal(., $comparison) else test:deep-equal($comparison, .)) then 'same' else 'diff'}">
+        <xsl:value-of select="name()" />
+      </span>
+    </xsl:when>
+    <xsl:otherwise>
+      <xsl:value-of select="name()" />
+    </xsl:otherwise>
+  </xsl:choose>
+  <xsl:variable name="attribute-indent" as="xs:string">
+    <xsl:value-of>
+      <xsl:text>&#xA;</xsl:text>
+      <xsl:for-each select="1 to $level"><xsl:text>   </xsl:text></xsl:for-each>
+      <xsl:value-of select="replace(name(parent::*), '.', ' ')" />
+    </xsl:value-of>
+  </xsl:variable>
+  <xsl:variable name="new-namespaces" as="node()*"
+    select="namespace::*[not(. = $omit-namespaces) and ($level = 0 or not(name() = ../../namespace::*/name()))]" />
+  <xsl:if test="not(namespace::*[name() = '']) and ../namespace::*[name() = '']">
+    <xsl:text> xmlns=""</xsl:text>
+  </xsl:if>
+  <xsl:for-each select="$new-namespaces">
+    <xsl:if test="position() > 1">
+      <xsl:value-of select="$attribute-indent" />
+    </xsl:if>
+    <xsl:text> xmlns</xsl:text>
+    <xsl:if test="name()">
+      <xsl:value-of select="concat(':', name())" />
+    </xsl:if>
+    <xsl:text>="</xsl:text>
+    <xsl:value-of select="." />
+    <xsl:text>"</xsl:text>
+  </xsl:for-each>
+  <xsl:for-each select="@*">
+    <xsl:if test="$new-namespaces or position() > 1">
+      <xsl:value-of select="$attribute-indent" />
+    </xsl:if>
+    <xsl:text> </xsl:text>
+    <xsl:choose>
+      <xsl:when test="$perform-comparison">
+        <xsl:variable name="name" as="xs:QName" select="node-name(.)" />
+        <xsl:variable name="comparison-att" as="attribute()?" select="$comparison/@*[node-name(.) = $name]" />
+        <span class="{if (if ($expected) then test:deep-equal(., $comparison-att) else test:deep-equal($comparison-att, .)) then 'same' else 'diff'}">
+          <xsl:value-of select="name()" />
+        </span>
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:value-of select="name()" />
+      </xsl:otherwise>
+    </xsl:choose>
+    <xsl:text>="</xsl:text>
+    <xsl:value-of select="replace(replace(., '&quot;', '&amp;quot;'),
+      '\s(\s+)', '&#xA;$1')" />
+    <xsl:text>"</xsl:text>
+  </xsl:for-each>
+  <xsl:choose>
+    <xsl:when test="child::node()">
+      <xsl:text>&gt;</xsl:text>
+      <xsl:choose>
+        <xsl:when test="$perform-comparison and
+          not($expected) and
+          $comparison/node() instance of text() and
+          $comparison = '...'">
+          <xsl:text>...</xsl:text>
+        </xsl:when>
+        <xsl:when test="$perform-comparison">
+          <xsl:for-each select="node()">
+            <xsl:variable name="pos" as="xs:integer" select="position()" />
+            <xsl:apply-templates select="." mode="test:serialize">
+              <xsl:with-param name="level" select="$level + 1" tunnel="yes" />
+              <xsl:with-param name="comparison" select="$comparison/node()[position() = $pos]" />
+              <xsl:with-param name="expected" select="$expected" />
+            </xsl:apply-templates>
+          </xsl:for-each>
+        </xsl:when>
+        <xsl:otherwise>
+          <xsl:apply-templates mode="test:serialize">
+            <xsl:with-param name="level" select="$level + 1" tunnel="yes" />
+          </xsl:apply-templates>
+        </xsl:otherwise>
+      </xsl:choose>
+      <xsl:text>&lt;/</xsl:text>
+      <xsl:value-of select="name()" />
+      <xsl:text>&gt;</xsl:text>
+    </xsl:when>
+    <xsl:otherwise> /&gt;</xsl:otherwise>
+  </xsl:choose>
+</xsl:template>
+<xsl:template match="comment()" mode="test:serialize">
+  <xsl:sequence
+    select="concat('&lt;--', ., '--&gt;')" />
+</xsl:template>
+<xsl:template match="processing-instruction()" mode="test:serialize">
+  <xsl:sequence select="concat('&lt;?', name(), ' ', ., '?&gt;')" />
+</xsl:template>
+<xsl:template match="node()" mode="test:serialize" priority="10">
+  <xsl:param name="perform-comparison" tunnel="yes" as="xs:boolean" select="false()" />
+  <xsl:param name="comparison" as="node()?" select="()" />
+  <xsl:param name="expected" as="xs:boolean" select="true()" />
+  <xsl:variable name="serialized" as="item()*">
+    <xsl:next-match />
+  </xsl:variable>
+  <xsl:choose>
+    <xsl:when test="$perform-comparison">
+      <span class="{if (if ($expected) then test:deep-equal(., $comparison) else test:deep-equal($comparison, .)) then 'same' else 'diff'}">
+        <xsl:copy-of select="$serialized" />
+      </span>
+    </xsl:when>
+    <xsl:otherwise>
+      <xsl:copy-of select="$serialized" />
+    </xsl:otherwise>
+  </xsl:choose>
+</xsl:template>
+<xsl:template match="test:ws" mode="test:serialize" priority="30">
+  <xsl:param name="perform-comparison" as="xs:boolean" tunnel="yes" select="false()" />
+  <xsl:if test="$perform-comparison">
+    <span class="whitespace">
+      <xsl:analyze-string select="." regex="\s">
+        <xsl:matching-substring>
+          <xsl:choose>
+            <xsl:when test=". = '&#xA;'">\n</xsl:when>
+            <xsl:when test=". = '&#xD;'">\r</xsl:when>
+            <xsl:when test=". = '&#x9;'">\t</xsl:when>
+            <xsl:when test=". = ' '">.</xsl:when>
+          </xsl:choose>
+        </xsl:matching-substring>
+      </xsl:analyze-string>
+    </span>
+  </xsl:if>
+</xsl:template>
+<xsl:template match="text()[not(normalize-space())]" mode="test:serialize" priority="20">
+  <xsl:param name="indentation" as="xs:integer" tunnel="yes" select="0" />
+  <xsl:value-of select="concat('&#xA;', substring(., $indentation + 2))" />
+</xsl:template>
+<xsl:function name="test:format-URI" as="xs:string">
+  <xsl:param name="URI" as="xs:anyURI" />
+  <xsl:choose>
+    <xsl:when test="starts-with($URI, 'file:/')">
+      <xsl:value-of select="replace(substring-after($URI, 'file:/'), '%20', ' ')" />
+    </xsl:when>
+    <xsl:otherwise>
+      <xsl:value-of select="$URI" />
+    </xsl:otherwise>
+  </xsl:choose>
+</xsl:function>
+</xsl:stylesheet>
+<!-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -->
+<!-- DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS COMMENT.             -->
+<!--                                                                       -->
+<!-- Copyright (c) 2008, 2010 Jeni Tennsion                                -->
+<!--                                                                       -->
+<!-- The contents of this file are subject to the MIT License (see the URI -->
+<!-- http://www.opensource.org/licenses/mit-license.php for details).      -->
+<!--                                                                       -->
+<!-- Permission is hereby granted, free of charge, to any person obtaining -->
+<!-- a copy of this software and associated documentation files (the       -->
+<!-- "Software"), to deal in the Software without restriction, including   -->
+<!-- without limitation the rights to use, copy, modify, merge, publish,   -->
+<!-- distribute, sublicense, and/or sell copies of the Software, and to    -->
+<!-- permit persons to whom the Software is furnished to do so, subject to -->
+<!-- the following conditions:                                             -->
+<!--                                                                       -->
+<!-- The above copyright notice and this permission notice shall be        -->
+<!-- included in all copies or substantial portions of the Software.       -->
+<!--                                                                       -->
+<!-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,       -->
+<!-- EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF    -->
+<!-- MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.-->
+<!-- IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY  -->
+<!-- CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,  -->
+<!-- TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE     -->
+<!-- SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.                -->
+<!-- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -->