I certainly like directory-fold, it's simple and sweet, and I'm
exposing it in the Chibi Scheme SRFI implementation, along with a
procedure concept I picked up from scsh, delete-filesystem-object,
which does not raise an error if that object doesn't exist.  Unlike
the 0.7 scsh version, it does error if it exists and can't delete it,
it and/or "create-file-thing" in the 0.7 version can cause a stack
consuming infinite loop....