fix browser tests compilation

hyperfiddle · Jan 26, 2024 · 196d3fe · 196d3fe
1 parent 81b27d5
commit 196d3fe
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 6 deletions.
diff --git a/src/hyperfiddle/electric/impl/runtime_de.cljc b/src/hyperfiddle/electric/impl/runtime_de.cljc
@@ -81,12 +81,12 @@
   [^Frame frame]
   (.-ctor frame))
 
-(deftype Node [frame id]
+(deftype Node [^Frame frame id]
   IFn
   (#?(:clj invoke :cljs -invoke) [_ step done]
     ((aget (.-signals frame) id) step done)))
 
-(deftype Call [frame id]
+(deftype Call [^Frame frame id]
   IFn
   (#?(:clj invoke :cljs -invoke) [_ step done]
     (let [cdef (ctor-cdef (frame-ctor frame))]

diff --git a/src/hyperfiddle/incseq.cljc b/src/hyperfiddle/incseq.cljc
@@ -1357,9 +1357,7 @@ optional `compare` function, `clojure.core/compare` by default.
                              :change      {0 curr}
                              :freeze      #{}})))))))))))))))
 
-(def ^{:arglists '([incseq])
-       :doc "
-"} items
+(def ^{:arglists '([incseq])} items
   (let [slot-lock 0
         slot-busy 1
         slot-buffer 2
@@ -1852,4 +1850,4 @@ optional `compare` function, `clojure.core/compare` by default.
           :change {0 (fn [n t] (n) (->Ps q #(% :cancel) #(%)))}})
       (q {:grow 1 :degree 1 :shrink 0 :permutation {} :change {0 "hello"} :freeze #{}})
       @ps := {:degree 2 :permutation {0 1, 1 0} :grow 1 :shrink 0 :change {0 "hello"} :freeze #{}}
-      (q) := :cancel)))
+      (q) := :cancel)))