♻️ Refactor tests directory structure

frontend/shadow-cljs.edn

@@ -86,7 +86,7 @@
   {:target :node-test
    :output-to "target/tests.js"
    :output-dir "target/test/"
-   :ns-regexp "^app.*-test$"
+   :ns-regexp "^frontend-tests.*-test$"
    :autorun true
 
    :compiler-options

frontend/test/app/init_test.cljs

@@ -1,9 +0,0 @@
-(ns app.init-test
-  (:require
-   [cljs.test :as t :include-macros true]))
-
-(defmethod t/report [:cljs.test/default :end-run-tests]
-  [m]
-  (if (t/successful? m)
-    (set! (.-exitCode js/process) 0)
-    (set! (.-exitCode js/process) 1)))

frontend/test/frontend_tests/helpers/events.cljs

@@ -1,14 +1,20 @@
-(ns app.test-helpers.events
+;; This Source Code Form is subject to the terms of the Mozilla Public
+;; License, v. 2.0. If a copy of the MPL was not distributed with this
+;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
+;;
+;; Copyright (c) KALEIDOS INC
+
+(ns frontend-tests.helpers.events
   (:require
-   [app.common.uuid :as uuid]
    [app.common.geom.point :as gpt]
    [app.common.geom.shapes :as gsh]
    [app.common.pages :as cp]
    [app.common.pages.helpers :as cph]
+   [app.common.uuid :as uuid]
    [app.main.data.workspace :as dw]
-   [cljs.test :as t :include-macros true]
-   [cljs.pprint :refer [pprint]]
    [beicon.core :as rx]
+   [cljs.pprint :refer [pprint]]
+   [cljs.test :as t :include-macros true]
    [potok.core :as ptk]))
 
 ;; ---- Helpers to manage global events

frontend/test/frontend_tests/helpers/libraries.cljs

@@ -1,12 +1,18 @@
-(ns app.test-helpers.libraries
+;; This Source Code Form is subject to the terms of the Mozilla Public
+;; License, v. 2.0. If a copy of the MPL was not distributed with this
+;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
+;;
+;; Copyright (c) KALEIDOS INC
+
+(ns frontend-tests.helpers.libraries
   (:require
-   [cljs.test :as t :include-macros true]
-   [cljs.pprint :refer [pprint]]
    [app.common.pages.helpers :as cph]
    [app.common.types.component :as ctk]
    [app.common.types.container :as ctn]
    [app.main.data.workspace.state-helpers :as wsh]
-   [app.test-helpers.pages :as thp]))
+   [cljs.pprint :refer [pprint]]
+   [cljs.test :as t :include-macros true]
+   [frontend-tests.helpers.pages :as thp]))
 
 ;; ---- Helpers to manage libraries and synchronization
 
@@ -150,7 +156,7 @@
     [shapes-inst shapes-main component]))
 
 (defn resolve-component
-  "Get the component with the given id and all its shapes." 
+  "Get the component with the given id and all its shapes."
   [state component-id]
   (let [page        (thp/current-page state)
         libs        (wsh/get-libraries state)

frontend/test/frontend_tests/helpers/pages.cljs

@@ -1,20 +1,26 @@
-(ns app.test-helpers.pages
+;; This Source Code Form is subject to the terms of the Mozilla Public
+;; License, v. 2.0. If a copy of the MPL was not distributed with this
+;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
+;;
+;; Copyright (c) KALEIDOS INC
+
+(ns frontend-tests.helpers.pages
   (:require
-   [cljs.test :as t :include-macros true]
-   [cljs.pprint :refer [pprint]]
-   [beicon.core :as rx]
-   [potok.core :as ptk]
-   [app.common.uuid :as uuid]
    [app.common.geom.point :as gpt]
    [app.common.geom.shapes :as gsh]
    [app.common.pages :as cp]
    [app.common.pages.helpers :as cph]
    [app.common.types.shape :as cts]
+   [app.common.uuid :as uuid]
    [app.main.data.workspace :as dw]
    [app.main.data.workspace.groups :as dwg]
    [app.main.data.workspace.layout :as layout]
    [app.main.data.workspace.libraries-helpers :as dwlh]
-   [app.main.data.workspace.state-helpers :as wsh]))
+   [app.main.data.workspace.state-helpers :as wsh]
+   [beicon.core :as rx]
+   [cljs.pprint :refer [pprint]]
+   [cljs.test :as t :include-macros true]
+   [potok.core :as ptk]))
 
 ;; ---- Helpers to manage pages and objects
 

frontend/test/frontend_tests/helpers_shapes_test.cljs

@@ -1,17 +1,23 @@
-(ns app.shapes-test
+;; This Source Code Form is subject to the terms of the Mozilla Public
+;; License, v. 2.0. If a copy of the MPL was not distributed with this
+;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
+;;
+;; Copyright (c) KALEIDOS INC
+
+(ns frontend-tests.helpers-shapes-test
   (:require
    [app.common.colors :as clr]
    [app.common.data :as d]
    [app.common.geom.point :as gpt]
    [app.common.pages.helpers :as cph]
    [app.main.data.workspace.libraries :as dwl]
-   [app.test-helpers.events :as the]
-   [app.test-helpers.libraries :as thl]
-   [app.test-helpers.pages :as thp]
    [beicon.core :as rx]
    [cljs.pprint :refer [pprint]]
    [cljs.test :as t :include-macros true]
    [clojure.stacktrace :as stk]
+   [frontend-tests.helpers.events :as the]
+   [frontend-tests.helpers.libraries :as thl]
+   [frontend-tests.helpers.pages :as thp]
    [linked.core :as lks]
    [potok.core :as ptk]))
 

frontend/test/frontend_tests/setup.cljs

@@ -0,0 +1,22 @@
+;; This Source Code Form is subject to the terms of the Mozilla Public
+;; License, v. 2.0. If a copy of the MPL was not distributed with this
+;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
+;;
+;; Copyright (c) KALEIDOS INC
+
+(ns frontend-tests.setup
+  (:require
+   [cljs.test :as t :include-macros true]))
+
+#_(enable-console-print!)
+
+(defmethod t/report [:cljs.test/default :end-run-tests]
+  [m]
+  (if (t/successful? m)
+    (set! (.-exitCode js/process) 0)
+    (set! (.-exitCode js/process) 1)))
+
+#_(set! *main-cli-fn*
+      #(t/run-tests 'frontend-tests.test-snap-data
+                    'frontend-tests.test-simple-math
+                    'frontend-tests.test-range-tree))

frontend/test/frontend_tests/state_components_sync_test.cljs

@@ -1,4 +1,10 @@
-(ns app.components-sync-test
+;; This Source Code Form is subject to the terms of the Mozilla Public
+;; License, v. 2.0. If a copy of the MPL was not distributed with this
+;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
+;;
+;; Copyright (c) KALEIDOS INC
+
+(ns frontend-tests.state-components-sync-test
   (:require
     [app.common.colors :as clr]
     [app.common.data :as d]
@@ -7,16 +13,16 @@
     [app.common.types.container :as ctn]
     [app.main.data.workspace :as dw]
     [app.main.data.workspace.changes :as dch]
-    [app.main.data.workspace.shapes :as dwsh]
     [app.main.data.workspace.libraries :as dwl]
     [app.main.data.workspace.libraries-helpers :as dwlh]
+    [app.main.data.workspace.shapes :as dwsh]
     [app.main.data.workspace.state-helpers :as wsh]
-    [app.test-helpers.events :as the]
-    [app.test-helpers.libraries :as thl]
-    [app.test-helpers.pages :as thp]
     [beicon.core :as rx]
     [cljs.pprint :refer [pprint]]
     [cljs.test :as t :include-macros true]
+    [frontend-tests.helpers.events :as the]
+    [frontend-tests.helpers.libraries :as thl]
+    [frontend-tests.helpers.pages :as thp]
     [linked.core :as lks]
     [potok.core :as ptk]))
 

frontend/test/frontend_tests/state_components_test.cljs

@@ -1,4 +1,4 @@
-(ns app.components-basic-test
+(ns frontend-tests.state-components-test
   (:require
     [app.common.data :as d]
     [app.common.geom.point :as gpt]
@@ -10,13 +10,13 @@
     [app.main.data.workspace.libraries :as dwl]
     [app.main.data.workspace.libraries-helpers :as dwlh]
     [app.main.data.workspace.state-helpers :as wsh]
-    [app.test-helpers.events :as the]
-    [app.test-helpers.libraries :as thl]
-    [app.test-helpers.pages :as thp]
     [beicon.core :as rx]
     [cljs.pprint :refer [pprint]]
     [cljs.test :as t :include-macros true]
     [clojure.stacktrace :as stk]
+    [frontend-tests.helpers.events :as the]
+    [frontend-tests.helpers.libraries :as thl]
+    [frontend-tests.helpers.pages :as thp]
     [linked.core :as lks]
     [potok.core :as ptk]))
 

frontend/test/frontend_tests/util_range_tree_test.cljs

@@ -1,9 +1,15 @@
-(ns app.util.range-tree-test
+;; This Source Code Form is subject to the terms of the Mozilla Public
+;; License, v. 2.0. If a copy of the MPL was not distributed with this
+;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
+;;
+;; Copyright (c) KALEIDOS INC
+
+(ns frontend-tests.util-range-tree-test
   (:require
-   [cljs.test :as t :include-macros true]
-   [cljs.pprint :refer [pprint]]
    [app.common.geom.point :as gpt]
-   [app.util.range-tree :as rt]))
+   [app.util.range-tree :as rt]
+   [cljs.pprint :refer [pprint]]
+   [cljs.test :as t :include-macros true]))
 
 (defn check-max-height [tree num-nodes])
 (defn check-sorted [tree])

frontend/test/frontend_tests/util_simple_math_test.cljs

@@ -1,4 +1,10 @@
-(ns app.util.simple-math-test
+;; This Source Code Form is subject to the terms of the Mozilla Public
+;; License, v. 2.0. If a copy of the MPL was not distributed with this
+;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
+;;
+;; Copyright (c) KALEIDOS INC
+
+(ns frontend-tests.util-simple-math-test
   (:require
    [cljs.test :as t :include-macros true]
    [cljs.pprint :refer [pprint]]

frontend/test/frontend_tests/util_snap_data_test.cljs

@@ -4,13 +4,13 @@
 ;;
 ;; Copyright (c) KALEIDOS INC
 
-(ns app.util.snap-data-test
+(ns frontend-tests.util-snap-data-test
   (:require
-   [app.common.uuid :as uuid]
-   [cljs.test :as t :include-macros true]
-   [cljs.pprint :refer [pprint]]
    [app.common.file-builder :as fb]
-   [app.util.snap-data :as sd]))
+   [app.common.uuid :as uuid]
+   [app.util.snap-data :as sd]
+   [cljs.pprint :refer [pprint]]
+   [cljs.test :as t :include-macros true]))
 
 (t/deftest test-create-index
   (t/testing "Create empty data"