XSLT test for #423 (Runtime source document should be removed) (XProc) (

#433)

test/win-bats/collection.xml

@@ -655,4 +655,14 @@
     call :verify_line  * x "x:space is deprecated. Use x:text instead."
     call :verify_line -1 x "*** Error compiling the test suite"
 	</case>
+
+	<case ifdef="XMLCALABASH_JAR" name="XSLT selecting nodes without context should be error (XProc) #423">
+    call :run java -jar "%XMLCALABASH_JAR%" ^
+        -i source=xspec-423/test.xspec ^
+        -p xspec-home="file:///%PARENT_DIR_ABS:\=/%/" ^
+        ..\src\harnesses\saxon\saxon-xslt-harness.xproc
+    call :verify_retval 1
+    call :verify_line -3 r "..*:err:XPDY0002:"
+    call :verify_line -1 r "ERROR:"
+	</case>
 </collection>

test/xspec-423/test.xspec

@@ -0,0 +1,11 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<x:description stylesheet="../do-nothing.xsl" xmlns:x="http://www.jenitennison.com/xslt/xspec">
+	<x:scenario>
+		<x:label>Suppose you're testing count() function with child::element() selected but you
+			forget to provide the selection context (either inner XML or @href)</x:label>
+		<x:call function="count">
+			<x:param select="child::element()" />
+		</x:call>
+		<x:expect label="and you happen to expect 1" select="1" />
+	</x:scenario>
+</x:description>

test/xspec.bats

@@ -890,3 +890,19 @@ teardown() {
 }
 
 
+@test "XSLT selecting nodes without context should be error (XProc) #423" {
+    if [ -z "${XMLCALABASH_JAR}" ]; then
+        skip "XMLCALABASH_JAR is not defined"
+    fi
+
+    run java -jar "${XMLCALABASH_JAR}" \
+        -i source=xspec-423/test.xspec \
+        -p xspec-home="file:${PWD}/../" \
+        ../src/harnesses/saxon/saxon-xslt-harness.xproc
+    echo "$output"
+    [ "$status" -eq 1 ]
+    [[ "${lines[${#lines[@]}-3]}" =~ ":err:XPDY0002:" ]]
+    [[ "${lines[${#lines[@]}-1]}" =~ "ERROR:" ]]
+}
+
+