interface to #_pbcatsearch ?

[alanr@eliza.media-lab.media.mit.edu (Alan Ruttenberg)]

Hi, 

I was wondering if anyone has written an interface to pbcatsearch, the
fast way to find files in a whole volume.

I have a defsystem type thing that would like to not necessarily have
the user specify where to find the thing. Currently if I don't find it
in the usual place I try to find it using something like
(directory "hd:**:foo-file-set.lisp"), which is slow.

-alan