From 2326a3ab13d49f40115e9093bcf71d7d68c11772 Mon Sep 17 00:00:00 2001 From: Noam Postavsky Date: Sat, 19 Aug 2017 07:36:05 -0400 Subject: [PATCH] Stop printing '4' in .elc files after 'define-symbol-prop' calls * lisp/emacs-lisp/bytecomp.el (byte-compile-define-symbol-prop): Return nil in case we have compiled the form, to prevent a redundant constant from getting added to the compiled output. --- lisp/emacs-lisp/bytecomp.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 9e14c91c953..d769a155aa0 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -4740,7 +4740,8 @@ binding slots have been popped." . (,prop ,val ,@(alist-get fun overriding-plist-environment))) overriding-plist-environment) (byte-compile-push-constant val) - (byte-compile-out 'byte-call 3))) + (byte-compile-out 'byte-call 3) + nil)) (_ (byte-compile-keep-pending form)))) -- 2.39.2