- lite testing wip

Author: swannodette

deps.edn

@@ -19,6 +19,8 @@
                                       "-e" "(cljs.test-runner/-main)"]}
   :runtime.test.build    {:extra-paths ["src/test/cljs"]
                           :main-opts ["-m" "cljs.main" "-co" "resources/test.edn" "-c"]}
+  :lite.test.build       {:extra-paths ["src/test/cljs"]
+                          :main-opts ["-m" "cljs.main" "-co" "resources/lite_test.edn" "-c"]}
   :selfhost.test.build   {:extra-paths ["src/test/self"]
                           :main-opts ["-m" "cljs.main" "-co" "resources/self_host_test.edn" "-c"]}
   :selfparity.test.build {:extra-paths ["src/test/self"]

resources/lite_test.edn

@@ -1,10 +1,13 @@
-{:optimizations :advanced
- :main lite-test-runner
- :output-to "builds/out-lite/lite-test.js"
- :output-dir "builds/out-lite"
- :output-wrapper true
- :verbose true
- :compiler-stats true
- :parallel-build true
+{:optimizations    :advanced
+ :main             lite-test-runner
+ :lite-mode        true
+ :output-to        "builds/out-lite/lite-test.js"
+ :output-dir       "builds/out-lite"
+ :output-wrapper   true
+ :verbose          true
+ :compiler-stats   true
+ :parallel-build   true
  :closure-warnings {:non-standard-jsdoc :off :global-this :off}
- :language-out :es5}
+ :language-out     :es5
+ :pseudo-names     true
+ :pretty-print     true}

src/test/cljs/cljs/lite_collections_test.cljs

@@ -7,5 +7,11 @@
 ;   You must not remove this notice, or any other, from this software.
 
 (ns cljs.lite-collections-test
-  (:require [cljs.test :refer-macros [deftest testing is are run-tests]]
-            [clojure.test.check.clojure-test :refer-macros [defspec]]))
+  (:require [cljs.test :refer-macros [deftest testing is are run-tests]]))
+
+;; NOTE: ** this name space must be tested with :lite-mode true **
+
+(deftest test-obj-map
+  (let [a (. ObjMap -EMPTY)
+        b {}]
+    (is (identical? a b))))

src/test/cljs/lite_test_runner.cljs

@@ -7,7 +7,8 @@
 ;; You must not remove this notice, or any other, from this software.
 
 (ns lite-test-runner
-  (:require [cljs.lite-collections-test]))
+  (:require [cljs.test :refer-macros [run-tests]]
+            [cljs.lite-collections-test]))
 
 (set! *print-newline* false)
 
@@ -17,5 +18,5 @@
   (enable-console-print!))
 
 (run-tests
-  'cljs.collections-test
+  'cljs.lite-collections-test
   )