Thanks to John Wiseman, and of course Nathan Froyd, I can now provide the winning answer (provided that parenthesis count is the criteria):

 (require :sha1) 
(map 'vector #'(lambda (x) (format t "~16R" x))
  (SHA:sha1sum-sequence "It's just data")) 

That last ugly bit is my way of producing a compatible output format in one line of code. dotimes is probably less gratuitous than map.

 (let ((d (SHA:sha1sum-sequence "It's just data")))
  (dotimes (i (length d)) (format t "~16R" (elt d i)))) 

OK, I should probably go do something useful now.

Oddpost has quietly introduced a news aggregator into their DHTML mail program. One cool thing is that Amazon Book Tracker is in the default list of news sources, but their listing includes a text box where you can enter a search term, which will yield a subscription for that search result. This is really becoming an impressive mail application, with built in Bayesian spam filtering, a news aggregator, and whatever else I haven't found yet. The fact that it's all written in javascript makes it even more impressive. Or scary.