From: Eli Zaretskii <eliz@gnu.org>
Date: Sun, 20 Oct 2024 19:39:53 +0000 (+0300)
Subject: * src/lread.c (READ_AND_BUFFER): Reject negative chars (bug#73914).
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b4cf18009a0dc7d256cccc0f02aa05729b2c03d4;p=emacs.git

* src/lread.c (READ_AND_BUFFER): Reject negative chars (bug#73914).

(cherry picked from commit 681f70ea04a30bb43bb87448a6d71458d773d247)
---

diff --git a/src/lread.c b/src/lread.c
index 95c6891c205..ea0398196e3 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -3911,6 +3911,8 @@ read_stack_reset (intmax_t sp)
 
 #define READ_AND_BUFFER(c)			\
   c = READCHAR;					\
+  if (c < 0)					\
+    INVALID_SYNTAX_WITH_BUFFER ();		\
   if (multibyte)				\
     p += CHAR_STRING (c, (unsigned char *) p);	\
   else						\