Changed char to int so non-ASCII chars wouldn't be sign-extended -- was

blowing char-set test in skip_chars.
	-Olin
This commit is contained in:
shivers 1995-11-20 06:32:02 +00:00
parent acaaedd035
commit 2c9e06d6ae
1 changed files with 1 additions and 1 deletions

View File

@ -471,7 +471,7 @@ scheme_value skip_chars(const char *skipchars, scheme_value port, int *nread)
** stdio FILE*. Yech. ** stdio FILE*. Yech.
*/ */
if( IsChar(peekc) ) { if( IsChar(peekc) ) {
char c = EXTRACT_CHAR(peekc); int c = EXTRACT_CHAR(peekc);
if( skipchars[c] ) { /* Is c in cset? */ if( skipchars[c] ) { /* Is c in cset? */
*PortData_Peek(data) = SCHFALSE; *PortData_Peek(data) = SCHFALSE;
nr = 1; nr = 1;