Is there an example of a function that will

[Luke Hohmann <hohmann@csmil.umich.edu>]

return ALL subclasses of a given class, not just the direct subclasses?
I am looking for a recursive version of class-direct-subclasses that will
return all the classes in a list, and I'm (for the moment) too lazy to
write such a beast.....

Thanks!

  -- Luke