Merge pull request #64 from line-o/fix/types

[fix] use expected types

Author: joewiz

src/main/xar-resources/modules/app.xql

@@ -108,7 +108,7 @@ function app:module($node as node(), $model as map(*), $details as xs:boolean) {
 
     order by $order
     return
-        app:print-module($module, $funcsInModule, $details)
+        app:print-module($module, $funcsInModule, boolean($details))
 };
 
 declare %private function app:print-module($module as element(xqdoc:xqdoc), $functions as element(xqdoc:function)*, 

src/main/xar-resources/modules/scan.xql

@@ -40,7 +40,7 @@ declare %private function docs:load-stored($path as xs:anyURI, $store as functio
 declare %private function docs:load-external-modules($store as function(xs:string, element()) as empty-sequence()) {
     for $uri in util:mapped-modules()
     return
-        docs:load-external($uri, $store),
+        docs:load-external(xs:anyURI($uri), $store),
     for $path in dbutil:find-by-mimetype(xs:anyURI("/db"), "application/xquery")
     return
         try {
@@ -53,7 +53,7 @@ declare %private function docs:load-external-modules($store as function(xs:strin
 
 declare %private function docs:load-internal-modules($store as function(xs:string, element()) as empty-sequence()) {
     for $moduleURI in util:registered-modules()
-    let $meta := inspect:inspect-module-uri($moduleURI)
+    let $meta := inspect:inspect-module-uri(xs:anyURI($moduleURI))
     return
         if ($meta) then
             let $xml := docs:generate-xqdoc($meta)

src/main/xar-resources/modules/view.xql

@@ -12,7 +12,7 @@ let $config := map {
     $templates:CONFIG_APP_ROOT : $config:app-root,
     $templates:CONFIG_STOP_ON_ERROR : true()
 }
-let $resolve := function($func as xs:string, $arity as xs:int) {
+let $resolve := function($func as xs:string, $arity as xs:integer) {
     try {
         function-lookup(xs:QName($func), $arity)
     } catch * {