From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Stefan Monnier Newsgroups: gmane.emacs.bugs Subject: bug#11391: wrong-type-argument error in vc-bzr operations Date: Wed, 02 May 2012 22:42:48 -0400 Message-ID: References: NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Trace: dough.gmane.org 1336043746 24350 80.91.229.3 (3 May 2012 11:15:46 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Thu, 3 May 2012 11:15:46 +0000 (UTC) Cc: 11391-done@debbugs.gnu.org To: Juanma Barranquero Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Thu May 03 13:15:45 2012 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 1SPu0X-0003KK-He for geb-bug-gnu-emacs@m.gmane.org; Thu, 03 May 2012 13:15:37 +0200 Original-Received: from localhost ([::1]:42040 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1SPu0W-0006RG-Rl for geb-bug-gnu-emacs@m.gmane.org; Thu, 03 May 2012 07:15:36 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:38195) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1SPu0S-0006R2-Mo for bug-gnu-emacs@gnu.org; Thu, 03 May 2012 07:15:34 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1SPu0L-0001IH-MX for bug-gnu-emacs@gnu.org; Thu, 03 May 2012 07:15:32 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:33547) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1SPu0L-0001IA-Ip for bug-gnu-emacs@gnu.org; Thu, 03 May 2012 07:15:25 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.72) (envelope-from ) id 1SPu1u-0002lM-Ir for bug-gnu-emacs@gnu.org; Thu, 03 May 2012 07:17:02 -0400 Resent-From: Stefan Monnier Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-To: bug-gnu-emacs@gnu.org Resent-Date: Thu, 03 May 2012 11:17:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: cc-closed 11391 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Mail-Followup-To: 11391@debbugs.gnu.org, monnier@IRO.UMontreal.CA Original-Received: via spool by 11391-done@debbugs.gnu.org id=D11391.133604380010583 (code D ref 11391); Thu, 03 May 2012 11:17:01 +0000 Original-Received: (at 11391-done) by debbugs.gnu.org; 3 May 2012 11:16:40 +0000 Original-Received: from localhost ([127.0.0.1]:34579 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1SPu1X-0002kd-Ib for submit@debbugs.gnu.org; Thu, 03 May 2012 07:16:40 -0400 Original-Received: from harpie.cc.umontreal.ca ([132.204.2.134]:56646) by debbugs.gnu.org with esmtp (Exim 4.72) (envelope-from ) id 1SPu1V-0002kW-7y for 11391-done@debbugs.gnu.org; Thu, 03 May 2012 07:16:38 -0400 Original-Received: from fmsmemgm.homelinux.net (lechon.iro.umontreal.ca [132.204.27.242]) by chene.dit.umontreal.ca (8.14.1/8.14.1) with ESMTP id q432gmFN014230; Wed, 2 May 2012 22:42:50 -0400 Original-Received: by fmsmemgm.homelinux.net (Postfix, from userid 20848) id 976A8AE088; Wed, 2 May 2012 22:42:48 -0400 (EDT) In-Reply-To: (Juanma Barranquero's message of "Wed, 2 May 2012 01:28:10 +0200") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.1.50 (gnu/linux) X-NAI-Spam-Flag: NO X-NAI-Spam-Threshold: 5 X-NAI-Spam-Score: 0 X-NAI-Spam-Rules: 1 Rules triggered RV4210=0 X-NAI-Spam-Version: 2.2.0.9309 : core <4210> : streams <752328> : uri <1106622> X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.13 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Received-From: 140.186.70.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:59723 Archived-At: > Debugger entered--Lisp error: (wrong-type-argument sequencep lambda) > #[(s) "..." [s 20 0 2 "..."] 3](lambda) > (etc) Good catch, thank you. I've installed the patch below which should fix it, Stefan =3D=3D=3D modified file 'lisp/ChangeLog' --- lisp/ChangeLog 2012-04-29 01:48:23 +0000 +++ lisp/ChangeLog 2012-05-03 02:37:04 +0000 @@ -1,3 +1,11 @@ +2012-05-03 Stefan Monnier + + * emacs-lisp/bytecomp.el + (byte-compile-file-form-custom-declare-variable): Compile all elements, + since cconv.el might have introduced :fun-body, internal-make-closure, + and friends for bytecomp to handle (bug#11391). + * custom.el (defcustom): Avoid ((=CE=BB ..) ..). + 2012-04-29 Chong Yidong =20 * follow.el (follow-calc-win-end): Rewrite to handle partial =3D=3D=3D modified file 'lisp/custom.el' --- lisp/custom.el 2012-04-14 01:46:06 +0000 +++ lisp/custom.el 2012-05-03 02:12:56 +0000 @@ -335,7 +335,7 @@ ;; expression is checked by the byte-compiler, and that ;; lexical-binding is obeyed, so quote the expression with ;; `lambda' rather than with `quote'. - `(list (lambda () ,standard)) + ``(funcall #',(lambda () ,standard)) `',standard) ,doc ,@args)) =3D=3D=3D modified file 'lisp/emacs-lisp/bytecomp.el' --- lisp/emacs-lisp/bytecomp.el 2012-03-26 19:10:00 +0000 +++ lisp/emacs-lisp/bytecomp.el 2012-05-03 02:28:14 +0000 @@ -2267,19 +2267,7 @@ (when (byte-compile-warning-enabled-p 'callargs) (byte-compile-nogroup-warn form)) (push (nth 1 (nth 1 form)) byte-compile-bound-variables) - ;; Don't compile the expression because it may be displayed to the user. - ;; (when (eq (car-safe (nth 2 form)) 'quote) - ;; ;; (nth 2 form) is meant to evaluate to an expression, so if we hav= e the - ;; ;; final value already, we can byte-compile it. - ;; (setcar (cdr (nth 2 form)) - ;; (byte-compile-top-level (cadr (nth 2 form)) nil 'file))) - (let ((tail (nthcdr 4 form))) - (while tail - (unless (keywordp (car tail)) ;No point optimizing keywords. - ;; Compile the keyword arguments. - (setcar tail (byte-compile-top-level (car tail) nil 'file))) - (setq tail (cdr tail)))) - form) + (byte-compile-keep-pending form)) =20 (put 'require 'byte-hunk-handler 'byte-compile-file-form-require) (defun byte-compile-file-form-require (form)