1 /* Copyright (C) 1995,1996 Robert de Bath <rdebath@cix.compulink.co.uk>
2  * This file is part of the Linux-8086 C library and is distributed
3  * under the GNU Library General Public License.
4  */
5 
6 extern char ** environ;
7 
8 char *
getenv(name)9 getenv(name)
10 char * name;
11 {
12    register int l;
13    register char ** ep = environ;
14    l = strlen(name);
15 
16    if( ep == 0 || l == 0 ) return 0;
17 
18    while(*ep)
19    {
20       if( **ep == *name && memcmp(name, *ep, l) == 0 && (*ep)[l] == '=' )
21          return *ep+l+1;
22       ep++;
23    }
24    return 0;
25 }
26 
27