summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/lread.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c
index 72523c057f1..d5ba48a170d 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -2677,7 +2677,7 @@ read1 (Lisp_Object readcharfun, int *pch, bool first_in_list)
int c;
bool uninterned_symbol = false;
bool multibyte;
- char stackbuf[MAX_ALLOCA];
+ char stackbuf[128]; /* Small, as read1 is recursive (Bug#31995). */
current_thread->stack_top = stackbuf;
*pch = 0;