We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent afec91b commit 816e453Copy full SHA for 816e453
src/vrac/dsl/ast.cljc
@@ -1,5 +1,5 @@
1
(ns vrac.dsl.ast
2
- (:require [lambdaisland.deep-diff2 :refer [diff]]
+ (:require #?(:clj [lambdaisland.deep-diff2 :refer [diff]])
3
[mate.core :as mc]))
4
5
;; node-type -> child-node -> #{:one :many}
@@ -392,9 +392,11 @@
392
;; This is a template for creating a new pass.
393
;; Copy/paste, rename those functions, then implement
394
395
+#_
396
(defn- xxx-pre-walk [context]
397
context)
398
399
400
(defn- xxx-post-walk [{:keys [root-ast path] :as context}]
401
(let [ast (get-in root-ast path)
402
ast (case (:node-type ast)
@@ -406,6 +408,7 @@
406
408
(-> context
407
409
(assoc-in (cons :root-ast path) ast))))
410
411
412
(defn xxx-pass
413
[context]
414
0 commit comments