mirror of
https://github.com/masscollaborationlabs/emacs.git
synced 2025-07-05 03:39:38 +00:00
* src/lread.c (READ_AND_BUFFER): Reject negative chars (bug#73914).
This commit is contained in:
parent
ac4151e002
commit
681f70ea04
1 changed files with 2 additions and 0 deletions
|
@ -3913,6 +3913,8 @@ read_stack_reset (intmax_t sp)
|
||||||
|
|
||||||
#define READ_AND_BUFFER(c) \
|
#define READ_AND_BUFFER(c) \
|
||||||
c = READCHAR; \
|
c = READCHAR; \
|
||||||
|
if (c < 0) \
|
||||||
|
INVALID_SYNTAX_WITH_BUFFER (); \
|
||||||
if (multibyte) \
|
if (multibyte) \
|
||||||
p += CHAR_STRING (c, (unsigned char *) p); \
|
p += CHAR_STRING (c, (unsigned char *) p); \
|
||||||
else \
|
else \
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue