Commit 6069d957 authored by Richard M. Stallman's avatar Richard M. Stallman

(readevalloop): Ignore ^M here.

parent 487d5fb2
......@@ -724,7 +724,10 @@ readevalloop (readcharfun, stream, sourcename, evalfun, printflag)
continue;
}
if (c < 0) break;
if (c == ' ' || c == '\t' || c == '\n' || c == '\f') continue;
/* Ignore whitespace here, so we can detect eof. */
if (c == ' ' || c == '\t' || c == '\n' || c == '\f' || c == '\r')
continue;
if (!NILP (Vpurify_flag) && c == '(')
{
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment