mirror of
https://github.com/status-im/pluto.git
synced 2025-02-24 08:28:15 +00:00
Added unit test to validate examples
This commit is contained in:
parent
be28c0e866
commit
7bd37d5021
9
test/pluto/examples_test.cljc
Normal file
9
test/pluto/examples_test.cljc
Normal file
@ -0,0 +1,9 @@
|
|||||||
|
(ns pluto.examples-test
|
||||||
|
(:refer-clojure :exclude [read])
|
||||||
|
(:require [clojure.test :refer [is deftest]]
|
||||||
|
[pluto.reader :as reader]
|
||||||
|
#?(:cljs [pluto.utils-test :include-macros true :refer [slurp]])))
|
||||||
|
|
||||||
|
(deftest examples
|
||||||
|
(is (empty? (:errors (reader/parse {} (:data (reader/read (slurp "figwheel/resources/public/assets/extensions/demo/extension.edn"))))))))
|
||||||
|
|
@ -1,4 +1,5 @@
|
|||||||
(ns pluto.utils-test
|
(ns pluto.utils-test
|
||||||
|
(:refer-clojure :exclude [slurp])
|
||||||
(:require [clojure.test :refer [is deftest testing]]
|
(:require [clojure.test :refer [is deftest testing]]
|
||||||
[pluto.utils :as utils]))
|
[pluto.utils :as utils]))
|
||||||
|
|
||||||
@ -16,3 +17,6 @@
|
|||||||
(update :a inc)
|
(update :a inc)
|
||||||
(assoc :b 1))})
|
(assoc :b 1))})
|
||||||
(constantly {:fire-missile true}))))))
|
(constantly {:fire-missile true}))))))
|
||||||
|
|
||||||
|
(defmacro slurp [file]
|
||||||
|
(clojure.core/slurp file))
|
||||||
|
Loading…
x
Reference in New Issue
Block a user