godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

made a lot of changes

Browse Source
This commit is contained in:
eck
1989-12-18 15:14:14 +00:00
parent a5be75a764
commit dd1196b169
21 changed files with 958 additions and 218 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
lang/cem/libcc.ansi/stdlib/getenv.c
View File

@@ -6,23 +6,23 @@
#include <stdlib.h>
extern char **environ;
extern const char **environ;
char *
getenv(const char *name)
{
register char **v = environ;
register char *p, *q;
register const char **v = environ;
register const char *p, *q;
if (v == (char **)NULL || name == (char *)NULL)
if (v == NULL || name == NULL)
return (char *)NULL;
while ((p = *v++) != (char *)NULL) {
while ((p = *v++) != NULL) {
q = name;
while (*q && (*q++ == *p++))
/* EMPTY */ ;
if (*q || (*p != '='))
continue;
return(p+1);
return (char *)p + 1;
}
return((char *)NULL);
return (char *)NULL;
}