bin/gawk/awkgram.c

206 static char *tokstart = NULL;
1693 			tokstart);
1736 				lintwarn(_("regexp constant `/%s/' looks like a C comment, but is not"), tokstart);
3203 	tokoffset = tok - tokstart;
3205 	if (tokstart != NULL)
3206 		erealloc(tokstart, char *, toksize, "tokexpand");
3208 		emalloc(tokstart, char *, toksize, "tokexpand");
3209 	tokend = tokstart + toksize;
3210 	tok = tokstart + tokoffset;
3416 		tok = tokstart;
3430 				if (tokstart[0] == '['
3431 				    && (tok == tokstart + 1
3432 					|| (tok == tokstart + 2
3433 					    && tokstart[1] == '^')))
3456 				yylval.sval = tokstart;
3475 	tok = tokstart;
3745 		yylval.nodeval = make_str_node(tokstart,
3746 					tok - tokstart, esc_seen ? SCAN : 0);
3795 				if (tok == tokstart + 2)
3858 		if (! do_traditional && isnondecimal(tokstart)) {
3863 					strlen(tokstart)-1, tokstart);
3865 			yylval.nodeval = make_number(nondec2awknum(tokstart, strlen(tokstart)));
3867 			yylval.nodeval = make_number(atof(tokstart));
3928 	tok = tokstart;
3934 	emalloc(tokkey, char *, tok - tokstart, "yylex");
3935 	memcpy(tokkey, tokstart, tok - tokstart);
3950 		c = *tokstart - tokentab[mid].operator[0];
3951 		i = c ? c : strcmp(tokstart, tokentab[mid].operator);