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

(read1): Accept `single space' syntax like (? x).

Browse source
This commit is contained in:
Kim F. Storm 2003-02-25 12:29:03 +00:00
parent 1ebb05c430
commit b928437175
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/lread.c
View file

@ -2258,6 +2258,13 @@ read1 (readcharfun, pch, first_in_list)
if (c < 0)
end_of_file_error ();
/* Accept `single space' syntax like (list ? x) where the
whitespace character is SPC or TAB.
Other literal whitespace like NL, CR, and FF are not accepted,
as there are well-established escape sequences for these. */
if (c == ' ' || c == '\t')
return make_number (c);
if (c == '\\')
c = read_escape (readcharfun, 0, &discard);
else if (BASE_LEADING_CODE_P (c))