Commit f3849f25 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(close_load_descs) [WINDOWS_NT]: Don't actually do anything.

(read_escape): Detect READCHAR reporting eof.
parent e0c07012
......@@ -516,9 +516,11 @@ load_descriptor_unwind (oldlist)
void
close_load_descs ()
{
#ifndef WINDOWSNT
Lisp_Object tail;
for (tail = load_descriptor_list; !NILP (tail); tail = XCONS (tail)->cdr)
close (XFASTINT (XCONS (tail)->car));
#endif
}
static int
......@@ -1003,6 +1005,9 @@ read_escape (readcharfun)
register int c = READCHAR;
switch (c)
{
case -1:
error ("End of file");
case 'a':
return '\007';
case 'b':
......
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