246     char *tcp, *ttyn;  in main()  local
605     if (((tcp = getenv("HOME")) != NULL && strcmp (tcp, "/data") != 0)  in main()
606 	|| (tcp = getenv("EXTERNAL_STORAGE")) != NULL) {  in main()
607 	cp = quote(SAVE(tcp));  in main()
612     if ((tcp = getenv("HOME")) != NULL)  in main()
613 	cp = quote(SAVE(tcp));  in main()
701     if ((tcp = getenv("SYSTYPE")) == NULL)  in main()
702 	tcp = "bsd4.3";  in main()
703     tsetenv(STRSYSTYPE, quote(str2short(tcp)));  in main()
726     if ((tcp = getenv("TERM")) != NULL) {  in main()
727 	setv(STRterm, quote(SAVE(tcp)), VAR_READWRITE);  in main()
728 	noediting = strcmp(tcp, "unknown") == 0 || strcmp(tcp, "dumb") == 0 ||  in main()
729 		    strcmp(tcp, "network") == 0;  in main()
730 	editing = strcmp(tcp, "emacs") != 0 && strcmp(tcp, "wm") != 0 &&  in main()
735 	editing = ((tcp = getenv("EMACS")) == NULL || strcmp(tcp, "t") != 0);  in main()
765     if ((tcp = getenv("PATH")) == NULL) {  in main()
782 	importpath(str2short(tcp));  in main()
794 	if ((tcp = getenv("SHELL")) != NULL) {  in main()
795 	    sh_len = strlen(tcp);  in main()
796 	    if ((sh_len >= 5 && strcmp(tcp + (sh_len - 5), "/tcsh") == 0) ||  in main()
797 	        (!tcsh && sh_len >= 4 && strcmp(tcp + (sh_len - 4), "/csh") == 0))  in main()
798 		setv(STRshell, quote(SAVE(tcp)), VAR_READWRITE);  in main()
807     if ((tcp = getenv("PROGRAM_ENVIRONMENT")) == NULL)  in main()
808 	tcp = "SHELL";  in main()
809     tsetenv(STRPROGRAM_ENVIRONMENT, quote(str2short(tcp)));  in main()
813     if ((tcp = getenv("LS_COLORS")) != NULL)  in main()
814 	parseLS_COLORS(str2short(tcp));  in main()
815     if ((tcp = getenv("LSCOLORS")) != NULL)  in main()
816 	parseLSCOLORS(str2short(tcp));  in main()
870 …if (((tcp = setlocale(LC_CTYPE, NULL)) != NULL || (tcp = getenv("LANG")) != NULL) && !adrof(CHECK_…  in main()
872     if ((tcp = getenv("LANG")) != NULL && !adrof(CHECK_MBYTEVAR))  in main()
875 	autoset_dspmbyte(str2short(tcp));  in main()
912     while (argc > 0 && (tcp = tempv[0])[0] == '-' &&  in main()
913 	   *++tcp != '\0' && !batch) {  in main()
915 	    switch (*tcp++) {  in main()
956 		    cp = str2short(tcp);  in main()
964 		*tcp = '\0'; 	/* done with this argument */  in main()
1039 		stderror(ERR_TCSHUSAGE, tcp-1, progname);  in main()
1042 	} while (*tcp);  in main()