Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!usc!wuarchive!m.cs.uiuc.edu!uiucdcs!carroll
From: carroll@cs.uiuc.edu (Alan M. Carroll)
Newsgroups: comp.lang.lisp
Subject: Accumlating maphash results
Message-ID: <1991May15.153918.23823@m.cs.uiuc.edu>
Date: 15 May 91 15:39:18 GMT
Sender: news@m.cs.uiuc.edu (News Database (admin-Mike Schwager))
Organization: Technophiles Inc. - Engineers with Attitude
Lines: 18
Nntp-Posting-Host: ash.cs.uiuc.edu

CommonLisp question:

I have a hash table with a set of entries. What I need to do is
execute a function over all entries and get back a list of the
results. In other words, I want to do a (map 'list #'func table) on
the hash table. Currently, I do something like:

(let ((results nil))
  (maphash #'(lambda (s o) (push (func o) results)) table)
  results
)

However, this seems kludgy to me. Is there a cleaner way?  Thanks!

-- 
Alan M. Carroll          <-- Another casualty of applied metaphysics
Epoch Development Team   
Urbana Il.               "I hate shopping with the reality-impaired" - Susan