Skip to content

Instantly share code, notes, and snippets.

@ponzao

ponzao/spell_checker.clj

Created April 17, 2012 10:00
Show Gist options
  • Save ponzao/2405041 to your computer and use it in GitHub Desktop.
Save ponzao/2405041 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
spell_checker.clj
(def dictionary
(with-open [rdr (reader "/usr/share/dict/words")]
(conj (set (line-seq rdr)) "clojure")))
(defn correctly-spelled?
[sentence]
(->> (.toLowerCase sentence)
(re-seq #"\w+")
(every? dictionary)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment