Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
(defmapop decode-raw-ga [json]
(let [m (clj-json.core/parse-string json true)]
[(:timestamp m)]))
(defn glob-json-data [path]
(let [tap (hfs-textline path)]
(<- [!timestamp]
(tap !line)
(decode-raw-ga !line :> !timestamp)
(:distinct false))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment