(def hist (seq)
(w/table h
(each n seq
(++ (h n 0)))))
I just learned about 'w/table reading your post, and I checked, and it returns the created hash. This is quite smart, I often find myself doing things like:
(let h (table)
... ; do stuff with h
h) ; return it