Skip to content

Instantly share code, notes, and snippets.

@shlomiv
Last active March 8, 2016 00:30
Show Gist options
  • Save shlomiv/568e8f80dc06c38edf64 to your computer and use it in GitHub Desktop.
Save shlomiv/568e8f80dc06c38edf64 to your computer and use it in GitHub Desktop.
(defn mapper-map [this ^Text key ^ArchiveReader warc-value ^MapContext context]
(let [i (.iterator warc-value)]
(loop []
(when (.hasNext i)
(let [^ArchiveRecord l (.next i)]
(println "got " (.available l))
(recur)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment