Skip to content

Instantly share code, notes, and snippets.

@sorenmacbeth
Created November 4, 2011 21:54
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save sorenmacbeth/1340591 to your computer and use it in GitHub Desktop.
Save sorenmacbeth/1340591 to your computer and use it in GitHub Desktop.
our query
(defn tokenize-strings [in-path out-path]
(let [src (hfs-textline in-path)]
(?<- (hfs-textline out-path :sinkmode :replace)
[!line ?token]
(src !line)
(tokenize-string !line :> ?token)
(:distinct false))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment