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

Some work on documentation

Browse source
This commit is contained in:
Jonas Enlund 2012-03-08 13:12:38 +02:00
parent ea633a4cd4
commit fcf790ebf0
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

@ -41,8 +41,7 @@
:alt (seq alt)
:line (-> expr meta :line)})))
;; Loop over the rule set, recursively applying unification to find the best
;; possible alternative
;; Loop over the rule set.
(defn check-form
"Given an expression/line/form, return a map containing the alternative suggestion info, or `nil`"
([expr]
@ -58,7 +57,7 @@
;; The line numbers are added to the lines/forms' to metadata, `^{:line}`
(defn read-ns
"Generate a lazy sequence of lines from a [`LineNumberingPushbackReader`]( https://github.com/clojure/clojure/blob/master/src/jvm/clojure/lang/LineNumberingPushbackReader.java )."
"Generate a lazy sequence of top level forms from a [`LineNumberingPushbackReader`]( https://github.com/clojure/clojure/blob/master/src/jvm/clojure/lang/LineNumberingPushbackReader.java )."
[r]
(lazy-seq
(let [form (read r false ::eof)