Skip to content

Instantly share code, notes, and snippets.

@peterwang
Created February 4, 2017 08:32
Show Gist options
  • Save peterwang/9afc2f50bbb3445d9f3a9b491eddef8c to your computer and use it in GitHub Desktop.
Save peterwang/9afc2f50bbb3445d9f3a9b491eddef8c to your computer and use it in GitHub Desktop.
;;; print all threads
(->> (Thread/getAllStackTraces)
keys
(map (juxt (memfn getId)
(memfn getName)))
(sort-by first)
pprint)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment