From 3b2bac63554880f5ddd8e2d457e109622da8010e Mon Sep 17 00:00:00 2001
From: Norman Walsh <ndw@nwalsh.com>
Date: Tue, 24 Dec 2024 14:15:12 +0000
Subject: [PATCH] New test for shared, common input

---
 .../pipelines/nw-import-002-lib-common.xpl    | 11 +++++
 test-suite/pipelines/nw-import-002-lib1.xpl   | 14 ++++++
 test-suite/pipelines/nw-import-002-lib2.xpl   | 13 ++++++
 test-suite/tests/nw-import-002.xml            | 43 +++++++++++++++++++
 4 files changed, 81 insertions(+)
 create mode 100644 test-suite/pipelines/nw-import-002-lib-common.xpl
 create mode 100644 test-suite/pipelines/nw-import-002-lib1.xpl
 create mode 100644 test-suite/pipelines/nw-import-002-lib2.xpl
 create mode 100644 test-suite/tests/nw-import-002.xml

diff --git a/test-suite/pipelines/nw-import-002-lib-common.xpl b/test-suite/pipelines/nw-import-002-lib-common.xpl
new file mode 100644
index 00000000..93077803
--- /dev/null
+++ b/test-suite/pipelines/nw-import-002-lib-common.xpl
@@ -0,0 +1,11 @@
+<p:library xmlns:p="http://www.w3.org/ns/xproc"
+           xmlns:test="http://test" version="3.0">
+
+  <p:declare-step type="test:common-step">
+    <p:output port="result"/>
+    <p:identity>
+      <p:with-input><common/></p:with-input>
+    </p:identity>
+  </p:declare-step>
+
+</p:library>
diff --git a/test-suite/pipelines/nw-import-002-lib1.xpl b/test-suite/pipelines/nw-import-002-lib1.xpl
new file mode 100644
index 00000000..50e6f76c
--- /dev/null
+++ b/test-suite/pipelines/nw-import-002-lib1.xpl
@@ -0,0 +1,14 @@
+<p:library xmlns:p="http://www.w3.org/ns/xproc"
+           xmlns:test="http://test" version="3.0">
+
+  <p:import href="nw-import-002-lib2.xpl"/>
+  <p:import href="nw-import-002-lib-common.xpl"/>
+
+  <p:declare-step type="test:one">
+    <p:output port="result"/>
+    <p:identity>
+      <p:with-input><one/></p:with-input>
+    </p:identity>
+  </p:declare-step>
+
+</p:library>
diff --git a/test-suite/pipelines/nw-import-002-lib2.xpl b/test-suite/pipelines/nw-import-002-lib2.xpl
new file mode 100644
index 00000000..539f049d
--- /dev/null
+++ b/test-suite/pipelines/nw-import-002-lib2.xpl
@@ -0,0 +1,13 @@
+<p:library xmlns:p="http://www.w3.org/ns/xproc"
+           xmlns:test="http://test" version="3.0">
+
+  <p:import href="nw-import-002-lib-common.xpl"/>
+
+  <p:declare-step type="test:two">
+    <p:output port="result"/>
+    <p:identity>
+      <p:with-input><two/></p:with-input>
+    </p:identity>
+  </p:declare-step>
+
+</p:library>
diff --git a/test-suite/tests/nw-import-002.xml b/test-suite/tests/nw-import-002.xml
new file mode 100644
index 00000000..c794a1bc
--- /dev/null
+++ b/test-suite/tests/nw-import-002.xml
@@ -0,0 +1,43 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<t:test expected="pass"
+        xmlns:t="http://xproc.org/ns/testsuite/3.0">
+   <t:info>
+      <t:title>nw-import-002</t:title>
+      <t:revision-history>
+         <t:revision>
+            <t:date>2024-12-24</t:date>
+            <t:author>
+               <t:name>Norm Tovey-Walsh</t:name>
+            </t:author>
+            <t:description xmlns="http://www.w3.org/1999/xhtml">
+               <p>Initial commit.</p>
+            </t:description>
+         </t:revision>
+      </t:revision-history>
+   </t:info>
+   <t:description xmlns="http://www.w3.org/1999/xhtml">
+      <p>This test verifies that multiple imports of the same common library do
+      not count as duplicates. It’s derived from a real-world bug report from Achim.</p>
+   </t:description>
+   <t:pipeline>
+      <p:declare-step version="3.0"
+                      xmlns:p="http://www.w3.org/ns/xproc"
+                      xmlns:test="http://test">
+         <p:import href="../pipelines/nw-import-002-lib1.xpl"/>
+         <p:import href="../pipelines/nw-import-002-lib2.xpl"/>
+         <p:output port="result"/>
+         <test:common-step/>
+      </p:declare-step>
+   </t:pipeline>
+   <t:schematron>
+      <s:schema queryBinding="xslt2"
+                xmlns:s="http://purl.oclc.org/dsdl/schematron"
+                xmlns="http://www.w3.org/1999/xhtml">
+         <s:pattern>
+            <s:rule context="/">
+               <s:assert test="common">The pipeline root is not “common”.</s:assert>
+            </s:rule>
+         </s:pattern>
+      </s:schema>
+   </t:schematron>
+</t:test>