procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(read_list): Pass new arg to get_doc_string.

Browse source
This commit is contained in:
Richard M. Stallman 1998-07-05 20:31:37 +00:00
parent 32caae30ca
commit ad0153e46f
1 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/lread.c
View file

@ -302,6 +302,10 @@ readchar (readcharfun)
return c;
}
if (EQ (readcharfun, Qlambda))
return read_bytecode_char (0);
if (EQ (readcharfun, Qget_file_char))
{
c = getc (instream);
@ -391,6 +395,8 @@ unreadchar (readcharfun, c)
read_from_string_index_byte
= string_char_to_byte (readcharfun, read_from_string_index);
}
else if (EQ (readcharfun, Qlambda))
read_bytecode_char (1);
else if (EQ (readcharfun, Qget_file_char))
ungetc (c, instream);
else