65 static char	*get_brace_var ARGS((XString *wsp, char *wp));
113 	char *wp;		/* output word pointer */  local
125 	Xinit(ws, wp, 64, ATEMP);
134 		*wp++ = OQUOTE;	 /* enclose arguments in (double) quotes */
168 		Xcheck(ws, wp);
172 				*wp = EOS; /* temporary */
173 				if (is_wdvarname(Xstring(ws, wp), false))
178 						*wp++ = CHAR;
179 						*wp++ = c;
181 							Xcheck(ws, wp);
182 							*wp++ = CHAR;
183 							*wp++ = *p++;
198 				*wp++ = CHAR;
199 				*wp++ = c;
210 					*wp++ = OPAT;
211 					*wp++ = c;
224 					*wp++ = QCHAR, *wp++ = c;
227 				*wp++ = OQUOTE;
232 				*wp++ = OQUOTE;
250 					*wp++ = QCHAR, *wp++ = c;
254 						*wp++ = QCHAR, *wp++ = c;
259 					Xcheck(ws, wp);
261 						*wp++ = CHAR, *wp++ = '\\';
262 						*wp++ = CHAR, *wp++ = c;
275 							Xsavepos(ws, wp);
276 						*wp++ = EXPRSUB;
282 						*wp++ = COMSUB;
285 					*wp++ = OSUBST;
286 					*wp++ = '{'; /*}*/
287 					wp = get_brace_var(&ws, wp);
291 						*wp++ = CHAR, *wp++ = c;
305 					*wp++ = OSUBST;
306 					*wp++ = 'X';
308 						Xcheck(ws, wp);
309 						*wp++ = c;
312 					*wp++ = '\0';
313 					*wp++ = CSUBST;
314 					*wp++ = 'X';
317 					Xcheck(ws, wp);
318 					*wp++ = OSUBST;
319 					*wp++ = 'X';
320 					*wp++ = c;
321 					*wp++ = '\0';
322 					*wp++ = CSUBST;
323 					*wp++ = 'X';
325 					*wp++ = CHAR, *wp++ = '$';
331 				*wp++ = COMSUB;
358 				*wp++ = CHAR, *wp++ = c;
365 				*wp++ = CQUOTE;
368 				*wp++ = QCHAR, *wp++ = c;
374 				*wp++ = CQUOTE;
428 				*wp++ = 0; /* end of COMSUB */
430 				*wp++ = c;
445 						*wp++ = 0; /* end of EXPRSUB */
455 						s = Xrestpos(ws, wp,
457 						memmove(s + 1, s, wp - s);
460 						wp++;
469 			*wp++ = c;
476 				*wp++ = CSUBST;
477 				*wp++ = /*{*/ '}';
487 				*wp++ = CSUBST;
488 				*wp++ = /*{*/ '}';
490 				*wp++ = SPAT;
492 				*wp++ = OPAT;
493 				*wp++ = ' ';	/* simile for @ */
501 				*wp++ = 0;
507 					*wp++ = c;
511 						*wp++ = c;
517 						*wp++ = '\\';
518 						*wp++ = c;
523 				*wp++ = c;
538 					*wp++ = CQUOTE;
563 					*wp++ = QCHAR;
564 					*wp++ = c;
568 				*wp++ = OQUOTE;
572 				*wp++ = OQUOTE;
574 				*wp++ = CHAR;
575 				*wp++ = c;
581 				*wp++ = CQUOTE;
591 							*wp++ = CHAR;
592 							*wp++ = '\\';
597 				*wp++ = CHAR;
598 				*wp++ = c;
604 				*wp++ = CPAT;
607 				*wp++ = SPAT;
609 				*wp++ = OPAT;
610 				*wp++ = ' ';	/* simile for @ */
618 	Xcheck(ws, wp);
627 	dp = Xstring(ws, wp);
629 	    && ((c2 = Xlength(ws, wp)) == 0
665 		Xfree(ws, wp);	/* free word */
670 	if (wp == dp && state == SBASE) {
671 		Xfree(ws, wp);	/* free word */
714 	*wp++ = EOS;		/* terminate word */
715 	yylval.cp = Xclose(ws, wp);
1203 get_brace_var(wsp, wp)  in get_brace_var()  argument
1205 	char *wp;
1243 					*wp++ = c;
1245 						Xcheck(*wsp, wp);
1246 						*wp++ = *p++;
1264 			*wp++ = '\0';	/* end of variable part */
1268 		Xcheck(*wsp, wp);
1269 		*wp++ = c;
1271 	return wp;
1284 	char	*wp;  local
1288 	Xinit(ws, wp, 32, ATEMP);
1292 		Xcheck(ws, wp);
1293 		*wp++ = c;
1300 	*wp++ = '\0';
1301 	*strp = Xclose(ws, wp);