register const char *	name;  name = getenv("TZ"); if (name == NULL) { tzsetwall_basic(); return; }  if (lcl_is_set > 0 && strcmp(lcl_TZname, name) == 0) return; lcl_is_set = strlen(name) < sizeof lcl_TZname; if (lcl_is_set) (void) strlcpy(lcl_TZname, name, sizeof lcl_TZname);  #ifdef ALL_STATE if (lclptr == NULL) { lclptr = (struct state *) malloc(sizeof *lclptr); if (lclptr == NULL) { settzname();	 return; } } #endif  if (*name == '\0') {  lclptr->leapcnt = 0;		 lclptr->timecnt = 0; lclptr->typecnt = 0; lclptr->ttis[0].tt_isdst = 0; lclptr->ttis[0].tt_gmtoff = 0; lclptr->ttis[0].tt_abbrind = 0; (void) strlcpy(lclptr->chars, gmt, sizeof lclptr->chars); } else if (tzload(name, lclptr) != 0) if (name[0] == ':' || tzparse(name, lclptr, FALSE) != 0) (void) gmtload(lclptr); settzname();
_THREAD_PRIVATE_MUTEX_LOCK(lcl); tzset_basic(); _THREAD_PRIVATE_MUTEX_UNLOCK(lcl);
tzset_basic P((void)){	register const char *	name;	name = getenv("TZ");	if (name == NULL) {		tzsetwall_basic();		return;	}	if (lcl_is_set > 0 && strcmp(lcl_TZname, name) == 0)		return;	lcl_is_set = strlen(name) < sizeof lcl_TZname;	if (lcl_is_set)		(void) strlcpy(lcl_TZname, name, sizeof lcl_TZname);#ifdef ALL_STATE	if (lclptr == NULL) {		lclptr = (struct state *) malloc(sizeof *lclptr);		if (lclptr == NULL) {			settzname();	/* all we can do */			return;		}	}#endif /* defined ALL_STATE */	if (*name == '\0') {		/*		** User wants it fast rather than right.		*/		lclptr->leapcnt = 0;		/* so, we're off a little */		lclptr->timecnt = 0;		lclptr->typecnt = 0;		lclptr->ttis[0].tt_isdst = 0;		lclptr->ttis[0].tt_gmtoff = 0;		lclptr->ttis[0].tt_abbrind = 0;		(void) strlcpy(lclptr->chars, gmt, sizeof lclptr->chars);	} else if (tzload(name, lclptr) != 0)		if (name[0] == ':' || tzparse(name, lclptr, FALSE) != 0)			(void) gmtload(lclptr);	settzname();}