From 395c5d1c2f2469b8125971c152bc606076031787 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Gerd=20M=C3=B6llmann?= Date: Sat, 22 Oct 2022 12:35:55 +0200 Subject: [PATCH] Remove an invalid eassert * src/pkg.c (pkg_emacs_intern): Don't assert that symbol names can never start with a colon. --- src/pkg.c | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/pkg.c b/src/pkg.c index c295fabbc34..8a8ff4f227c 100644 --- a/src/pkg.c +++ b/src/pkg.c @@ -542,7 +542,9 @@ pkg_emacs_intern (Lisp_Object name, Lisp_Object package) package = Vkeyword_package; } - eassert (SREF (name, 0) != ':'); + /* The following assertion would be invalid because we might want to + intern '::' in the keyword package, and a test does that. */ + //eassert (SREF (name, 0) != ':'); if (VECTORP (package)) package = pkg_fake_me_an_obarray (package); -- 2.39.2