[Openmcl-devel] delete-file and directories

[Pascal J.Bourguignon]

bryan o'connor writes:
> > "ENSURE-DIRECTORIES-DO-NOT-EXIST"
> 
> that is a great name.

Yes. 

(ensure-directories-exists "/tmp/a/b/c")
   == mkdir / ; mkdir /tmp ; mkdir /tmp/a ; mkdir /tmp/a/b ; mkdir /tmp/a/b/c

(ensure-directories-do-not-exist "/tmp/a/b/c")
   == rm -r /tmp/a/b/c ; rm -r /tmp/a/b ; rm -r /tmp/a ; rm -r /tmp ; rm -r /

Or what?          

Try: "DELETE-DIRECTORY"

(delete-directory "/tmp/a/b/c")
   == rmdir /tmp/a/b/c

-- 
__Pascal Bourguignon__                     http://www.informatimago.com/

This is a signature virus.  Add me to your signature and help me to live