[enhancement] XQSuite add two additional XDM types

Allow xs:NCName and xs:QName to be used as test function input and output.

Author: line-o

exist-core/src/main/resources/org/exist/xquery/lib/xqsuite/xqsuite.xql

@@ -611,6 +611,9 @@ declare %private function test:cast(
             case "xs:boolean"           return xs:boolean($literal-value)
             case "xs:anyURI"            return xs:anyURI($literal-value)
 
+            case "xs:NCName"            return xs:NCName($literal-value)
+            case "xs:QName"             return xs:QName($literal-value)
+
             case "xs:numeric"           return xs:numeric($literal-value)
             case "xs:int"               return xs:int($literal-value)
             case "xs:positiveInteger"   return xs:positiveInteger($literal-value)
@@ -1001,6 +1004,9 @@ declare %private function test:cast-to-type($value as item(), $result as item())
 
         case xs:anyURI            return xs:anyURI($value)
 
+        case xs:NCName            return xs:NCName($value)
+        case xs:QName             return xs:QName($value)
+
         default return string($value)
 };
 

exist-core/src/test/xquery/xqsuite/xqsuite-tests.xql

@@ -148,6 +148,20 @@ function t:args-assert-anyURI($arg as xs:anyURI) as xs:anyURI {
     $arg
 };
 
+declare
+    %test:args("asdf")
+    %test:assertEquals("asdf")
+function t:args-assert-ncname($arg as xs:NCName) as xs:NCName {
+    $arg
+};
+
+declare
+    %test:args("test:asdf")
+    %test:assertEquals("test:asdf")
+function t:args-assert-qname($arg as xs:QName) as xs:QName {
+    $arg
+};
+
 declare
     %test:args("2001-01-01")
     %test:assertEquals("2001-01-01")