4.3BSD/usr/contrib/mkmf/src/getproject.c
/* $Header: getproject.c,v 1.1 85/03/14 16:59:01 nicklin Exp $ */
/*
* Author: Peter J. Nicklin
*/
/*
* getproject() saves the contents of the PROJECT environment variable.
* If the PROJECT variable is undefined or a null string, null is returned.
*/
#include "null.h"
char *_PROJECT = NULL; /* project root directory pathname */
void
getproject()
{
register char *pv; /* ptr to start of PROJECT variable */
char *getenv(); /* get environment variable */
char *strsav(); /* save a string somewhere */
if ((pv = getenv("PROJECT")) != NULL && *pv != '\0')
_PROJECT = strsav(pv);
}