88 	char **P, *cp;
103 			for (P = &environ[offset];; ++P)
104 				if (!(*P = *(P + 1)))
111 	for (P = environ; *P != NULL; P++)
113 	cnt = P - environ;
114 	P = (char **)realloc(lastenv, sizeof(char *) * (cnt + 2));
115 	if (!P)
118 		memcpy(P, environ, cnt * sizeof(char *));
119 	lastenv = environ = P;
136 	char *C, **P;  in setenv()  local
163 			for (P = &environ[tmpoff];; ++P)  in setenv()
164 				if (!(*P = *(P + 1)))  in setenv()
170 		for (P = environ; *P != NULL; P++)  in setenv()
172 		cnt = P - environ;  in setenv()
173 		P = (char **)realloc(lastenv, sizeof(char *) * (cnt + 2));  in setenv()
174 		if (!P)  in setenv()
177 			memcpy(P, environ, cnt * sizeof(char *));  in setenv()
178 		lastenv = environ = P;  in setenv()
202 	char **P;  in unsetenv()  local
219 		for (P = &environ[offset];; ++P)  in unsetenv()
220 			if (!(*P = *(P + 1)))  in unsetenv()