Mercurial > emacs

diff src/lread.c @ 28388:5b49a098d0cc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(read1): Accept `.' (period) as symbol start like in CL and earlier Emacs versions.
author Gerd Moellmann <gerd@gnu.org>
date Wed, 29 Mar 2000 12:57:45 +0000
parents b445e32d5a7a
children b6f06a755c7d
line wrap: on
line diff
--- a/src/lread.c	Wed Mar 29 11:31:23 2000 +0000
+++ b/src/lread.c	Wed Mar 29 12:57:45 2000 +0000
@@ -2135,13 +2135,10 @@
 
     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;