Hi,
Oh yes, I also commented out the definitions for APPENDF and GET-ENV:
#-:LISPWORKS (define-modify-macro appendf (&rest args) append "Append onto list")
#-:LISPWORKS (defun getenv (x) #+sbcl (sb-ext:posix-getenv x) #+clozure (ccl::getenv x) #+clisp (ext:getenv x) #+cmu (cdr (assoc (intern x :keyword) ext:*environment-list*)) #+lispworks (lispworks:environment-variable x) #+allegro (sys:getenv x) #+gcl (system:getenv x) #+ecl (si:getenv x))
Dr. David McClain dbm@refined-audiometrics.com