File tree Expand file tree Collapse file tree 3 files changed +12
-5
lines changed
.clj-kondo/imports/taoensso/encore Expand file tree Collapse file tree 3 files changed +12
-5
lines changed Original file line number Diff line number Diff line change 3
3
{taoensso.encore/defalias taoensso.encore-hooks/defalias
4
4
taoensso.encore/defaliases taoensso.encore-hooks/defaliases
5
5
taoensso.encore/defn-cached taoensso.encore-hooks/defn-cached
6
- taoensso.encore/defonce taoensso.encore-hooks/defonce}}}
6
+ taoensso.encore/defonce taoensso.encore-hooks/defonce
7
+ taoensso.encore/def* taoensso.encore-hooks/def*}}}
Original file line number Diff line number Diff line change 64
64
binding-vec
65
65
body))))}))
66
66
67
- (defn defonce
68
- [{:keys [node]}]
67
+ (defn -def-impl
68
+ [{:keys [node]} core-macro-sym ]
69
69
; ; args = [sym doc-string? attr-map? init-expr]
70
70
(let [[sym & args] (rest (:children node))
71
71
[doc-string args] (if (and (hooks/string-node? (first args)) (next args)) [(hooks/sexpr (first args)) (next args)] [nil args])
72
72
[attr-map init-expr] (if (and (hooks/map-node? (first args)) (next args)) [(hooks/sexpr (first args)) (fnext args)] [nil (first args)])
73
73
74
74
attr-map (if doc-string (assoc attr-map :doc doc-string) attr-map)
75
75
sym+meta (if attr-map (with-meta sym attr-map) sym)
76
+
76
77
rewritten
77
78
(hooks/list-node
78
- [(hooks/token-node 'clojure. core/defonce )
79
+ [(hooks/token-node core-macro-sym )
79
80
sym+meta
80
81
init-expr])]
81
82
83
+ #_(println " old node:" node)
84
+ #_(println " new node:" rewritten)
82
85
{:node rewritten}))
86
+
87
+ (defn def* [arg] (-def-impl arg 'def))
88
+ (defn defonce [arg] (-def-impl arg 'clojure.core/defonce))
Original file line number Diff line number Diff line change 59
59
; ;
60
60
:lint-cache {:replace-paths [" src" ]} ; ; when building classpath we want to exclude resources
61
61
; ; so we do not pick up our own clj-kondo config exports
62
- :clj-kondo {:extra-deps {clj-kondo/clj-kondo {:mvn/version " 2025.09.19 " }}
62
+ :clj-kondo {:extra-deps {clj-kondo/clj-kondo {:mvn/version " 2025.09.22 " }}
63
63
:override-deps {org.clojure/clojure {:mvn/version " 1.12.2" }}
64
64
:main-opts [" -m" " clj-kondo.main" ]}
65
65
You can’t perform that action at this time.
0 commit comments