179     while (*buf_ptr == ' ' || *buf_ptr == '\t') {	/* get rid of blanks */  in lexi()
182 	if (++buf_ptr >= buf_end)  in lexi()
187     if (isalnum((unsigned char)*buf_ptr) ||  in lexi()
188 	*buf_ptr == '_' || *buf_ptr == '$' ||  in lexi()
189 	(buf_ptr[0] == '.' && isdigit((unsigned char)buf_ptr[1]))) {  in lexi()
195 	if (isdigit((unsigned char)*buf_ptr) ||  in lexi()
196 	    (buf_ptr[0] == '.' && isdigit((unsigned char)buf_ptr[1]))) {  in lexi()
201 		i = (unsigned char)*buf_ptr;  in lexi()
209 		*e_token++ = *buf_ptr++;  in lexi()
210 		if (buf_ptr >= buf_end)  in lexi()
216 	    while (isalnum((unsigned char)*buf_ptr) ||  in lexi()
217 	        *buf_ptr == BACKSLASH ||  in lexi()
218 		*buf_ptr == '_' || *buf_ptr == '$') {  in lexi()
220 		if (*buf_ptr == BACKSLASH) {  in lexi()
221 		    if (*(buf_ptr + 1) == '\n') {  in lexi()
222 			buf_ptr += 2;  in lexi()
223 			if (buf_ptr >= buf_end)  in lexi()
230 		*e_token++ = *buf_ptr++;  in lexi()
231 		if (buf_ptr >= buf_end)  in lexi()
237 	      (*buf_ptr == '"' || *buf_ptr == '\''))  in lexi()
240 	while (*buf_ptr == ' ' || *buf_ptr == '\t') {	/* get rid of blanks */  in lexi()
241 	    if (++buf_ptr >= buf_end)  in lexi()
318 	if (*buf_ptr == '(' && state->tos <= 1 && state->ind_level == 0 &&  in lexi()
320 	    char *tp = buf_ptr;  in lexi()
337 	    ((*buf_ptr == '*' && buf_ptr[1] != '=') ||  in lexi()
338 		isalpha((unsigned char)*buf_ptr)) &&  in lexi()
354     *e_token++ = *buf_ptr;		/* if it is only a one-character token, it is  in lexi()
357     if (++buf_ptr >= buf_end)  in lexi()
377 		if (*buf_ptr == '\n') {  in lexi()
382 		*e_token = *buf_ptr++;  in lexi()
383 		if (buf_ptr >= buf_end)  in lexi()
386 		    if (*buf_ptr == '\n')	/* check for escaped newline */  in lexi()
388 		    *++e_token = *buf_ptr++;  in lexi()
391 		    if (buf_ptr >= buf_end)  in lexi()
471 	if (*buf_ptr == token[0]) {  in lexi()
473 	    *e_token++ = *buf_ptr++;  in lexi()
481 	else if (*buf_ptr == '=')  in lexi()
483 	    *e_token++ = *buf_ptr++;  in lexi()
484 	else if (*buf_ptr == '>') {  in lexi()
486 	    *e_token++ = *buf_ptr++;  in lexi()
499 	if (*buf_ptr == '=') {/* == */  in lexi()
501 	    buf_ptr++;  in lexi()
512 	if (*buf_ptr == '>' || *buf_ptr == '<' || *buf_ptr == '=') {  in lexi()
513 	    *e_token++ = *buf_ptr;  in lexi()
514 	    if (++buf_ptr >= buf_end)  in lexi()
517 	if (*buf_ptr == '=')  in lexi()
518 	    *e_token++ = *buf_ptr++;  in lexi()
526 	    if (*buf_ptr == '=')  in lexi()
527 		*e_token++ = *buf_ptr++;  in lexi()
531 	while (*buf_ptr == '*' || isspace((unsigned char)*buf_ptr)) {  in lexi()
532 	    if (*buf_ptr == '*') {  in lexi()
534 		*e_token++ = *buf_ptr;  in lexi()
536 	    if (++buf_ptr >= buf_end)  in lexi()
540 	    char *tp = buf_ptr;  in lexi()
554 	if (token[0] == '/' && *buf_ptr == '*') {  in lexi()
558 	    if (++buf_ptr >= buf_end)  in lexi()
565 	while (*(e_token - 1) == *buf_ptr || *buf_ptr == '=') {  in lexi()
570 	    *e_token++ = *buf_ptr;  in lexi()
571 	    if (++buf_ptr >= buf_end)  in lexi()
579     if (buf_ptr >= buf_end)	/* check for input buffer empty */  in lexi()