From unknown Sat Aug 16 12:45:20 2025 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 X-Mailer: MIME-tools 5.509 (Entity 5.509) Content-Type: text/plain; charset=utf-8 From: bug#7297 <7297@debbugs.gnu.org> To: bug#7297 <7297@debbugs.gnu.org> Subject: Status: 24.0.50; Split byte-recompile-directory into byte-recompile-file Reply-To: bug#7297 <7297@debbugs.gnu.org> Date: Sat, 16 Aug 2025 19:45:20 +0000 retitle 7297 24.0.50; Split byte-recompile-directory into byte-recompile-fi= le reassign 7297 emacs submitter 7297 Julien Danjou severity 7297 wishlist tag 7297 patch thanks From debbugs-submit-bounces@debbugs.gnu.org Thu Oct 28 06:19:52 2010 Received: (at submit) by debbugs.gnu.org; 28 Oct 2010 10:19:52 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PBPaI-0006rC-As for submit@debbugs.gnu.org; Thu, 28 Oct 2010 06:19:51 -0400 Received: from eggs.gnu.org ([140.186.70.92]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PBPaF-0006r7-2n for submit@debbugs.gnu.org; Thu, 28 Oct 2010 06:19:48 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1PBPeD-0006TI-TV for submit@debbugs.gnu.org; Thu, 28 Oct 2010 06:23:56 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=unavailable version=3.3.1 Received: from lists.gnu.org ([199.232.76.165]:39380) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1PBPeD-0006T5-Mm for submit@debbugs.gnu.org; Thu, 28 Oct 2010 06:23:53 -0400 Received: from [140.186.70.92] (port=41047 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1PBPeB-00014w-1l for bug-gnu-emacs@gnu.org; Thu, 28 Oct 2010 06:23:53 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1PBPe7-0006RS-Rz for bug-gnu-emacs@gnu.org; Thu, 28 Oct 2010 06:23:50 -0400 Received: from coquelicot-s.easter-eggs.com ([213.215.37.94]:55063) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1PBPe6-0006Qy-KK for bug-gnu-emacs@gnu.org; Thu, 28 Oct 2010 06:23:47 -0400 Received: from cigue.easter-eggs.fr (cigue.easter-eggs.fr [10.0.0.33]) by rose.easter-eggs.fr (Postfix) with ESMTPS id EE9121409D for ; Thu, 28 Oct 2010 12:23:42 +0200 (CEST) Received: from jdanjou by cigue.easter-eggs.fr with local (Exim 4.72) (envelope-from ) id 1PBPe4-0005v4-Pf for bug-gnu-emacs@gnu.org; Thu, 28 Oct 2010 12:23:44 +0200 From: Julien Danjou To: bug-gnu-emacs@gnu.org Subject: 24.0.50; Split byte-recompile-directory into byte-recompile-file X-Debbugs-Cc: rfrancoise@debian.org Date: Thu, 28 Oct 2010 12:23:44 +0200 Message-ID: User-Agent: Gnus/5.110011 (No Gnus v0.11) Emacs/24.0.50 (gnu/linux) MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6, seldom 2.4 (older, 4) X-Spam-Score: -4.5 (----) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -5.2 (-----) --=-=-= Content-Type: text/plain The following set of patches has already been sent to emacs-devel, but since nobody has time to review them I opening a bug report to keep track of their inclusion. The purpose is to have a `byte-recompile-file' function, and patch 2 to 4 makes use of it in several places. --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=1.diff >From nobody Thu Oct 28 12:22:09 2010 Return-Path: Delivered-To: jd@danjou.info Received: by mx1.naquadah.org (Postfix, from userid 8) id 28D605C0F7; Tue, 21 Sep 2010 17:54:19 +0200 (CEST) X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on prometheus.naquadah.org X-Spam-Level: X-Spam-Status: No, score=-4.2 required=4.5 tests=BAYES_00,RCVD_IN_DNSWL_MED autolearn=ham version=3.3.1 Received: from lists.gnu.org (lists.gnu.org [199.232.76.165]) (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits)) (No client certificate requested) by mx1.naquadah.org (Postfix) with ESMTPS id CD90B5C0F2 for ; Tue, 21 Sep 2010 17:54:16 +0200 (CEST) Received: from localhost ([127.0.0.1]:45802 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Oy5Ac-0005ms-WF for julien@danjou.info; Tue, 21 Sep 2010 11:54:15 -0400 Received: from [140.186.70.92] (port=43172 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Oy4ja-00019s-Bi for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:20 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Oy4jX-0006bY-St for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:18 -0400 Received: from coquelicot-s.easter-eggs.com ([213.215.37.94]:36407) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Oy4jX-0006Z9-JW for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:15 -0400 Received: from cigue.easter-eggs.fr (cigue.easter-eggs.fr [10.0.0.33]) by rose.easter-eggs.fr (Postfix) with ESMTPS id 1F00614142; Tue, 21 Sep 2010 17:26:09 +0200 (CEST) Received: from jdanjou by cigue.easter-eggs.fr with local (Exim 4.72) (envelope-from ) id 1Oy4jU-0007Qj-K1; Tue, 21 Sep 2010 17:26:12 +0200 From: Julien Danjou To: emacs-devel@gnu.org Date: Tue, 21 Sep 2010 17:26:07 +0200 Message-Id: <1285082770-28535-1-git-send-email-julien@danjou.info> X-Mailer: git-send-email 1.7.1 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) Cc: Julien Danjou Subject: [PATCH 1/4] Split byte-recompile-directory into byte-recompile-file X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-Mailman-Copy: yes Sender: emacs-devel-bounces+julien=danjou.info@gnu.org Errors-To: emacs-devel-bounces+julien=danjou.info@gnu.org Signed-off-by: Julien Danjou --- lisp/ChangeLog | 5 +++ lisp/emacs-lisp/bytecomp.el | 75 +++++++++++++++++++++++++++++++++---------- 2 files changed, 63 insertions(+), 17 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 3111ade..34a1dfd 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-09-21 Julien Danjou + + * emacs-lisp/bytecomp.el (byte-recompile-file): Add this function. + (byte-recompile-directory): Use `byte-recompile-file'. + 2010-09-21 Michael Albinus * net/ange-ftp.el (ange-ftp-skip-msgs): Add "^504 ..." message. diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index aca3a54..e6f55e1 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -37,6 +37,7 @@ ;; ======================================================================== ;; Entry points: ;; byte-recompile-directory, byte-compile-file, +;; byte-recompile-file, ;; batch-byte-compile, batch-byte-recompile-directory, ;; byte-compile, compile-defun, ;; display-call-tree @@ -1551,23 +1552,10 @@ that already has a `.elc' file." (not (auto-save-file-name-p bytecomp-source)) (not (string-equal dir-locals-file (file-name-nondirectory - bytecomp-source))) - (setq bytecomp-dest - (byte-compile-dest-file bytecomp-source)) - (if (file-exists-p bytecomp-dest) - ;; File was already compiled. - (or bytecomp-force - (file-newer-than-file-p bytecomp-source - bytecomp-dest)) - ;; No compiled file exists yet. - (and bytecomp-arg - (or (eq 0 bytecomp-arg) - (y-or-n-p (concat "Compile " - bytecomp-source "? ")))))) - (progn (if (and noninteractive (not byte-compile-verbose)) - (message "Compiling %s..." bytecomp-source)) - (let ((bytecomp-res (byte-compile-file - bytecomp-source))) + bytecomp-source)))) + (progn (let ((bytecomp-res (byte-recompile-file + bytecomp-source + bytecomp-force bytecomp-arg))) (cond ((eq bytecomp-res 'no-byte-compile) (setq skip-count (1+ skip-count))) ((eq bytecomp-res t) @@ -1595,6 +1583,59 @@ This is normally set in local file variables at the end of the elisp file: ;; Local Variables:\n;; no-byte-compile: t\n;; End: ") ;;;###autoload(put 'no-byte-compile 'safe-local-variable 'booleanp) +(defun byte-recompile-file (bytecomp-filename &optional bytecomp-force bytecomp-arg load) + "Recompile BYTECOMP-FILENAME file if it needs recompilation. +This happens when its `.elc' file is older than itself. + +If the `.elc' file exists and is up-to-date, normally this +function *does not* compile BYTECOMP-FILENAME. However, if the +prefix argument BYTECOMP-FORCE is set, that means do compile +BYTECOMP-FILENAME even if the destination already exists and is +up-to-date. + +If the `.elc' file does not exist, normally this function *does +not* compile BYTECOMP-FILENAME. If BYTECOMP-ARG is 0, that means +compile the file even if it has never been compiled before. +A nonzero BYTECOMP-ARG means ask the user. + +If LOAD is set, `load' the file after compiling. + +The value returned is the value returned by `byte-compile-file', +or 'no-byte-compile if the file did not need recompilation." + (interactive + (let ((bytecomp-file buffer-file-name) + (bytecomp-file-name nil) + (bytecomp-file-dir nil)) + (and bytecomp-file + (eq (cdr (assq 'major-mode (buffer-local-variables))) + 'emacs-lisp-mode) + (setq bytecomp-file-name (file-name-nondirectory bytecomp-file) + bytecomp-file-dir (file-name-directory bytecomp-file))) + (list (read-file-name (if current-prefix-arg + "Byte compile file: " + "Byte recompile file: ") + bytecomp-file-dir bytecomp-file-name nil) + current-prefix-arg))) + (let ((bytecomp-dest + (byte-compile-dest-file bytecomp-filename)) + ;; Expand now so we get the current buffer's defaults + (bytecomp-filename (expand-file-name bytecomp-filename))) + (if (if (file-exists-p bytecomp-dest) + ;; File was already compiled + ;; Compile if forced to, or filename newer + (or bytecomp-force + (file-newer-than-file-p bytecomp-filename + bytecomp-dest)) + (or (eq 0 bytecomp-arg) + (y-or-n-p (concat "Compile " + bytecomp-filename "? ")))) + (progn + (if (and noninteractive (not byte-compile-verbose)) + (message "Compiling %s..." bytecomp-source)) + (byte-compile-file bytecomp-filename load)) + (when load (load bytecomp-filename)) + 'no-byte-compile))) + ;;;###autoload (defun byte-compile-file (bytecomp-filename &optional load) "Compile a file of Lisp code named BYTECOMP-FILENAME into a file of byte code. -- 1.7.1 --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=2.diff >From nobody Thu Oct 28 12:22:14 2010 Return-Path: Delivered-To: jd@danjou.info Received: by mx1.naquadah.org (Postfix, from userid 8) id 459015C0F7; Tue, 21 Sep 2010 18:16:23 +0200 (CEST) X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on prometheus.naquadah.org X-Spam-Level: X-Spam-Status: No, score=-4.2 required=4.5 tests=BAYES_00,RCVD_IN_DNSWL_MED autolearn=ham version=3.3.1 Received: from lists.gnu.org (lists.gnu.org [199.232.76.165]) (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits)) (No client certificate requested) by mx1.naquadah.org (Postfix) with ESMTPS id 2AC455C0E7 for ; Tue, 21 Sep 2010 18:16:21 +0200 (CEST) Received: from localhost ([127.0.0.1]:49303 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Oy5W0-0000GL-0k for julien@danjou.info; Tue, 21 Sep 2010 12:16:20 -0400 Received: from [140.186.70.92] (port=43156 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Oy4jZ-00019U-Q7 for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:20 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Oy4jX-0006bF-Ov for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:17 -0400 Received: from coquelicot-s.easter-eggs.com ([213.215.37.94]:36404) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Oy4jX-0006Z6-JY for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:15 -0400 Received: from cigue.easter-eggs.fr (cigue.easter-eggs.fr [10.0.0.33]) by rose.easter-eggs.fr (Postfix) with ESMTPS id 2EB7314171; Tue, 21 Sep 2010 17:26:09 +0200 (CEST) Received: from jdanjou by cigue.easter-eggs.fr with local (Exim 4.72) (envelope-from ) id 1Oy4jU-0007Ql-L5; Tue, 21 Sep 2010 17:26:12 +0200 From: Julien Danjou To: emacs-devel@gnu.org Date: Tue, 21 Sep 2010 17:26:08 +0200 Message-Id: <1285082770-28535-2-git-send-email-julien@danjou.info> X-Mailer: git-send-email 1.7.1 In-Reply-To: <1285082770-28535-1-git-send-email-julien@danjou.info> References: <1285082770-28535-1-git-send-email-julien@danjou.info> X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) Cc: Julien Danjou Subject: [PATCH 2/4] Use byte-recompile-file in emacs-lisp-byte-compile-and-load X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-Mailman-Copy: yes Sender: emacs-devel-bounces+julien=danjou.info@gnu.org Errors-To: emacs-devel-bounces+julien=danjou.info@gnu.org Signed-off-by: Julien Danjou --- lisp/ChangeLog | 3 +++ lisp/emacs-lisp/lisp-mode.el | 5 +---- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 34a1dfd..175286b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2010-09-21 Julien Danjou + * emacs-lisp/lisp-mode.el (emacs-lisp-byte-compile-and-load): Use + `byte-recompile-file'. + * emacs-lisp/bytecomp.el (byte-recompile-file): Add this function. (byte-recompile-directory): Use `byte-recompile-file'. diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index e4330e4..ef639d6 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -407,10 +407,7 @@ All commands in `lisp-mode-shared-map' are inherited by this map.") (if (and (buffer-modified-p) (y-or-n-p (format "Save buffer %s first? " (buffer-name)))) (save-buffer)) - (let ((compiled-file-name (byte-compile-dest-file buffer-file-name))) - (if (file-newer-than-file-p compiled-file-name buffer-file-name) - (load-file compiled-file-name) - (byte-compile-file buffer-file-name t)))) + (byte-recompile-file buffer-file-name nil 0 t)) (defcustom emacs-lisp-mode-hook nil "Hook run when entering Emacs Lisp mode." -- 1.7.1 --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=3.diff >From nobody Thu Oct 28 12:22:24 2010 Return-Path: Delivered-To: jd@danjou.info Received: by mx1.naquadah.org (Postfix, from userid 8) id 5D7F35C0F5; Tue, 21 Sep 2010 17:30:37 +0200 (CEST) X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on prometheus.naquadah.org X-Spam-Level: X-Spam-Status: No, score=-4.2 required=4.5 tests=BAYES_00,RCVD_IN_DNSWL_MED autolearn=ham version=3.3.1 Received: from lists.gnu.org (lists.gnu.org [199.232.76.165]) (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits)) (No client certificate requested) by mx1.naquadah.org (Postfix) with ESMTPS id 3441F5C0EA for ; Tue, 21 Sep 2010 17:30:35 +0200 (CEST) Received: from localhost ([127.0.0.1]:49308 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Oy4nh-00025y-OL for julien@danjou.info; Tue, 21 Sep 2010 11:30:33 -0400 Received: from [140.186.70.92] (port=43158 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Oy4jZ-00019X-QX for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:20 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Oy4jX-0006bR-QG for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:17 -0400 Received: from coquelicot-s.easter-eggs.com ([213.215.37.94]:36406) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Oy4jX-0006Z8-JZ for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:15 -0400 Received: from cigue.easter-eggs.fr (cigue.easter-eggs.fr [10.0.0.33]) by rose.easter-eggs.fr (Postfix) with ESMTPS id 320A614172; Tue, 21 Sep 2010 17:26:09 +0200 (CEST) Received: from jdanjou by cigue.easter-eggs.fr with local (Exim 4.72) (envelope-from ) id 1Oy4jU-0007Qo-Li; Tue, 21 Sep 2010 17:26:12 +0200 From: Julien Danjou To: emacs-devel@gnu.org Date: Tue, 21 Sep 2010 17:26:09 +0200 Message-Id: <1285082770-28535-3-git-send-email-julien@danjou.info> X-Mailer: git-send-email 1.7.1 In-Reply-To: <1285082770-28535-1-git-send-email-julien@danjou.info> References: <1285082770-28535-1-git-send-email-julien@danjou.info> X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) Cc: Julien Danjou Subject: [PATCH 3/4] Use byte-recompile-file in cedet/project-compile-target X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-Mailman-Copy: yes Sender: emacs-devel-bounces+julien=danjou.info@gnu.org Errors-To: emacs-devel-bounces+julien=danjou.info@gnu.org Signed-off-by: Julien Danjou --- lisp/ChangeLog | 2 ++ lisp/cedet/semantic/ede-grammar.el | 5 +---- 2 files changed, 3 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 175286b..4f0aaac 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2010-09-21 Julien Danjou + * cedet/semantic/ede-grammar.el: Use `byte-recompile-file'. + * emacs-lisp/lisp-mode.el (emacs-lisp-byte-compile-and-load): Use `byte-recompile-file'. diff --git a/lisp/cedet/semantic/ede-grammar.el b/lisp/cedet/semantic/ede-grammar.el index 184e23c..ac99588 100644 --- a/lisp/cedet/semantic/ede-grammar.el +++ b/lisp/cedet/semantic/ede-grammar.el @@ -133,10 +133,7 @@ Lays claim to all -by.el, and -wy.el files." (save-excursion (semantic-grammar-create-package)) (save-buffer) - (let ((cf (concat (semantic-grammar-package) ".el"))) - (if (or (not (file-exists-p cf)) - (file-newer-than-file-p src cf)) - (byte-compile-file cf))))) + (byte-recompile-file (concat (semantic-grammar-package) ".el") nil 0)) (oref obj source))) (message "All Semantic Grammar sources are up to date in %s" (object-name obj))) -- 1.7.1 --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=4.diff >From nobody Thu Oct 28 12:22:27 2010 Return-Path: Delivered-To: jd@danjou.info Received: by mx1.naquadah.org (Postfix, from userid 8) id 5417C5C0F6; Tue, 21 Sep 2010 17:56:25 +0200 (CEST) X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on prometheus.naquadah.org X-Spam-Level: X-Spam-Status: No, score=-4.2 required=4.5 tests=BAYES_00,RCVD_IN_DNSWL_MED autolearn=ham version=3.3.1 Received: from lists.gnu.org (lists.gnu.org [199.232.76.165]) (using TLSv1 with cipher DHE-RSA-AES256-SHA (256/256 bits)) (No client certificate requested) by mx1.naquadah.org (Postfix) with ESMTPS id 335575C0F2 for ; Tue, 21 Sep 2010 17:56:23 +0200 (CEST) Received: from localhost ([127.0.0.1]:40222 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Oy5Cf-0006m3-EW for julien@danjou.info; Tue, 21 Sep 2010 11:56:21 -0400 Received: from [140.186.70.92] (port=43154 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Oy4jZ-00019P-NL for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:24 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1Oy4jX-0006bM-QI for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:17 -0400 Received: from coquelicot-s.easter-eggs.com ([213.215.37.94]:36405) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1Oy4jX-0006Z7-Ja for emacs-devel@gnu.org; Tue, 21 Sep 2010 11:26:15 -0400 Received: from cigue.easter-eggs.fr (cigue.easter-eggs.fr [10.0.0.33]) by rose.easter-eggs.fr (Postfix) with ESMTPS id 38C341427B; Tue, 21 Sep 2010 17:26:09 +0200 (CEST) Received: from jdanjou by cigue.easter-eggs.fr with local (Exim 4.72) (envelope-from ) id 1Oy4jU-0007Qr-MN; Tue, 21 Sep 2010 17:26:12 +0200 From: Julien Danjou To: emacs-devel@gnu.org Date: Tue, 21 Sep 2010 17:26:10 +0200 Message-Id: <1285082770-28535-4-git-send-email-julien@danjou.info> X-Mailer: git-send-email 1.7.1 In-Reply-To: <1285082770-28535-1-git-send-email-julien@danjou.info> References: <1285082770-28535-1-git-send-email-julien@danjou.info> X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) Cc: Julien Danjou Subject: [PATCH 4/4] (project-compile-target) use byte-recompile-file X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-Mailman-Copy: yes Sender: emacs-devel-bounces+julien=danjou.info@gnu.org Errors-To: emacs-devel-bounces+julien=danjou.info@gnu.org Signed-off-by: Julien Danjou --- lisp/ChangeLog | 3 +++ lisp/cedet/ede/proj-elisp.el | 7 ++----- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4f0aaac..d96fafc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2010-09-21 Julien Danjou + * cedet/ede/proj-elisp.el (project-compile-target): Use + `byte-recompile-file'. + * cedet/semantic/ede-grammar.el: Use `byte-recompile-file'. * emacs-lisp/lisp-mode.el (emacs-lisp-byte-compile-and-load): Use diff --git a/lisp/cedet/ede/proj-elisp.el b/lisp/cedet/ede/proj-elisp.el index ecdefb2..21322df 100644 --- a/lisp/cedet/ede/proj-elisp.el +++ b/lisp/cedet/ede/proj-elisp.el @@ -131,11 +131,8 @@ Bonus: Return a cons cell: (COMPILED . UPTODATE)." (let* ((fsrc (expand-file-name src dir)) (elc (concat (file-name-sans-extension fsrc) ".elc")) ) - (if (or (not (file-exists-p elc)) - (file-newer-than-file-p fsrc elc)) - (progn - (setq comp (1+ comp)) - (byte-compile-file fsrc)) + (if (eq (byte-recompile-file fsrc nil 0)) t) + (setq comp (1+ comp)) (setq utd (1+ utd))))) (oref obj source)) (message "All Emacs Lisp sources are up to date in %s" (object-name obj)) -- 1.7.1 --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable --=20 Julien Danjou // =E1=90=B0 http://julien.danjou.info --=-=-=-- From debbugs-submit-bounces@debbugs.gnu.org Sun Oct 31 16:33:05 2010 Received: (at 7297-done) by debbugs.gnu.org; 31 Oct 2010 20:33:05 +0000 Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PCeaO-0003q9-E3 for submit@debbugs.gnu.org; Sun, 31 Oct 2010 16:33:05 -0400 Received: from ironport2-out.teksavvy.com ([206.248.154.183] helo=ironport2-out.pppoe.ca) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1PCdTy-0003NP-NS for 7297-done@debbugs.gnu.org; Sun, 31 Oct 2010 15:22:23 -0400 X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: AskIADZgzUxFpYZA/2dsb2JhbACgSX1yuUGFRASSKw X-IronPort-AV: E=Sophos;i="4.58,268,1286164800"; d="scan'208";a="81203870" Received: from 69-165-134-64.dsl.teksavvy.com (HELO pastel.home) ([69.165.134.64]) by ironport2-out.pppoe.ca with ESMTP/TLS/ADH-AES256-SHA; 31 Oct 2010 15:26:36 -0400 Received: by pastel.home (Postfix, from userid 20848) id 832D8A8621; Sun, 31 Oct 2010 15:26:36 -0400 (EDT) From: Stefan Monnier To: Julien Danjou Subject: Re: bug#7297: 24.0.50; Split byte-recompile-directory into byte-recompile-file Message-ID: References: Date: Sun, 31 Oct 2010 15:26:36 -0400 In-Reply-To: (Julien Danjou's message of "Thu, 28 Oct 2010 12:23:44 +0200") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-Spam-Score: -2.1 (--) X-Debbugs-Envelope-To: 7297-done X-Mailman-Approved-At: Sun, 31 Oct 2010 16:33:02 -0400 Cc: rfrancoise@debian.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: debbugs-submit-bounces@debbugs.gnu.org Errors-To: debbugs-submit-bounces@debbugs.gnu.org X-Spam-Score: -2.1 (--) > The following set of patches has already been sent to emacs-devel, but > since nobody has time to review them I opening a bug report to keep > track of their inclusion. Thanks, installed in trunk. Stefan From unknown Sat Aug 16 12:45:20 2025 Received: (at fakecontrol) by fakecontrolmessage; To: internal_control@debbugs.gnu.org From: Debbugs Internal Request Subject: Internal Control Message-Id: bug archived. Date: Mon, 29 Nov 2010 12:24:04 +0000 User-Agent: Fakemail v42.6.9 # This is a fake control message. # # The action: # bug archived. thanks # This fakemail brought to you by your local debbugs # administrator