diff --git a/racket/src/ChezScheme/c/expeditor.c b/racket/src/ChezScheme/c/expeditor.c index 1e54d9137c..6dd849ba34 100644 --- a/racket/src/ChezScheme/c/expeditor.c +++ b/racket/src/ChezScheme/c/expeditor.c @@ -553,7 +553,7 @@ static void s_ee_write_char(wchar_t c) { #include #include #include -#if !defined(__GLIBC__) && !defined(__OpenBSD__) && !defined(__NetBSD__) && !defined(__linux__) +#if !defined(__GLIBC__) && !defined(__OpenBSD__) && !defined(__NetBSD__) && !defined(__linux__) && !defined(NO_USELOCALE) # include #endif @@ -712,7 +712,8 @@ static ptr s_ee_read_char(IBOOL blockp) { return Schar(wch); } } - } + } else + sz = 0; } while ((n < 0 && errno == EINTR) || (n == 1 && sz == (size_t)-2));