unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
From: Stefan Monnier <monnier@iro.umontreal.ca>
To: Eli Zaretskii <eliz@gnu.org>
Cc: 11657@debbugs.gnu.org
Subject: bug#11657: 24.1.50; Byte compiler is a lot slower now, when run interpreted
Date: Wed, 20 Jun 2012 12:33:06 -0400	[thread overview]
Message-ID: <jwvoboeuep9.fsf-monnier+gnus-read-ephemeral-bug@gnu.org> (raw)
In-Reply-To: <jwvfw9x67cl.fsf-monnier+emacs@gnu.org> (Stefan Monnier's message of "Thu, 14 Jun 2012 15:09:12 -0400")

> I think I see another cause for slowdown: macroexp now ends up preloaded
> in bootstrap-emacs, so byte-compiling it from COMPILE_FIRST is
> ineffective (BTW, we can remove subr.el from makefile-w32.in's
> COMPILE_FIRST, since it's useless there).

Do you still see the much slower compilation with bootstrap-emacs?
I guess you do, if so, please try the patch below and tell me if it
helps,


        Stefan


=== modified file 'lisp/loadup.el'
--- lisp/loadup.el	2012-06-13 13:18:59 +0000
+++ lisp/loadup.el	2012-06-20 16:23:57 +0000
@@ -252,6 +252,20 @@
 ;For other systems, you must edit ../src/Makefile.in.
 (load "site-load" t)
 
+;; src/boostrap-emacs is mostly used to compile .el files, so it needs
+;; macroexp, bytecomp, cconv, and byte-opt to be fast.  Generally this is done
+;; by compiling those files first, but this only makes a difference if those
+;; files are not preloaded.  As it so happens, macroexp.el tends to be
+;; accidentally preloaded in src/boostrap-emacs because cl.el and cl-macs.el
+;; require it.  So lets unload it here, if needed, to make sure the
+;; byte-compiled versions is used.
+(if (or (not (fboundp 'macroexpand-all))
+        (byte-code-function-p (symbol-function 'macroexpand-all)))
+    nil
+  (fmakunbound 'macroexpand-all)
+  (setq features (delq 'macroexp features))
+  (autoload 'macroexpand-all "macroexp"))
+
 ;; Determine which last version number to use
 ;; based on the executables that now exist.
 (if (and (or (equal (nth 3 command-line-args) "dump")









  parent reply	other threads:[~2012-06-20 16:33 UTC|newest]

Thread overview: 18+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2012-06-09 11:30 bug#11657: 24.1.50; Byte compiler is a lot slower now, when run interpreted Eli Zaretskii
2012-06-09 20:07 ` Juanma Barranquero
2012-06-09 23:36   ` Christoph Scholtes
2012-06-10  1:24 ` Stefan Monnier
2012-06-10  3:00   ` Eli Zaretskii
2012-06-10 14:48     ` Stefan Monnier
2012-06-11  1:10       ` Stefan Monnier
2012-06-11 16:53         ` Eli Zaretskii
2012-06-14 19:09           ` Stefan Monnier
2012-06-14 23:56             ` Juanma Barranquero
2012-06-15  1:41               ` Stefan Monnier
2012-06-15  9:27               ` Eli Zaretskii
2012-06-15 19:43                 ` Juanma Barranquero
2012-06-15 20:04                   ` Eli Zaretskii
2012-06-20 16:33             ` Stefan Monnier [this message]
2012-06-20 23:02               ` Juanma Barranquero
2012-06-22 18:33               ` Eli Zaretskii
2012-06-25  1:02                 ` Glenn Morris

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=jwvoboeuep9.fsf-monnier+gnus-read-ephemeral-bug@gnu.org \
    --to=monnier@iro.umontreal.ca \
    --cc=11657@debbugs.gnu.org \
    --cc=eliz@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).