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:
parent
acaaedd035
commit
2c9e06d6ae
|
@ -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;
|
||||||
|
|
Loading…
Reference in New Issue