comparison src/lread.c @ 28746:42f2ded9d9db

(read1): Don't treat period followed by certain characters as symbol start.
author Gerd Moellmann <gerd@gnu.org>
date Thu, 27 Apr 2000 19:10:15 +0000
parents 3234d64a07bf
children 4c02859dda27
comparison
equal deleted inserted replaced
28745:b04dc1778dee 28746:42f2ded9d9db
2163 case '.': 2163 case '.':
2164 { 2164 {
2165 int next_char = READCHAR; 2165 int next_char = READCHAR;
2166 UNREAD (next_char); 2166 UNREAD (next_char);
2167 2167
2168 if (next_char <= 040) 2168 if (next_char <= 040
2169 || index ("\"'`,(", next_char))
2169 { 2170 {
2170 *pch = c; 2171 *pch = c;
2171 return Qnil; 2172 return Qnil;
2172 } 2173 }
2173 2174