ncurses/tinfo/comp_scan.c

63 #define iswhite(ch)	(ch == ' '  ||  ch == '\t')
294 eat_escaped_newline(int ch)
296     if (ch == '\\')
297 	while ((ch = next_char()) == '\n' || iswhite(ch))
299     return ch;
307 #define AddCh(ch) \
308 	*tok_ptr++ = (char) ch; \
357     int ch, c0, c1;
395     while ((ch = next_char()) == '\n' || iswhite(ch)) {
396 	if (ch == '\n')
401     ch = eat_escaped_newline(ch);
408     if (ch == EOF)
412 	if (separator == ':' && ch == ':')
413 	    ch = next_char();
415 	if (ch == '.'
423 	    while ((ch = next_char()) == '.' || iswhite(ch))
427 	if (ch == EOF) {
433 	if (!isalnum(UChar(ch))
435 	    && !(ch == '.' && _nc_disable_period)
437 	    && ((strchr) (terminfo_punct, (char) ch) == 0)) {
440 			    terminfo_punct, unctrl(UChar(ch)));
453 	AddCh(ch);
463 	    while ((ch = next_char()) != '\n') {
464 		if (ch == EOF) {
466 		} else if (ch == '|') {
470 		} else if (ch == ':' && last_char(0) != ',') {
474 		} else if (ch == ',') {
543 		    ch = eat_escaped_newline(ch);
546 		    AddCh(ch);
576 		ch = *after_name;
579 		*after_name = (char) ch;
628 	    while ((ch = next_char()) != EOF) {
629 		if (!isalnum(UChar(ch))) {
631 			if (ch != '_')
634 			if (ch != ';')
639 		    AddCh(ch);
641 		    ch = EOF;
647 	    switch (ch) {
650 		if (ch != separator)
656 		if ((ch = next_char()) != separator && !silent)
658 				tok_buf, unctrl(UChar(ch)));
665 		while (isalnum(ch = next_char())) {
666 		    numbuf[found++] = (char) ch;
675 		    if ((*numchk != '\0') || (ch != separator))
684 		ch = _nc_trans_string(tok_ptr, tok_buf + TOK_BUF_SIZE);
685 		if (!silent && ch != separator)
699 		    _nc_warning("Illegal character - '%s'", unctrl(UChar(ch)));
702     }				/* end else (ch != EOF) */
992  * Panic mode error recovery - skip everything until a "ch" is found.
995 _nc_panic_mode(char ch)
1001 	if (c == ch)