    :query
    (fn []
      [::rid
-      ::runtime-info])}
+      ::runtime-info
+      ::supported-ops])}
 
   (html/div "runtime" (pr-str props)))
 

  {:class Page
   :factory ui-page})

(routing/register ::ui-model/root-router ::rid
  {:class RuntimePage
   :factory ui-runtime-page})

(defn route [tokens]
  (if-not @tool-ref

      (when (contains? supported-ops :eval-clj)
        (ui-runtime-eval this props)))))

(def ui-runtime-tap-page (fc/factory RuntimeTapPage {}))

(defsc RuntimePage
  [this {::keys [rid] :as props}]
  {:ident
   (fn []
     [::runtime-page rid])

   :query
   (fn []
     [::rid
      {::runtime [::runtime-info
                  ::supported-ops]}])}

  (let [{::keys [runtime]} props
        {::keys [runtime-info supported-ops]} runtime]
    (html/fragment
      (html/div
        (html/h1 "Runtime Overview"))

      (html/div (pr-str runtime-info))
      (html/div (pr-str supported-ops))
      (html/div {:className "flex-1"}
        ))))

(def ui-runtime-page (fc/factory RuntimePage {}))

(defsc Page [this {::keys [runtimes runtime] :as props}]
