From 6c7bf039e9c2e6daf548a95204740eeaf4c61abd Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 20 May 2017 14:53:06 +0300 Subject: [PATCH] Avoid crashes in GC due to unescaped characters warning * src/lread.c (load_warn_unescaped_character_literals): Don't cons Lisp objects from stack-based variables. (Bug#26961) --- src/lread.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/lread.c b/src/lread.c index 5e737d690c6..9e2168e7db4 100644 --- a/src/lread.c +++ b/src/lread.c @@ -960,10 +960,10 @@ load_warn_unescaped_character_literals (Lisp_Object file) { if (NILP (Vlread_unescaped_character_literals)) return; CHECK_CONS (Vlread_unescaped_character_literals); - AUTO_STRING (format, - "Loading `%s': unescaped character literals %s detected!"); - AUTO_STRING (separator, ", "); - AUTO_STRING (inner_format, "`?%c'"); + Lisp_Object format = + build_string ("Loading `%s': unescaped character literals %s detected!"); + Lisp_Object separator = build_string (", "); + Lisp_Object inner_format = build_string ("`?%c'"); CALLN (Fmessage, format, file, Fmapconcat (list3 (Qlambda, list1 (Qchar), -- 2.39.2