298 	static char*			p3;  in ppcontrol()  local
519 	p1 = p2 = p3 = p4 = 0;  in ppcontrol()
617 		(*pp.pragma)(pp.valbuf + 1, p1, p3, p5, (pp.state & COMPILE) || (pp.mode & INIT) != 0);  in ppcontrol()
1613 				p3 = 0;  in ppcontrol()
1621 				p3 = p1;  in ppcontrol()
1628 				p3 = p;  in ppcontrol()
1631 				if (p == p3)  in ppcontrol()
1634 					p3 = 0;  in ppcontrol()
1642 			if (!p1 && p3 && (p4 - p3) == 4 && strneq(p3, "STDC", 4))  in ppcontrol()
1646 			i0 = !p3 || *p3 != 'n' || *(p3 + 1) != 'o';  in ppcontrol()
1647 			if (!p3)  in ppcontrol()
1661 …(((i1 = (int)hashref(pp.strtab, p3 + (i0 ? 0 : 2))) < 1 || i1 > X_last_option) && (i0 || (i1 = (in…  in ppcontrol()
1706 				tokop(PP_CDIR, p3, p, i0, TOKOP_UNSET|TOKOP_STRING|TOKOP_DUP);  in ppcontrol()
1712 				error(3, "%s: preprocessor not compiled with checkpoint enabled", p3);  in ppcontrol()
1716 				tokop(PP_CHOP, p3, p, i0, TOKOP_UNSET|TOKOP_STRING);  in ppcontrol()
1745 		if (c != T_ID) error(1, "%s: %s: identifier expected", p3, pp.token);  in ppcontrol()
1799 				tokop(PP_HOSTDIR, p3, p, i0, TOKOP_UNSET|TOKOP_STRING|TOKOP_DUP);  in ppcontrol()
1808 				tokop(PP_ID, p3, p, i0, TOKOP_UNSET|TOKOP_STRING);  in ppcontrol()
1811 				tokop(PP_IGNORE, p3, p, i0, TOKOP_UNSET|TOKOP_STRING);  in ppcontrol()
1814 				tokop(PP_INCLUDE, p3, p, i0, TOKOP_STRING|TOKOP_DUP);  in ppcontrol()
1846 					else error(2, "%s: option cannot be unset", p3);  in ppcontrol()
1870 		error(2, "%s: option cannot be unset", p3);  in ppcontrol()
1875 		error(2, "%s: address argument expected", p3);  in ppcontrol()
1896 			error(2, "%s: %s: address argument expected", p3, pptokstr(pp.token, 0));  in ppcontrol()
1909 		error(2, "%s: invalid characters after pattern: %s ", p3, s);  in ppcontrol()
1922 			error(2, "%s: substitution argument expected", p3);  in ppcontrol()
1935 			error(2, "%s: invalid characters after substitution: %s ", p3, s);  in ppcontrol()
1941 		error(2, "%s: %s: substitution argument expected", p3, pptokstr(pp.token, 0));  in ppcontrol()
1986 				tokop(PP_PRAGMAFLAGS, p3, p, i0, 0);  in ppcontrol()
2025 				tokop(PP_QUOTE, p3, p, i0, TOKOP_UNSET|TOKOP_STRING);  in ppcontrol()
2034 				tokop(PP_RESERVED, p3, p, i0, 0);  in ppcontrol()
2047 				tokop(PP_STANDARD, p3, p, i0, TOKOP_UNSET|TOKOP_STRING|TOKOP_DUP);  in ppcontrol()
2089 				tokop(PP_VENDOR, p3, p, i0, TOKOP_UNSET|TOKOP_STRING|TOKOP_DUP);  in ppcontrol()
2095 					(*pp.pragma)(dirname(PRAGMA), pp.pass, p3, pp.tmpbuf, !n);  in ppcontrol()