From fbbc257190d115dc76e1a8cf4e4992d52d7f55b9 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Fri, 23 Aug 2019 06:20:41 +0200 Subject: [PATCH] Give a better error message when reading invalid "\unicode" escapes. * src/lread.c (read_escape): Give a clearer error message on Unicode escape sequences (bug#36988). --- src/lread.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/lread.c b/src/lread.c index e444830c99a..6ae7a0d8ba0 100644 --- a/src/lread.c +++ b/src/lread.c @@ -2585,7 +2585,8 @@ read_escape (Lisp_Object readcharfun, bool stringp) want. */ int digit = char_hexdigit (c); if (digit < 0) - error ("Non-hex digit used for Unicode escape"); + error ("Non-hex character used for Unicode escape: %c (%d)", + c, c); i = (i << 4) + digit; } if (i > 0x10FFFF) -- 2.39.2