/[cmucl]/src/clx/dependent.lisp
ViewVC logotype

Diff of /src/clx/dependent.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3.1.2 by ram, Wed Sep 1 00:40:19 1993 UTC revision 1.3.1.3 by ram, Fri Sep 30 16:17:28 1994 UTC
# Line 2554  Line 2554 
2554    
2555  (defun getenv (name)  (defun getenv (name)
2556    #+excl (sys:getenv name)    #+excl (sys:getenv name)
2557    #+lcl3.0 (lcl:environment-value name)    #+lcl3.0 (lcl:environment-variable name)
2558    #+CMU (cdr (assoc name ext:*environment-list* :test #'string=))    #+CMU (cdr (assoc name ext:*environment-list* :test #'string=))
2559    #-(or excl lcl3.0 CMU) (progn name nil))    #-(or excl lcl3.0 CMU) (progn name nil))
2560    

Legend:
Removed from v.1.3.1.2  
changed lines
  Added in v.1.3.1.3

  ViewVC Help
Powered by ViewVC 1.1.5