cljs-service: add-cljs-kernel

pink-gorilla · Apr 18, 2024 · b57d434 · b57d434
1 parent 59c229c
commit b57d434
Show file tree

Hide file tree

Showing 7 changed files with 19 additions and 37 deletions.
diff --git a/demo/deps.edn b/demo/deps.edn
@@ -2,7 +2,7 @@
          "resources"
          "target/webly"]
  :deps {org.pinkgorilla/goldly {:local/root ".." :deps/manifest :deps}
-        org.pinkgorilla/webly {:mvn/version "0.5.673"}
+        org.pinkgorilla/webly {:mvn/version "0.5.676"}
         org.pinkgorilla/ui-repl {:mvn/version "0.1.104"}
         org.pinkgorilla/ui-site {:mvn/version "0.0.30"}
         org.pinkgorilla/ui-binaryclock {:mvn/version "0.2.19"}

diff --git a/demo/resources/ext/init.edn b/demo/resources/ext/init.edn
diff --git a/demo/resources/ext/pages.edn b/demo/resources/ext/pages.edn
@@ -10,9 +10,8 @@
                     'demo.page.sci-compile {'sci-compile-page demo.page.sci-compile/sci-compile-page}
                     'demo.page.lazy {'lazy-page demo.page.lazy/lazy-page}
                     'demo.page.error {'error-page demo.page.error/error-page}
-                    'demo.page.kernel {'kernel-page demo.page.kernel/kernel-page}
-                    }
-
+                    'demo.page.kernel {'kernel-page demo.page.kernel/kernel-page}}
+ ; runtime
  :cljs-routes {"viewer"  reval.page.viewer/viewer-page
                "repl"  reval.page.repl/repl-page
                "" demo.page.main/main-page
@@ -21,7 +20,4 @@
                "kernel" demo.page.kernel/kernel-page
                "error" demo.page.error/error-page}
 
-  :sci-cljs-ns [demo.cljs-libs.helper
-                ]
-
- }
+  :sci-cljs-ns [demo.cljs-libs.helper]}
diff --git a/demo/resources/test-config.edn b/demo/resources/test-config.edn
@@ -1,7 +1,6 @@
 {:build {:disabled-extensions #{"goog.string" "clojure.walk" "clojure.string"  "goog.object"}}
 
- :spa {:title "Goldly Demo"
-       :start-user-app [:goldly/init]}
+ :spa {:title "Goldly Demo"}
 
  :reval {:rdocument  {:storage-root "target/webly/public/rdocument/"
                       :url-root "/api/rdocument/file/"}

diff --git a/demo/src/demo/cljs_libs/init.cljs b/demo/src/demo/cljs_libs/init.cljs
diff --git a/reval-sci/resources/ext/reval-sci.edn b/reval-sci/resources/ext/reval-sci.edn
@@ -4,7 +4,9 @@
  :depends-on #{:ui-codemirror :reval-ui :ui-repl :goldly-sci}
  :cljs-namespace [reval.type.sci ; side-effects; load protocols for cljs and sci
                   reval.kernel.cljs-sci ; side-effects multi-method
-                  ]
- :cljs-ns-bindings {'reval.kernel.cljs-sci {'eval-cljs  reval.kernel.cljs-sci/eval-cljs}}
+                  reval.init]
+ :cljs-ns-bindings {'reval.kernel.cljs-sci {'eval-cljs  reval.kernel.cljs-sci/eval-cljs}
+                    'reval.init {'reval-cljs-kernel-init reval.init/reval-cljs-kernel-init}}
+ :cljs-service {:start-fn reval.init/reval-cljs-kernel-init}
 ; 
  }
diff --git a/reval-sci/src/reval/init.cljs b/reval-sci/src/reval/init.cljs
@@ -0,0 +1,10 @@
+(ns reval.init
+   (:require
+    [taoensso.timbre :as timbre :refer [info warn]]
+    [webly.module.build :refer [load-namespace]]))
+
+(defn reval-cljs-kernel-init []
+  (info "goldly reval cljs-kernel-init ..")
+  (load-namespace 'reval.kernel.protocol)
+  (load-namespace 'reval.kernel.cljs-sci)
+  nil)