From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Lars Ingebrigtsen Newsgroups: gmane.emacs.bugs Subject: bug#18522: 24.4.50; mapcar is very slow Date: Mon, 29 Feb 2016 13:21:50 +1100 Message-ID: <87io1845oh.fsf@gnus.org> References: <8738bkdjqg.fsf@micropit.roche-blanche.homenet.org> <83h9h0jwfo.fsf@gnu.org> <87mvqru119.fsf@roche-blanche.net> <8360xfjsyr.fsf@gnu.org> <878u2bs7tl.fsf@roche-blanche.net> <83r3g3iajr.fsf@gnu.org> <87twkypfqx.fsf@roche-blanche.net> <83vb5egg8y.fsf@gnu.org> <87fuwikmzc.fsf@roche-blanche.net> <83io1ege6r.fsf@gnu.org> <87y4a9kh9e.fsf@roche-blanche.net> <87vb5dvf6c.fsf@gnus.org> <8760xdi54j.fsf@roche-blanche.net> <83vb5cg4r6.fsf@gnu.org> <87wppspsnh.fsf@roche-blanche.net> <8337sgfy08.fsf@gnu.org> <87wpprn34n.fsf@roche-blanche.net> <8360xbenbm.fsf@gnu.org> <87si0fln5a.fsf@roche-blanche.net> <87d1rhxyoc.fsf@gnus.org> <8737sduukz.fsf@roche-blanche.net> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: quoted-printable X-Trace: ger.gmane.org 1456712607 24474 80.91.229.3 (29 Feb 2016 02:23:27 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Mon, 29 Feb 2016 02:23:27 +0000 (UTC) Cc: 18522@debbugs.gnu.org To: Peter =?UTF-8?Q?M=C3=BCnster?= Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Mon Feb 29 03:23:11 2016 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1aaDUM-0005AQ-Nw for geb-bug-gnu-emacs@m.gmane.org; Mon, 29 Feb 2016 03:23:10 +0100 Original-Received: from localhost ([::1]:33515 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aaDUL-0004ai-Qp for geb-bug-gnu-emacs@m.gmane.org; Sun, 28 Feb 2016 21:23:09 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:58534) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aaDUI-0004Zg-4M for bug-gnu-emacs@gnu.org; Sun, 28 Feb 2016 21:23:06 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1aaDUE-0004On-Ui for bug-gnu-emacs@gnu.org; Sun, 28 Feb 2016 21:23:06 -0500 Original-Received: from debbugs.gnu.org ([208.118.235.43]:53999) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aaDUE-0004Oj-R3 for bug-gnu-emacs@gnu.org; Sun, 28 Feb 2016 21:23:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84) (envelope-from ) id 1aaDUE-0006EQ-GW; Sun, 28 Feb 2016 21:23:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Lars Ingebrigtsen Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org, bugs@gnus.org Resent-Date: Mon, 29 Feb 2016 02:23:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 18522 X-GNU-PR-Package: emacs,gnus X-GNU-PR-Keywords: Original-Received: via spool by 18522-submit@debbugs.gnu.org id=B18522.145671254023888 (code B ref 18522); Mon, 29 Feb 2016 02:23:02 +0000 Original-Received: (at 18522) by debbugs.gnu.org; 29 Feb 2016 02:22:20 +0000 Original-Received: from localhost ([127.0.0.1]:51125 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84) (envelope-from ) id 1aaDTY-0006DE-99 for submit@debbugs.gnu.org; Sun, 28 Feb 2016 21:22:20 -0500 Original-Received: from hermes.netfonds.no ([80.91.224.195]:43178) by debbugs.gnu.org with esmtp (Exim 4.84) (envelope-from ) id 1aaDTX-0006D3-L7 for 18522@debbugs.gnu.org; Sun, 28 Feb 2016 21:22:19 -0500 Original-Received: from cpe-60-225-211-161.nsw.bigpond.net.au ([60.225.211.161] helo=mouse) by hermes.netfonds.no with esmtpsa (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.72) (envelope-from ) id 1aaDT9-0007qj-GN; Mon, 29 Feb 2016 03:21:56 +0100 In-Reply-To: <8737sduukz.fsf@roche-blanche.net> ("Peter \=\?iso-8859-1\?Q\?M\?\= \=\?iso-8859-1\?Q\?\=FCnster\=22's\?\= message of "Sun, 28 Feb 2016 09:07:08 +0100") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/25.1.50 (gnu/linux) X-MailScanner-ID: 1aaDT9-0007qj-GN MailScanner-NULL-Check: 1457317317.7455@IH1UU8G6dItXVLoo2MeFmA X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:114059 Archived-At: Peter M=FCnster writes: > And then I have to stop it with C-g because it hangs... Probably a circular list somewhere. Try the following: (let ((table (make-hash-table :test 'eq))) (mapatoms (lambda (symbol) (when (boundp symbol) (let ((value (symbol-value symbol))) (while (and (consp value) (not (gethash value table))) (let ((elem (car value))) (when (bufferp elem) (message "%s has a buffer %s" symbol (buffer-name elem)))) (setf (gethash value table) t) (setq value (cdr value)))))) obarray)) --=20 (domestic pets only, the antidote for overdose, milk.) bloggy blog: http://lars.ingebrigtsen.no