Add implementation

3 files changed, 33 insertions, 0 deletions

diff --git a/libxerces-c/tests/psvi-writer/PSVIWriter b/libxerces-c/tests/psvi-writer/PSVIWriter
new file mode 120000
index 0000000..92efd5c
--- /dev/null
+++ b/libxerces-c/tests/psvi-writer/PSVIWriter
@@ -0,0 +1 @@
+../../../upstream/samples/src/PSVIWriter
\ No newline at end of file
diff --git a/libxerces-c/tests/psvi-writer/buildfile b/libxerces-c/tests/psvi-writer/buildfile
new file mode 100644
index 0000000..9a5d84d
--- /dev/null
+++ b/libxerces-c/tests/psvi-writer/buildfile
@@ -0,0 +1,11 @@
+# file      : tests/psvi-writer/buildfile
+# license   : Apache License 2.0; see accompanying LICENSE file
+
+import libs = libxerces-c%lib{xerces-c}
+
+exe{driver}: PSVIWriter/{hxx cxx}{*} $libs testscript
+
+# Disable MSVC warnings that pop up with /W3.
+#
+if ($cxx.class == 'msvc')
+  cxx.coptions += /wd4267
diff --git a/libxerces-c/tests/psvi-writer/testscript b/libxerces-c/tests/psvi-writer/testscript
new file mode 100644
index 0000000..5c3b58f
--- /dev/null
+++ b/libxerces-c/tests/psvi-writer/testscript
@@ -0,0 +1,21 @@
+# file      : tests/psvi-writer/testscript
+# license   : Apache License 2.0; see accompanying LICENSE file
+
+: utf8
+:
+{
+  cat <<EOI >=f;
+    <?xml version="1.0" encoding="UTF-8"?>
+    <msg>
+      Mitteleuropäische catégorie
+    </msg>
+    EOI
+
+  $* f >>~%EOO%
+    %.+
+    %\s*<textContent>%
+    %\s*Mitteleuropäische catégorie%
+    %\s*</textContent>%
+    %.+
+    EOO
+}