* Copyright (c) 1988 The Regents of the University of California.
* %sccs.include.redist.c%
#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid
[] = "@(#)putenv.c 5.3 (Berkeley) %G%";
#endif /* LIBC_SCCS and not lint */
register char *p
, *equal
;
if (!(equal
= index(p
, '='))) {
rval
= setenv(p
, equal
+ 1, 1);