Re: [cl-cookbook-contrib] getenv

[Nick L. <nd...@ra...>]

   > in the cl-cookbook:
   >
   >  (defun my-getenv (name &optional default)
   >     #+CMU
   >     (let ((x (assoc name ext:*environment-list*
   >                     :test #'string=)))
   >       (if x (cdr x) default))
   >     #-CMU
   >     (or
   >      #+Allegro (sys:getenv name)
   >      #+CLISP (ext:getenv name)
   >      #+ECL (si:getenv name)
   >      #+SBCL (sb-unix::posix-getenv name)
   >      #+LISPWORKS (lispworks:environment-variable name)
   >      default))

   Yes, but I think the cookbook version does its job. 

But the cookbook verson is wrong. It doesn't distinguish between
implementation-not-found and env-var-not-found.

- nick