Added declare

This commit is contained in:
Clemens 2023-08-02 11:01:07 +02:00
parent e44bdc2761
commit 1f076b9192

View file

@ -5,6 +5,8 @@
[org.domaindrivenarchitecture.activity-pub-poc.spec-helper :as sh]
[clojure.data.json :as json]))
(declare normalize-functional-property)
(defn normalize-value [v]
(cond (map? v)
(walk/walk normalize-functional-property identity v)
@ -12,6 +14,7 @@
(map normalize-value v)
:else v))
; TODO: Consider using tail recursion in case of prod usage
(defn normalize-functional-property [elem]
(let [k (first elem)
v (second elem)]