           (rtr/empty)
           routes))
 
-(defn- adapt-params
-  [params]
-  (when params
-    (reduce-kv (fn [m k v]
-                 (aset m (key->js k) (-repr v))
-                 m)
-               (js-obj)
-               params)))
-
 (defn resolve
   "Perform a url resolve operation."
   ([router name]


;; --- Low Level Routes API

(defn ^boolean router?
  "Check if the `v` is a Router instance."
  [v]

  "Try to match a path to a specific route in the router, returns `nil`
  if the no match is found."
  [router path]
  (let [[name params query] (vec (rtr/match router path))]
    (when name
      [name
       (js->props params)
       (js->props query)])))

(defn router
  "A helper for compile a vector of routes in a router instance."
