[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/lread.c
From: |
Dave Love |
Subject: |
[Emacs-diffs] Changes to emacs/src/lread.c |
Date: |
Sun, 04 May 2003 11:46:26 -0400 |
Index: emacs/src/lread.c
diff -c emacs/src/lread.c:1.313 emacs/src/lread.c:1.314
*** emacs/src/lread.c:1.313 Tue Apr 8 13:10:07 2003
--- emacs/src/lread.c Wed Apr 9 03:12:51 2003
***************
*** 2278,2293 ****
UNREAD (next_next_char);
ok = (next_next_char <= 040
! || index ("\"';([#?", next_next_char)
! || (!first_in_list && next_next_char == '`')
! || (new_backquote_flag && next_next_char == ','));
}
else
{
ok = (next_char <= 040
! || index ("\"';()[]#?", next_char)
! || (!first_in_list && next_char == '`')
! || (new_backquote_flag && next_char == ','));
}
UNREAD (next_char);
if (!ok)
--- 2278,2295 ----
UNREAD (next_next_char);
ok = (next_next_char <= 040
! || (next_next_char < 0200
! && (index ("\"';([#?", next_next_char)
! || (!first_in_list && next_next_char == '`')
! || (new_backquote_flag && next_next_char == ','))));
}
else
{
ok = (next_char <= 040
! || (next_char < 0200
! && (index ("\"';()[]#?", next_char)
! || (!first_in_list && next_char == '`')
! || (new_backquote_flag && next_char == ','))));
}
UNREAD (next_char);
if (!ok)
***************
*** 2445,2453 ****
UNREAD (next_char);
if (next_char <= 040
! || index ("\"';([#?", next_char)
! || (!first_in_list && next_char == '`')
! || (new_backquote_flag && next_char == ','))
{
*pch = c;
return Qnil;
--- 2447,2456 ----
UNREAD (next_char);
if (next_char <= 040
! || (next_char < 0200
! && index ("\"';([#?", next_char)
! || (!first_in_list && next_char == '`')
! || (new_backquote_flag && next_char == ',')))
{
*pch = c;
return Qnil;
***************
*** 2468,2476 ****
char *end = read_buffer + read_buffer_size;
while (c > 040
! && !index ("\"';()[]#", c)
! && !(!first_in_list && c == '`')
! && !(new_backquote_flag && c == ','))
{
if (end - p < MAX_MULTIBYTE_LENGTH)
{
--- 2471,2480 ----
char *end = read_buffer + read_buffer_size;
while (c > 040
! && (c >= 0200
! || (!index ("\"';()[]#", c)
! && !(!first_in_list && c == '`')
! && !(new_backquote_flag && c == ','))))
{
if (end - p < MAX_MULTIBYTE_LENGTH)
{