Subversion Repositories or1k_old

/* Copyright (C) 1995,1996 Robert de Bath <rdebath@cix.compulink.co.uk>

 * This file is part of the Linux-8086 C library and is distributed

 * under the GNU Library General Public License.

 */

#include <string.h>

#include <stdlib.h>

#include <malloc.h>

extern char ** environ;

char *

getenv(var)

const char * var;

{

   char **p;

   int len;

   len = strlen(var);

   if (!environ)

      return 0;

   for(p=environ; *p; p++)

   {

      if( memcmp(var, *p, len) == 0 && (*p)[len] == '=' )

         return *p + len + 1;

   }

   return 0;

}