core.cljs

(ns uix.ssr
  (:require [uix.core :as uix :refer [$ defui]]
            #?(:cljs ["react-slider" :as react.slider])
            #?(:clj [uix.dom.server :as dom.server])))

#?(:cljs
    (defui js-comp* [{:keys [children]}]
      (let [[show? set-show] (uix/use-state false)]
        (uix/use-effect
          #(set-show true)
          [])
        (when show? children))))

#?(:clj
   (defmacro js-comp [comp & args]
     (when (uix.lib/cljs-env? &env)
       `($ js-comp* ($ ~comp ~@args)))))

(defui app []
  ($ :<>
    ($ :h1 "Hello")
    (js-comp react.slider/ReactSlider)))

#?(:clj
    (dom.server/render-to-string ($ app)))