fix: test

Author: tiensonqin

deps.edn

@@ -30,6 +30,10 @@
     com.cognitect/transit-clj  {:mvn/version "1.0.324"}
     com.cognitect/transit-cljs {:mvn/version "0.8.269"}}}
 
+  :shadow-cljs
+  {:extra-deps {thheller/shadow-cljs {:mvn/version "2.19.0"}}
+   :main-opts ["-m" "shadow.cljs.devtools.cli"]}
+
   :bench
   {:extra-paths ["bench"]
    :jvm-opts ["-server"

test/datascript/test/storage.cljs

@@ -280,17 +280,15 @@
 
       ;; overflow keeps working on restored conn
       (d/transact! conn' (mapv #(vector :db/add % :name (str %)) (range 36 80)))
-      ;; (is (= 28 (count @(:*writes storage))))
-      ;; FIXME: clj version is 28
-      (is (= 29 (count @(:*writes storage))))
+      (is (= 28 (count @(:*writes storage))))
       (is (= @#'storage/tail-addr (last @(:*writes storage))))
 
       ;; restore conn without tail
       (let [conn'' (d/restore-conn storage)]
         (is (= @conn' @conn''))
 
         (d/transact! conn'' [[:db/add 80 :name "Ilya"]])
-        (is (= 30 (count @(:*writes storage))))
+        (is (= 29 (count @(:*writes storage))))
         (is (= @#'storage/tail-addr (last @(:*writes storage))))
 
         ;; gc on conn