 
     (testing ".........XSQName"
       (with-open [session (create-session db)]
-        (is (= "xs:QName" 
+        (is (= "xs:QName"
                (result->type (execute-xquery session "fn:QName(\"http://www.example.com/example\", \"person\")"
                                              {:types :raw}))))
         (is (= "person"

                                                                           :type :object-node}}})))))))))

;; ;; TODO test all (minus unknown/as-yet-unused) variable types can be sent correctly:
;; :binary :attribute :variable :duration :node :processing-instruction 
;; :xs-date :xs-hex-binary :xs-gday :xs-day-time-duration :xs-date-time :xs-gyear :xs-duration :xs-base64-binary :xs-gmonth :xs-gmonth-day :xs-integer :comment :xs-gyear-month :xs-untyped-atomic :xs-time :xs-year-month-duration

;; XXX done:
;; :document
;;:null-node
;; :boolean-node
;; :xs-qname 
;; :xs-boolean
;; :xs-decimal :xs-double  :xs-float
;; :xs-any-uri

;; :array-node
;; :sequence
;; :number-node
;;  :xs-string
;; :js-object
;; :js-array
;; :object-node
