From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED.blaine.gmane.org!not-for-mail From: Lars Ingebrigtsen Newsgroups: gmane.emacs.devel Subject: Re: Towards a cleaner build Date: Fri, 17 May 2019 16:07:08 +0200 Message-ID: References: <831s0xd3z1.fsf@gnu.org> <83pnohbhny.fsf@gnu.org> Mime-Version: 1.0 Content-Type: text/plain Injection-Info: blaine.gmane.org; posting-host="blaine.gmane.org:195.159.176.226"; logging-data="174536"; mail-complaints-to="usenet@blaine.gmane.org" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.0.50 (gnu/linux) Cc: Eli Zaretskii , Stefan Monnier , Emacs developers To: Noam Postavsky Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Fri May 17 16:08:02 2019 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([209.51.188.17]) by blaine.gmane.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:256) (Exim 4.89) (envelope-from ) id 1hRdWk-000jFp-GV for ged-emacs-devel@m.gmane.org; Fri, 17 May 2019 16:08:02 +0200 Original-Received: from localhost ([127.0.0.1]:49157 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1hRdWj-00089I-CP for ged-emacs-devel@m.gmane.org; Fri, 17 May 2019 10:08:01 -0400 Original-Received: from eggs.gnu.org ([209.51.188.92]:39017) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1hRdW6-000892-0T for emacs-devel@gnu.org; Fri, 17 May 2019 10:07:23 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1hRdW3-0007mK-Kz for emacs-devel@gnu.org; Fri, 17 May 2019 10:07:21 -0400 Original-Received: from quimby.gnus.org ([80.91.231.51]:35822) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1hRdW0-0007Yb-MF; Fri, 17 May 2019 10:07:17 -0400 Original-Received: from cm-84.212.202.86.getinternet.no ([84.212.202.86] helo=stories) by quimby.gnus.org with esmtpsa (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.89) (envelope-from ) id 1hRdVs-0003bq-P9; Fri, 17 May 2019 16:07:12 +0200 Face: iVBORw0KGgoAAAANSUhEUgAAADAAAAAwBAMAAAClLOS0AAAAGFBMVEUPCgH//wH//wTGtxD/ /wL//wD//wP18gYTPlgZAAACTElEQVQ4jb1Tu47bMBAkoCI1AerqHGVYreEFjjXtBVULsD4gskC3 Z1HQ/n5mZSO+JEib8UPkznL2JZpG5kUA/EXJWSS3MrerN/RBgYBlDQBRKYWoOc5GgmBfZGHYcTKU RkqRo5l4ypFt3fe1tS5m5inlMWcQPMFggYvj6GJ0acw8mcTYceTa6gdg56Z0yoax3vz1AQ/LNrJL 3riHse7tBURkGBE1bwRk7DAMD48eWjalbDaZCHuvrBIWBLKCeVB/oMYXdkRiBlEPfa82iz+sN4qt Mz2SHF4nIFkP9mJPRkVtP/wCWjBAzBlEqF8nHkD4N/PF+QmVAPHV80loEs5sOda/EwijhP3jxFYy iB51v8L3CIH6OWl3o9aOkPWzycxp782EJ0ftkA4Aa96Pfu+9+aHrTZbVJWX/JDBz7GuV4YxB8OhH n0Gov448OhUHJp9zHr3Ba8G2u1s7chcmdpzHEWJK4MChwljzZzUhB3hmfhvN9iYcKh3dd7OkgBSc SzGZiBM3CkjWnWm+mgUpMIKYnXWprO0CdfHSmCWXwBoDsrdwozXyiXZtK+v4WW1ZIYRIK0irIxGf ZSphVsLlPd7x8s7cUSjKYYvqtUDR68G5w6MK0hYhv1WecVPkHvlM2xXS3wzCuq4EWtASEASfleiw EbbB+q5tL3rlyDf0kHIyn+gd3X0rVMKR1uYhFbuy6yhifLGhBld1aagcQRS6x3NgHeAZxFrCFZcW hKlEGiUiCpnp4xquoSUlFJWmyDcjxpChb/5wfBJ/o/oX8V/wE4vO7qgaDhi1AAAAAElFTkSuQmCC In-Reply-To: (Lars Ingebrigtsen's message of "Fri, 17 May 2019 15:41:36 +0200") X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 80.91.231.51 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Original-Sender: "Emacs-devel" Xref: news.gmane.org gmane.emacs.devel:236673 Archived-At: Lars Ingebrigtsen writes: > Oh, I think I understand now. While compiling a function, we haven't > yet registered that it's obsolete. The following would fix that, so it still seems to be pretty easy to implement the "don't warn about obsolete from obsolete functions". But I don't know whether there are other side effects here... diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el index 842d1d48b4..c35aab2e02 100644 --- a/lisp/emacs-lisp/byte-run.el +++ b/lisp/emacs-lisp/byte-run.el @@ -92,6 +92,9 @@ defun-declarations-alist (list 'quote f) (list 'quote arglist) (list 'quote when)))) (list 'obsolete #'(lambda (f _args new-name when) + ;; Record obsolete info immediately so that we know that + ;; we're compiling an obsolete function. + (put f 'byte-obsolete-info (list new-name nil when)) (list 'make-obsolete (list 'quote f) (list 'quote new-name) (list 'quote when)))) (list 'interactive-only -- (domestic pets only, the antidote for overdose, milk.) bloggy blog: http://lars.ingebrigtsen.no