From: YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
To: Glenn Morris <rgm@gnu.org>
Cc: Stephen Berman <stephen.berman@gmx.net>, 5749@debbugs.gnu.org
Subject: bug#5749: 24.0.50; Gomoku startup latency
Date: Wed, 24 Mar 2010 12:27:03 +0900 [thread overview]
Message-ID: <wlljdiv1q0.wl%mituharu@math.s.chiba-u.ac.jp> (raw)
In-Reply-To: <9rmxxy32sj.fsf@fencepost.gnu.org>
>>>>> On Tue, 23 Mar 2010 21:51:24 -0400, Glenn Morris <rgm@gnu.org> said:
> Stephen Berman wrote:
>> 1. Let ~/.emacs consist of this sexp:
>> (setq initial-frame-alist '((fullscreen . fullheight)))
>> 2. Start Emacs with the above init file.
>> 3. M-x gomoku
>> => There is a noticeable delay loading the game -- on my system 3-4
>> seconds.
> This is interesting. Emacs 23.1 is almost instantaneous, but 23.1.94
> is very slow, and also starts using a huge amount of memory (1GB+ for me).
> Loading gomoku.el from 23.1 in 23.1.94 makes no difference.
This is due to a behavioral change of `append-to-buffer', which used
to preserve the point when the first argument coincides with the
current buffer. The following patch would work for this case.
Maybe other occurrences of `(append-to-buffer (current-buffer) ...)'
should also be checked if they work as intended.
YAMAMOTO Mitsuharu
mituharu@math.s.chiba-u.ac.jp
=== modified file 'lisp/play/gomoku.el'
*** lisp/play/gomoku.el 2010-01-13 08:35:10 +0000
--- lisp/play/gomoku.el 2010-03-24 03:04:35 +0000
***************
*** 1040,1046 ****
(= i (- m 2))
(progn
(while (>= i 3)
! (append-to-buffer (current-buffer) opoint (point))
(setq i (- i 2)))
(goto-char (point-max))))
(setq point (point))
--- 1040,1046 ----
(= i (- m 2))
(progn
(while (>= i 3)
! (prepend-to-buffer (current-buffer) opoint (point))
(setq i (- i 2)))
(goto-char (point-max))))
(setq point (point))
next prev parent reply other threads:[~2010-03-24 3:27 UTC|newest]
Thread overview: 14+ messages / expand[flat|nested] mbox.gz Atom feed top
2010-03-19 22:50 bug#5749: 24.0.50; Gomoku startup latency Stephen Berman
2010-03-24 1:51 ` Glenn Morris
2010-03-24 3:15 ` Stefan Monnier
2010-03-24 3:27 ` YAMAMOTO Mitsuharu [this message]
2010-03-24 4:03 ` Glenn Morris
2010-03-24 15:28 ` Chong Yidong
2010-03-24 17:27 ` Stefan Monnier
2010-03-24 20:19 ` Chong Yidong
2010-03-24 23:44 ` YAMAMOTO Mitsuharu
2010-03-24 9:14 ` Stephen Berman
2010-03-24 16:18 ` Chong Yidong
2010-03-24 19:05 ` Stephen Berman
2010-03-25 4:08 ` YAMAMOTO Mitsuharu
2010-03-25 5:54 ` Chong Yidong
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
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=wlljdiv1q0.wl%mituharu@math.s.chiba-u.ac.jp \
--to=mituharu@math.s.chiba-u.ac.jp \
--cc=5749@debbugs.gnu.org \
--cc=rgm@gnu.org \
--cc=stephen.berman@gmx.net \
/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 external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.