[pg-cvs] Adding WITH-TEMPORARY-DIRECTORY

Hi,

Attached is a patch for a WITH-TEMPORARY-DIRECTORY macro.

(defmacro with-temporary-directory ((directory &key (pathspec *temporary-directory*)) &body body) "Within the lexical scope of the body, DIRECTORY is bound to a newly created temporary directory. When BODY exits, the created directory (and all its containing files) are deleted before the value of the last form in BODY is returned.

The value of PATHSPEC determines the location and prefix of the temporary directory. The PATHNAME-DIRECTORY component of PATHSPEC determines the location in which the temporary directory is to be created. A non null PATHNAME-NAME of PATHSPEC will be used as a prefix of the temporary directory. " ...)

Thanks Mark