1193 	unsigned char subtype;  in sharg()  local
1209 			subtype = *++p;  in sharg()
1210 			if (subtype == VSLENGTH)  in sharg()
1218 			if (subtype & VSNUL)  in sharg()
1221 			switch (subtype & VSTYPE) {  in sharg()
1254 				out1fmt("<subtype %d>", subtype);  in sharg()
4846 	unsigned char subtype = 0;  in cmdputs()  local
4859 			subtype = *p++;  in cmdputs()
4860 			if ((subtype & VSTYPE) == VSLENGTH)  in cmdputs()
4869 			subtype = 0;  in cmdputs()
4902 			if (subtype == 0)  in cmdputs()
4904 			if ((subtype & VSTYPE) != VSNORMAL)  in cmdputs()
4906 			str = vstype[subtype & VSTYPE];  in cmdputs()
4907 			if (subtype & VSNUL)  in cmdputs()
7039 	int subtype = varflags & VSTYPE;  in subevalvar()  local
7063 	if (subtype == VSREPLACE || subtype == VSREPLACEALL) {  in subevalvar()
7093 	 && subtype != VSSUBSTR  in subevalvar()
7119 	switch (subtype) {  in subevalvar()
7253 	if (subtype == VSREPLACE || subtype == VSREPLACEALL) {  in subevalvar()
7337 			if (subtype == VSREPLACEALL) {  in subevalvar()
7361 			if (subtype == VSREPLACE) {  in subevalvar()
7387 	subtype -= VSTRIMRIGHT;  in subevalvar()
7389 	if (subtype < 0 || subtype > 7)  in subevalvar()
7393 	zero = subtype >> 1;  in subevalvar()
7395 	scan = (subtype & 1) ^ zero ? scanleft : scanright;  in subevalvar()
7440 	int subtype = varflags & VSTYPE;  in varvalue()  local
7441 	int discard = (subtype == VSPLUS || subtype == VSLENGTH) | (flags & EXP_DISCARD);  in varvalue()
7443 	if (!subtype) {  in varvalue()
7551 		if (subtype == VSLENGTH && len > 0) {  in varvalue()
7577 	char subtype;  in evalvar()  local
7586 	subtype = varflags & VSTYPE;  in evalvar()
7600 	switch (subtype) {  in evalvar()
7618 		subtype = VSNORMAL;  in evalvar()
7625 	if (subtype == VSLENGTH) {  in evalvar()
7633 	if (subtype == VSNORMAL)  in evalvar()
7637 	switch (subtype) {  in evalvar()
12766 	unsigned char subtype;  in readtoken1()  local
12799 		subtype = VSNORMAL;  in readtoken1()
12802 			subtype = 0;  in readtoken1()
12816 			} while ((subtype == 0 || subtype == VSLENGTH) && isdigit(c));  in readtoken1()
12822 			if (!subtype && cc == '#') {  in readtoken1()
12823 				subtype = VSLENGTH;  in readtoken1()
12830 					subtype = 0;  in readtoken1()
12837 				if (subtype == VSLENGTH)  in readtoken1()
12838 					subtype = 0;  in readtoken1()
12846 		if (subtype == 0) {  in readtoken1()
12861 					subtype = VSSUBSTR;  in readtoken1()
12866 				subtype = VSNUL;  in readtoken1()
12872 				subtype |= p - types + VSNORMAL;  in readtoken1()
12877 				subtype = (c == '#' ? VSTRIMLEFT : VSTRIMRIGHT);  in readtoken1()
12880 					subtype++;  in readtoken1()
12892 				subtype = VSREPLACE;  in readtoken1()
12897 				subtype++; /* VSREPLACEALL */  in readtoken1()
12902 			if (subtype == VSLENGTH && c != '}')  in readtoken1()
12903 				subtype = 0;  in readtoken1()
12912 		 && subtype != VSNORMAL  in readtoken1()
12922 		((unsigned char *)stackblock())[typeloc] = subtype;  in readtoken1()
12923 		if (subtype != VSNORMAL) {  in readtoken1()