yogsototh/kibit
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

It seems like the reader/LNPR is already adding the :line meta data (both in the repl and for files). Removed.

Browse source
This commit is contained in:
Paul deGrandis 2012-03-10 12:38:44 -05:00
parent 7c541e537b
commit ddc36b3a65
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/jonase/kibit/core.clj
View file

@ -92,10 +92,9 @@
LineNumberingPushbackReader" LineNumberingPushbackReader"
[^LineNumberingPushbackReader r] [^LineNumberingPushbackReader r]
(lazy-seq (lazy-seq
(let [form (read r false ::eof) (let [form (read r false ::eof)]
line-num (.getLineNumber r)]
(when-not (= form ::eof) (when-not (= form ::eof)
(cons (with-meta form {:line line-num}) (read-ns r)))))) (cons form (read-ns r))))))
;; `tree-seq` returns a lazy-seq of nodes for a tree. ;; `tree-seq` returns a lazy-seq of nodes for a tree.
;; Given an expression, we can then match rules against its pieces. ;; Given an expression, we can then match rules against its pieces.