Commit 03859d20 authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(read1): Accept `.' (period) as symbol start like in CL

and earlier Emacs versions.
parent 3bc25e52
......@@ -2135,13 +2135,10 @@ read1 (readcharfun, pch, first_in_list)
case '.':
{
/* If a period is followed by a number, then we should read it
as a floating point number. Otherwise, it denotes a dotted
pair. */
int next_char = READCHAR;
UNREAD (next_char);
if (! (next_char >= '0' && next_char <= '9'))
if (next_char <= 040)
{
*pch = c;
return Qnil;
......
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