      (with-server host# port#
        (with-process host# port#
          ~@body))))
-
-(defn random-port []
-  (let [max-port 65536
-        offset 1024]
-    (+ (rand-int (- max-port offset))
-       offset)))
 
 (deftest simple-test
   (let [host "127.0.0.1"

(defmacro with-xpath [& body]
  `(with-locator "xpath"
     ~@body))

;;
;; navigation

     (api/element-enabled *server* *session* *element*))))

(defn visible? []
  ;; todo C. Element Displayedness
  )

;;
