Skip to content

Commit 1daca28

Browse files
committed
[#65] Fix for CLJS
1 parent e3591de commit 1daca28

File tree

1 file changed

+3
-3
lines changed

1 file changed

+3
-3
lines changed

src/edamame/impl/parser.cljc

+3-3
Original file line numberDiff line numberDiff line change
@@ -190,7 +190,7 @@
190190
(let [features (:features ctx)]
191191
(loop [match non-match]
192192
(let [k (parse-next ctx reader)]
193-
(if (identical? k ::expected-delimiter)
193+
(if (kw-identical? k ::expected-delimiter)
194194
match
195195
(let [next-is-match? (and (non-match? match)
196196
(or (contains? features k)
@@ -200,9 +200,9 @@
200200
ctx (assoc ctx ::suppress true)]
201201
(loop []
202202
(let [next-val (parse-next ctx reader)]
203-
(when-not (identical? ::expected-delimiter
203+
(when-not (kw-identical? ::expected-delimiter
204204
next-val)
205-
(if (identical? ::eof next-val)
205+
(if (kw-identical? ::eof next-val)
206206
(let [delimiter (::expected-delimiter ctx)
207207
{:keys [:row :col :char]} (::opened-delimiter ctx)]
208208
(throw-reader ctx

0 commit comments

Comments
 (0)