# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 728343157 0
# Node ID e31051f17b9d703c8f4e5266e79f0c5233df49fc
# Parent  6ca05c5f89793b869beeca2e1fdae2807df1b5fd
	* lread.c (read1): Although digits followed by a '.' are an
	integer, a single . by itself (like, say, \.) should be a symbol.

diff -r 6ca05c5f8979 -r e31051f17b9d src/lread.c
--- a/src/lread.c	Thu Jan 28 20:22:03 1993 +0000
+++ b/src/lread.c	Fri Jan 29 21:32:37 1993 +0000
@@ -1047,7 +1047,7 @@
 	      while (p1 != p && (c = *p1) >= '0' && c <= '9') p1++;
 #ifdef LISP_FLOAT_TYPE
 	      /* Integers can have trailing decimal points.  */
-	      if (p1 < p && *p1 == '.') p1++;
+	      if (p1 > read_buffer && p1 < p && *p1 == '.') p1++;
 #endif
 	      if (p1 == p)
 		/* It is an integer. */