[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 6c7bf03: Avoid crashes in GC due to unescaped chara
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] master 6c7bf03: Avoid crashes in GC due to unescaped characters warning |
Date: |
Sat, 20 May 2017 07:54:15 -0400 (EDT) |
branch: master
commit 6c7bf039e9c2e6daf548a95204740eeaf4c61abd
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>
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 5e737d6..9e2168e 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),
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 6c7bf03: Avoid crashes in GC due to unescaped characters warning,
Eli Zaretskii <=