summaryrefslogtreecommitdiff
path: root/src/lread.c
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2000-04-27 19:10:15 +0000
committerGerd Moellmann <gerd@gnu.org>2000-04-27 19:10:15 +0000
commit035eec486e617046cffd65a0086db3fec4edb05f (patch)
tree32a5ff3a2bc30530ae715418e23a0b38881d91f4 /src/lread.c
parent7e0ba6da56f6a557f135e0ca65835b473db8a0e1 (diff)
downloademacs-035eec486e617046cffd65a0086db3fec4edb05f.tar.gz
(read1): Don't treat period followed by certain
characters as symbol start.
Diffstat (limited to 'src/lread.c')
-rw-r--r--src/lread.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c
index 3235be321d7..67f6c956fe1 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -2165,7 +2165,8 @@ read1 (readcharfun, pch, first_in_list)
int next_char = READCHAR;
UNREAD (next_char);
- if (next_char <= 040)
+ if (next_char <= 040
+ || index ("\"'`,(", next_char))
{
*pch = c;
return Qnil;