GNU bug report logs - #40434
27.0.90; Can't run ERT tests for edebugged generator functions

Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.

Package: emacs; Reported by: Philipp Stephani <p.stephani2@HIDDEN>; Keywords: confirmed; merged with #28725; dated Sat, 4 Apr 2020 16:58:01 UTC; Maintainer for emacs is bug-gnu-emacs@HIDDEN.
Forcibly Merged 28725 40434. Request was from Lars Ingebrigtsen <larsi@HIDDEN> to control <at> debbugs.gnu.org. Full text available.

Message received at 40434 <at> debbugs.gnu.org:


Received: (at 40434) by debbugs.gnu.org; 14 Jun 2020 18:03:30 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sun Jun 14 14:03:30 2020
Received: from localhost ([127.0.0.1]:44464 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1jkWyg-0004r7-9Z
	for submit <at> debbugs.gnu.org; Sun, 14 Jun 2020 14:03:30 -0400
Received: from mail-ua1-f43.google.com ([209.85.222.43]:37410)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <phst@HIDDEN>) id 1jkWye-0004qt-Ov
 for 40434 <at> debbugs.gnu.org; Sun, 14 Jun 2020 14:03:29 -0400
Received: by mail-ua1-f43.google.com with SMTP id v25so4897598uau.4
 for <40434 <at> debbugs.gnu.org>; Sun, 14 Jun 2020 11:03:28 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=google.com; s=20161025;
 h=mime-version:references:in-reply-to:from:date:message-id:subject:to
 :cc; bh=89dSfuehG6q7N+ZJk6+s0zbwwoojyDV9lu0AfqqmdX0=;
 b=JhsG3AIfmJ7e9EqIAEHVY6ORSAOhlCix+5csYMBQEJ23qocO1iXz03+wRjVGHwkObf
 6GmJ8lShHxUZuQoNlh2X2ulqX1og5PEuO5S4PS06YTys2ippXn9dgKPnzpr2zhmRDOPD
 00PQ/Xu7bP9qyNx3LNaD60F7JBKgKz2AOPL/Ax+bI14d05SLIVzsTbC1Z/VjS7fcSERN
 P7gAjbr1SWWpLzzj5eUGDFqQfaN61MUceCzvZ+Ai8GQfTx6LZEuAEVCW+K+xRj3qxa7+
 5iuPSk9WK+Nk7QRYbK6bKNU09xqKwDgyjClfS0rVH+gprxKS6f9/+X1cImsO/0LdW8kE
 DBgw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:mime-version:references:in-reply-to:from:date
 :message-id:subject:to:cc;
 bh=89dSfuehG6q7N+ZJk6+s0zbwwoojyDV9lu0AfqqmdX0=;
 b=CABynDdoS0m+p9YL7Pl7A0OvtXs+pFV1K10RTpW9//xCZui+Q7C27sC7k9tOYzmW6G
 TZBRu0cAWeMn+L8nxDqHF+vqNZQpu0ZjSi99E9J65nKj6SQniWyRRQ5zgLYo4zI7EFqM
 jGrCUh1eyzD4Jz+JMPfcFo5t/v3a5RiA6WUeAawPql/daL+P5D1ekRAyiidEXwMcb/l2
 ClnABxVebdG3UTF/RRSbiFox9abBcxEA2W8EogqloDLaG9mm5J3nY1gs5fSymgc3lxdD
 fUoODFnMh9LA2E0juYHxNrGJMKt4U5/BhRfkLhjwOE58ybkx4Y6tLMkpSQvd+u8Enj2G
 +T0w==
X-Gm-Message-State: AOAM532OxQjIa4B0m8R/rvAysz5dBXKoUYrwjvaZUeDAhMi1NVXT5JKz
 t/Uilp3uiU4nk4Qi8/LViGBuu7wcj7F9nJNF+SLDfg==
X-Google-Smtp-Source: ABdhPJzJiXBApxgQuynJRvMisiMY5SfINwv7JNMWP7xfRM8/XVDu5Y1id4ZRFj59gVW8Zg3poWDdelOtyT/uxRpHoE8=
X-Received: by 2002:a9f:236e:: with SMTP id 101mr16293570uae.103.1592157802657; 
 Sun, 14 Jun 2020 11:03:22 -0700 (PDT)
MIME-Version: 1.0
References: <CAArVCkS3QtFS+WoQUSssHw35fwXuchb_gr1XQUPpaC28n65tHA@HIDDEN>
 <20200610170419.28506-1-phst@HIDDEN>
In-Reply-To: <20200610170419.28506-1-phst@HIDDEN>
From: Philipp Stephani <phst@HIDDEN>
Date: Sun, 14 Jun 2020 20:03:11 +0200
Message-ID: <CAP-RRPsnkUZCJ5xs+xwsjHU96XdpHT-VZVZ2N2OwvjwBkVr-EA@HIDDEN>
Subject: Re: [PATCH] Band-aid for edebugging generator bodies (Bug#40434).
To: Philipp Stephani <p.stephani2@HIDDEN>
Content-Type: text/plain; charset="UTF-8"
X-Spam-Score: -8.0 (--------)
X-Debbugs-Envelope-To: 40434
Cc: 40434 <at> debbugs.gnu.org
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -9.0 (---------)

Am Mi., 10. Juni 2020 um 19:04 Uhr schrieb Philipp Stephani
<p.stephani2@HIDDEN>:
>
> Edebug doesn't support them well.  Rather than trying to fix Edebug,
> disable instrumentation for now to prevent annoying bugs.

Pushed as commit e96f78fca6. I'll leave the bug open for now to track
improvements for edebug support for generators.




Information forwarded to bug-gnu-emacs@HIDDEN:
bug#40434; Package emacs. Full text available.

Message received at 40434 <at> debbugs.gnu.org:


Received: (at 40434) by debbugs.gnu.org; 10 Jun 2020 17:04:35 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Wed Jun 10 13:04:35 2020
Received: from localhost ([127.0.0.1]:35242 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1jj49T-0005xc-Ff
	for submit <at> debbugs.gnu.org; Wed, 10 Jun 2020 13:04:35 -0400
Received: from mail-ed1-f42.google.com ([209.85.208.42]:35482)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <p.stephani2@HIDDEN>) id 1jj49R-0005xP-AU
 for 40434 <at> debbugs.gnu.org; Wed, 10 Jun 2020 13:04:33 -0400
Received: by mail-ed1-f42.google.com with SMTP id e12so1936504eds.2
 for <40434 <at> debbugs.gnu.org>; Wed, 10 Jun 2020 10:04:33 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025;
 h=from:to:cc:subject:date:message-id:in-reply-to:references
 :mime-version:content-transfer-encoding;
 bh=2i1gyAxXaBAng/LzyVVri/q5wcwTg+7mOmOW8qqzrDo=;
 b=H6FxhkgD2fPfagQHHpENGebUNjjesZkXZPil2wZTrpNAx5WjZhiR6XA4VwuJXS9pDC
 4smt7Eu3jn8+WvyClHXVNi0Di+FBlzygbG7sRB4/spEGNWY0rJkAy1F/rp9EMQ7F2A5N
 Rpu6Gh3pUCxnz9EzNi8g2CbaFnbIFEZ/SHv8Imvra9vtT9q3pXSFl0mNLTK0yGnrXxz1
 RNvY9LtRG3nBVg9Ae4gtgCtQ1pPCoor2m3hUD+h6iiT12Laa6l3BPzuKXcH5JuEQEaUH
 NcXa5PqrupuiJmVNLpTR4V8nIWpCPzhMDSiN/wlzFLHXxD6+J1G0MjC8zQVn3cRrv3Xy
 8jZg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:cc:subject:date:message-id:in-reply-to
 :references:mime-version:content-transfer-encoding;
 bh=2i1gyAxXaBAng/LzyVVri/q5wcwTg+7mOmOW8qqzrDo=;
 b=gMYz+M84pN+5FeW9IMVxCZZWKLD6DCPIp+cIiOrr9dwB2Z+TDpLUPdIuDCWIx05OPi
 +9waiO0PAnHcosHmRuP+GyI2zIzoASeLUFNPdZ1LpLMXOwFnaBzdet/DeRsIC5BIiBjs
 Ld5coCBVHyvPAGA1uv2SqZ1nZO8LGD5GKModK1xeNFeXQFEQjITikhabTLOYx3UnRSbO
 NbG4R41f/sF8zjAJTyNHVe5Zt2ARSVCsjjFqJgZ9hV2nCcUNChzcwhCUzPQS4+uRXlyL
 TrUL8zZTKq/4Qkw/5XC/FCC4p+eNsaCZqLNQBR9u+FeV2DyXhU/jqWEImQpNbOjJSGMt
 ugPA==
X-Gm-Message-State: AOAM532iWoicH58kjkhjRF9OLByHMtfukF8IWKH4p4WZURUDseifosKZ
 jjJfZ3Z8D63lvMBF1w4YeiyMigVmKuY=
X-Google-Smtp-Source: ABdhPJzRu6rQuPnWIH6eGNW+kfe5wtH9rdBeTi4hMaPWtayvjwUi5ACYXGDvq6Z3QJube5fBEg1pZw==
X-Received: by 2002:a50:b5a6:: with SMTP id a35mr3412490ede.197.1591808667076; 
 Wed, 10 Jun 2020 10:04:27 -0700 (PDT)
Received: from phst1.cm.cablesurf.de ([2a02:2455:2a2:100:c351:ffcc:5d8e:4288])
 by smtp.gmail.com with ESMTPSA id
 o13sm257634ejb.46.2020.06.10.10.04.26
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Wed, 10 Jun 2020 10:04:26 -0700 (PDT)
From: Philipp Stephani <p.stephani2@HIDDEN>
X-Google-Original-From: Philipp Stephani <phst@HIDDEN>
To: 40434 <at> debbugs.gnu.org
Subject: [PATCH] Band-aid for edebugging generator bodies (Bug#40434).
Date: Wed, 10 Jun 2020 19:04:19 +0200
Message-Id: <20200610170419.28506-1-phst@HIDDEN>
X-Mailer: git-send-email 2.27.0.278.ge193c7cf3a9-goog
In-Reply-To: <CAArVCkS3QtFS+WoQUSssHw35fwXuchb_gr1XQUPpaC28n65tHA@HIDDEN>
References: <CAArVCkS3QtFS+WoQUSssHw35fwXuchb_gr1XQUPpaC28n65tHA@HIDDEN>
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-Spam-Score: 0.2 (/)
X-Debbugs-Envelope-To: 40434
Cc: Philipp Stephani <phst@HIDDEN>
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -0.8 (/)

Edebug doesn't support them well.  Rather than trying to fix Edebug,
disable instrumentation for now to prevent annoying bugs.

* lisp/emacs-lisp/generator.el (iter-defun, iter-lambda, iter-make)
(iter-do): Don't attempt to instrument bodies that are mangled by the
CPS transformer.

* test/lisp/emacs-lisp/generator-tests.el
(generator-tests-edebug): New regression test.
---
 lisp/emacs-lisp/generator.el            | 8 ++++----
 test/lisp/emacs-lisp/generator-tests.el | 9 +++++++++
 2 files changed, 13 insertions(+), 4 deletions(-)

diff --git a/lisp/emacs-lisp/generator.el b/lisp/emacs-lisp/generator.el
index ba344eb515..c95c758a57 100644
--- a/lisp/emacs-lisp/generator.el
+++ b/lisp/emacs-lisp/generator.el
@@ -673,7 +673,7 @@ iter-defun
 encapsulates the state of a computation that produces a sequence
 of values.  Callers can retrieve each value using `iter-next'."
   (declare (indent defun)
-           (debug (&define name lambda-list lambda-doc def-body))
+           (debug (&define name lambda-list lambda-doc &rest sexp))
            (doc-string 3))
   (cl-assert lexical-binding)
   (let* ((parsed-body (macroexp-parse-body body))
@@ -687,14 +687,14 @@ iter-lambda
   "Return a lambda generator.
 `iter-lambda' is to `iter-defun' as `lambda' is to `defun'."
   (declare (indent defun)
-           (debug (&define lambda-list lambda-doc def-body)))
+           (debug (&define lambda-list lambda-doc &rest sexp)))
   (cl-assert lexical-binding)
   `(lambda ,arglist
      ,(cps-generate-evaluator body)))
 
 (defmacro iter-make (&rest body)
   "Return a new iterator."
-  (declare (debug t))
+  (declare (debug (&rest sexp)))
   (cps-generate-evaluator body))
 
 (defconst iter-empty (lambda (_op _val) (signal 'iter-end-of-sequence nil))
@@ -720,7 +720,7 @@ iter-do
 Evaluate BODY with VAR bound to each value from ITERATOR.
 Return the value with which ITERATOR finished iteration."
   (declare (indent 1)
-           (debug ((symbolp form) body)))
+           (debug ((symbolp form) &rest sexp)))
   (let ((done-symbol (cps--gensym "iter-do-iterator-done"))
         (condition-symbol (cps--gensym "iter-do-condition"))
         (it-symbol (cps--gensym "iter-do-iterator"))
diff --git a/test/lisp/emacs-lisp/generator-tests.el b/test/lisp/emacs-lisp/generator-tests.el
index bcfab20163..9b1a573ea6 100644
--- a/test/lisp/emacs-lisp/generator-tests.el
+++ b/test/lisp/emacs-lisp/generator-tests.el
@@ -304,4 +304,13 @@ iter-lambda-variable-shadowing
                                             (1+ it)))))))
                  -2)))
 
+(ert-deftest generator-tests-edebug ()
+  "Check that Bug#40434 is fixed."
+  (with-temp-buffer
+    (prin1 '(iter-defun generator-tests-edebug ()
+              (iter-yield 123))
+           (current-buffer))
+    (edebug-defun))
+  (should (eql (iter-next (generator-tests-edebug)) 123)))
+
 ;;; generator-tests.el ends here
-- 
2.27.0.278.ge193c7cf3a9-goog





Information forwarded to bug-gnu-emacs@HIDDEN:
bug#40434; Package emacs. Full text available.

Message received at submit <at> debbugs.gnu.org:


Received: (at submit) by debbugs.gnu.org; 10 Jun 2020 11:28:22 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Wed Jun 10 07:28:22 2020
Received: from localhost ([127.0.0.1]:33485 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1jiyu6-00019L-CG
	for submit <at> debbugs.gnu.org; Wed, 10 Jun 2020 07:28:22 -0400
Received: from lists.gnu.org ([209.51.188.17]:56562)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <p.stephani2@HIDDEN>) id 1jiyu5-00019D-34
 for submit <at> debbugs.gnu.org; Wed, 10 Jun 2020 07:28:21 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:38844)
 by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
 (Exim 4.90_1) (envelope-from <p.stephani2@HIDDEN>)
 id 1jiyu4-0000U3-S2
 for bug-gnu-emacs@HIDDEN; Wed, 10 Jun 2020 07:28:20 -0400
Received: from mail-oi1-x22f.google.com ([2607:f8b0:4864:20::22f]:43872)
 by eggs.gnu.org with esmtps (TLS1.3:ECDHE_RSA_AES_128_GCM_SHA256:128)
 (Exim 4.90_1) (envelope-from <p.stephani2@HIDDEN>)
 id 1jiyu3-0004nw-RD
 for bug-gnu-emacs@HIDDEN; Wed, 10 Jun 2020 07:28:20 -0400
Received: by mail-oi1-x22f.google.com with SMTP id j189so1687736oih.10
 for <bug-gnu-emacs@HIDDEN>; Wed, 10 Jun 2020 04:28:14 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025;
 h=mime-version:references:in-reply-to:from:date:message-id:subject:to;
 bh=wv6Yh9bh82z+lBcxaeTbQlaQa7xjTlpPJG5sYQKN2DA=;
 b=vb7BBUfxHexIZHk+DvRPBMQf39ifGPN450A0yDeZo3hsNQ8tcrrNhtRIHPgy21xgRh
 AXQDXbh7C6y7crqpPAvEZ/VQAT1vmSc6lwu0NXd2Mis8I4OX62ngJP98M9Gx8NMhMRBq
 MKkIAyuCivrZc5VPFQlwiakKirtwIFt9arm3efZIIVa/QXVmZVTGJOcD3WI0FMSx5c16
 vaIM0r3TT57qqcN4GczVvsR0SFloOysRf6Z4oYY9Jt2QOC7fI9uWQ1AwY16FhEVGHU91
 VZlbSyRQ9jhA8NYuIeghG5QMr/eRPWFyIyg6Fwv5hsmqSsP2ugvCSpjVvfyDWHlVxRcz
 Zobg==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:mime-version:references:in-reply-to:from:date
 :message-id:subject:to;
 bh=wv6Yh9bh82z+lBcxaeTbQlaQa7xjTlpPJG5sYQKN2DA=;
 b=g5DiCkMV1dqOGMUIsdMvpprntBTKBSKMrOeZ1RY6GzMngRvAd+6DAm4uEJRm5Pf19T
 AcfQqbgkcz4gpRvHJlf10ZlGCpedPqbywIS8NhY8MNO/462rNCc1QzLaUm0pb5i3wTup
 JP3scIRLPfHF0qBYe+/iu0NauXNPmpFFEu6jp07lIaeKNDyMQnt54S8gLt8moXk/X07m
 313fgQov60uUK+lXF/3+l2f5JwJah/XJePzgbeVxE+ve7dg/ptecWLtxEzY1mFv00bEy
 SJorHt9HBmqPbDsPcMjx+Tv4angiWl6M2hzXuOq0QJqxqH9WMb06Qke8/iFAP6KFEhkx
 7ZTQ==
X-Gm-Message-State: AOAM531mbd73CZhXAdRLxYJnpDqUscvX8is6M3kj4cX5r74qSFmEkarE
 Lfagcx5kObfI+DOSd74K/LVbkX0CR39+MEWdC18Ljq9P
X-Google-Smtp-Source: ABdhPJyRQiAg6cbgGWgUbfzdhF8pIs1j4bBYTCDfyCoS7tSrZUS6bw9KPfeLzwgpYEYiMLyYkzGke7s/mreK3hEV4og=
X-Received: by 2002:aca:cf4d:: with SMTP id f74mr2085025oig.9.1591788492846;
 Wed, 10 Jun 2020 04:28:12 -0700 (PDT)
MIME-Version: 1.0
References: <wvr4k12v6vem.fsf@HIDDEN>
In-Reply-To: <wvr4k12v6vem.fsf@HIDDEN>
From: Philipp Stephani <p.stephani2@HIDDEN>
Date: Wed, 10 Jun 2020 13:28:01 +0200
Message-ID: <CAArVCkS3QtFS+WoQUSssHw35fwXuchb_gr1XQUPpaC28n65tHA@HIDDEN>
Subject: Re: 27.0.90; Can't run ERT tests for edebugged generator functions
To: bug-gnu-emacs@HIDDEN
Content-Type: text/plain; charset="UTF-8"
Received-SPF: pass client-ip=2607:f8b0:4864:20::22f;
 envelope-from=p.stephani2@HIDDEN; helo=mail-oi1-x22f.google.com
X-detected-operating-system: by eggs.gnu.org: No matching host in p0f cache.
 That's all we know.
X-Spam_score_int: -17
X-Spam_score: -1.8
X-Spam_bar: -
X-Spam_report: (-1.8 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1,
 DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1,
 FREEMAIL_ENVFROM_END_DIGIT=0.25, FREEMAIL_FROM=0.001,
 RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001,
 SPF_PASS=-0.001 autolearn=_AUTOLEARN
X-Spam_action: no action
X-Spam-Score: -1.1 (-)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -2.1 (--)

Am Sa., 4. Apr. 2020 um 18:57 Uhr schrieb Philipp Stephani
<p.stephani2@HIDDEN>:
>
>
> Insert into *scratch*:
>
> (require 'generator)
> (require 'ert)
> (iter-defun foo () (iter-yield 123))
> (ert-deftest foo () (should (equal (iter-next (foo)) 123)))
>
> Evaluate the first two forms.  Edebug the third form (C-u C-M-x).
> Evaluate the fourth form.  Then run the test using M-x ert RET RET.
> The test will reach `foo', then just hit space to continue.  The test
> will then fail with
>
> F foo
>     (void-function cps-internal-yield)

I think none of the macros in generator.el should use the 'body' or
'def-body' or 't' debug specifications. Generator functions don't
really have bodies in the edebug sense, as the CPS machinery rewrites
them completely. So probably these should all use 'form' for now,
until edebug grows functionality to instrument such functions.




Information forwarded to bug-gnu-emacs@HIDDEN:
bug#40434; Package emacs. Full text available.

Message received at submit <at> debbugs.gnu.org:


Received: (at submit) by debbugs.gnu.org; 4 Apr 2020 16:57:50 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Sat Apr 04 12:57:50 2020
Received: from localhost ([127.0.0.1]:44687 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1jKm7B-0001Do-U6
	for submit <at> debbugs.gnu.org; Sat, 04 Apr 2020 12:57:50 -0400
Received: from lists.gnu.org ([209.51.188.17]:49428)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <p.stephani2@HIDDEN>) id 1jKm79-0001DZ-Gl
 for submit <at> debbugs.gnu.org; Sat, 04 Apr 2020 12:57:48 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:59148)
 by lists.gnu.org with esmtp (Exim 4.90_1)
 (envelope-from <p.stephani2@HIDDEN>) id 1jKm76-0006Dn-Kr
 for bug-gnu-emacs@HIDDEN; Sat, 04 Apr 2020 12:57:47 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: *
X-Spam-Status: No, score=1.1 required=5.0 tests=BAYES_50,
 FREEMAIL_ENVFROM_END_DIGIT,FREEMAIL_FROM,URIBL_BLOCKED autolearn=disabled
 version=3.3.2
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <p.stephani2@HIDDEN>) id 1jKm73-00037j-UZ
 for bug-gnu-emacs@HIDDEN; Sat, 04 Apr 2020 12:57:44 -0400
Received: from mail-wm1-x32f.google.com ([2a00:1450:4864:20::32f]:51419)
 by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16)
 (Exim 4.71) (envelope-from <p.stephani2@HIDDEN>)
 id 1jKm73-00037C-LG
 for bug-gnu-emacs@HIDDEN; Sat, 04 Apr 2020 12:57:41 -0400
Received: by mail-wm1-x32f.google.com with SMTP id z7so10382429wmk.1
 for <bug-gnu-emacs@HIDDEN>; Sat, 04 Apr 2020 09:57:41 -0700 (PDT)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025;
 h=from:to:subject:date:message-id:mime-version
 :content-transfer-encoding;
 bh=bBJlAnEKt/oa7ENTnO1oaSxeK6X1JnwTH4n1cV/in9s=;
 b=VbQbad57RScWrt6YK7c2cRzcNcossc4GKm1SdQic9MDEYsCVwTauVfNuqmsC4KNUKd
 ZDCHLofSi7aIxJ0kJoVteGh2yggwFUW7tBveFVz+M1wKuCzmu2nM5zKUrJBLuxJVf4WB
 fc+Jefk0O1G3nt8rBeVE3svEQg4EZINcpCs64aBtGWlyKUM/xvosBvEimik136l85CYz
 1O8+dqJZDXm0gW/9Py2m8ybTYMK+s7xfzMfNmTtJn3KNV7tp+o9dbuw9Xvbx84z4KNNy
 ynMx+OeyjXh5UJcAAk8NBIH+mdvz0/5bNTYatXoDOyuKBJqvpM/rbecSYRL5SEB4iVEI
 0iSw==
X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed;
 d=1e100.net; s=20161025;
 h=x-gm-message-state:from:to:subject:date:message-id:mime-version
 :content-transfer-encoding;
 bh=bBJlAnEKt/oa7ENTnO1oaSxeK6X1JnwTH4n1cV/in9s=;
 b=qKgl0ea50EbWtR5VkCabhvOMn+iwBWhHpzOca7/EgLtp72f8toakrkIgwInwXyKWia
 H1wAZ1T8I/NivfgLaeigiHtACpGiR/StE+L3Iynstmj10V/X1JBubmqoLuFkehF35XUG
 TJwCYGDBZ5ha8iCctQxrnzQ+y13wqH2bPMm8BUP8whshi5Hq1C6xIfM6shHHfWLmNOn1
 +P9WvGZ4azH2rUqchi1KnifTE40AhSsgy664kpFZu7lErVhKKkLHYdpVN6VLx3lKCecc
 u95lDB9pIAaVTAjDR7dTRdn8S8LM7gDumufsgUymF2IJ7O45j4yFEGiJgcyu2KoDZ0Rs
 GPdQ==
X-Gm-Message-State: AGi0PuaFwePcJSSD/cg5WNda8oUZ6wNJfivufKbBEE+A8SfwyTRTF2/W
 flnY1ABlK6miGgcnEYyr/IlwkCsH
X-Google-Smtp-Source: APiQypJ1XmYYOzZuf8kiGTN+MVpGyr5YfMR6CJaZGpTkFjLjQYS9xwF+q5DzSwkK8sC1dgbkNMjyIg==
X-Received: by 2002:a1c:2d41:: with SMTP id t62mr14041968wmt.128.1586019459454; 
 Sat, 04 Apr 2020 09:57:39 -0700 (PDT)
Received: from phst1 ([2a02:2455:2a2:100:c351:ffcc:5d8e:4288])
 by smtp.gmail.com with ESMTPSA id r20sm14572381wmh.46.2020.04.04.09.57.38
 for <bug-gnu-emacs@HIDDEN>
 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256);
 Sat, 04 Apr 2020 09:57:38 -0700 (PDT)
From: Philipp Stephani <p.stephani2@HIDDEN>
To: bug-gnu-emacs@HIDDEN
Subject: 27.0.90; Can't run ERT tests for edebugged generator functions
Date: Sat, 04 Apr 2020 18:57:37 +0200
Message-ID: <wvr4k12v6vem.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
X-detected-operating-system: by eggs.gnu.org: Genre and OS details not
 recognized.
X-Received-From: 2a00:1450:4864:20::32f
X-Spam-Score: 2.5 (++)
X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org",
 has NOT identified this incoming email as spam.  The original
 message has been attached to this so you can view it or label
 similar future email.  If you have any questions, see
 the administrator of that system for details.
 Content preview:  Insert into *scratch*: (require 'generator) (require 'ert)
 (iter-defun foo () (iter-yield 123)) (ert-deftest foo () (should (equal
 (iter-next
 (foo)) 123))) Evaluate the first two forms. Edebug the third form (C-u C-M-x).
 Evaluate the fourth form. Then run the test using M-x ert RET RET. The test
 will reach `foo', then just hit space to continue. The test [...] 
 Content analysis details:   (2.5 points, 10.0 required)
 pts rule name              description
 ---- ---------------------- --------------------------------------------------
 0.0 URIBL_BLOCKED          ADMINISTRATOR NOTICE: The query to URIBL was
 blocked.  See
 http://wiki.apache.org/spamassassin/DnsBlocklists#dnsbl-block
 for more information. [URIs: x.org]
 0.0 FREEMAIL_FROM          Sender email is commonly abused enduser mail
 provider (p.stephani2[at]gmail.com)
 1.0 SPF_SOFTFAIL           SPF: sender does not match SPF record (softfail)
 0.2 FREEMAIL_ENVFROM_END_DIGIT Envelope-from freemail username ends
 in digit (p.stephani2[at]gmail.com)
 0.0 SPF_HELO_NONE          SPF: HELO does not publish an SPF Record
 -0.7 RCVD_IN_DNSWL_LOW      RBL: Sender listed at https://www.dnswl.org/,
 low trust [209.51.188.17 listed in list.dnswl.org]
 2.0 SPOOFED_FREEMAIL       No description available.
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -0.5 (/)


Insert into *scratch*:

(require 'generator)
(require 'ert)
(iter-defun foo () (iter-yield 123))
(ert-deftest foo () (should (equal (iter-next (foo)) 123)))

Evaluate the first two forms.  Edebug the third form (C-u C-M-x).
Evaluate the fourth form.  Then run the test using M-x ert RET RET.
The test will reach `foo', then just hit space to continue.  The test
will then fail with

F foo
    (void-function cps-internal-yield)

Backtrace:

Backtrace for test =E2=80=98foo=E2=80=99:
  signal(void-function (cps-internal-yield))
  apply(signal (void-function (cps-internal-yield)))
  (setq value-18 (apply fn-16 args-17))
  (unwind-protect (setq value-18 (apply fn-16 args-17)) (setq form-descript=
ion-20 (nconc (list '(should (equal (iter-next ...) 123))) (list :form (con=
s fn-16 args-17)) (if (eql value-18 'ert-form-evaluation-aborted-19) nil (l=
ist :value value-18)) (let ((-explainer- (and (symbolp ...) (get ... ...)))=
) (if -explainer- (progn (list :explanation (apply -explainer- args-17)))))=
)) (ert--signal-should-execution form-description-20))
  (if (unwind-protect (setq value-18 (apply fn-16 args-17)) (setq form-desc=
ription-20 (nconc (list '(should (equal ... 123))) (list :form (cons fn-16 =
args-17)) (if (eql value-18 'ert-form-evaluation-aborted-19) nil (list :val=
ue value-18)) (let ((-explainer- (and ... ...))) (if -explainer- (progn (li=
st :explanation ...)))))) (ert--signal-should-execution form-description-20=
)) nil (ert-fail form-description-20))
  (let (form-description-20) (if (unwind-protect (setq value-18 (apply fn-1=
6 args-17)) (setq form-description-20 (nconc (list '(should ...)) (list :fo=
rm (cons fn-16 args-17)) (if (eql value-18 'ert-form-evaluation-aborted-19)=
 nil (list :value value-18)) (let ((-explainer- ...)) (if -explainer- (prog=
n ...))))) (ert--signal-should-execution form-description-20)) nil (ert-fai=
l form-description-20)))
  (let ((value-18 'ert-form-evaluation-aborted-19)) (let (form-description-=
20) (if (unwind-protect (setq value-18 (apply fn-16 args-17)) (setq form-de=
scription-20 (nconc (list '...) (list :form (cons fn-16 args-17)) (if (eql =
value-18 ...) nil (list :value value-18)) (let (...) (if -explainer- ...)))=
) (ert--signal-should-execution form-description-20)) nil (ert-fail form-de=
scription-20))) value-18)
  (let* ((fn-16 #'equal) (args-17 (condition-case err (let ((signal-hook-fu=
nction #'ert--should-signal-hook)) (list (iter-next (foo)) 123)) (error (pr=
ogn (setq fn-16 #'signal) (list (car err) (cdr err))))))) (let ((value-18 '=
ert-form-evaluation-aborted-19)) (let (form-description-20) (if (unwind-pro=
tect (setq value-18 (apply fn-16 args-17)) (setq form-description-20 (nconc=
 (list ...) (list :form ...) (if ... nil ...) (let ... ...))) (ert--signal-=
should-execution form-description-20)) nil (ert-fail form-description-20)))=
 value-18))
  (closure (t) nil (let* ((fn-16 #'equal) (args-17 (condition-case err (let=
 ((signal-hook-function ...)) (list (iter-next ...) 123)) (error (progn (se=
tq fn-16 ...) (list ... ...)))))) (let ((value-18 'ert-form-evaluation-abor=
ted-19)) (let (form-description-20) (if (unwind-protect (setq value-18 (app=
ly fn-16 args-17)) (setq form-description-20 (nconc ... ... ... ...)) (ert-=
-signal-should-execution form-description-20)) nil (ert-fail form-descripti=
on-20))) value-18)))()
  ert--run-test-internal(#s(ert--test-execution-info :test #s(ert-test :nam=
e foo :documentation nil :body (closure (t) nil (let* ... ...)) :most-recen=
t-result #s(ert-test-failed :messages "\n" :should-forms (...) :duration 1.=
045761238 :condition (void-function cps-internal-yield) :backtrace (... ...=
 ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ..=
.) :infos nil) :expected-result-type :passed :tags nil) :result #s(ert-test=
-failed :messages "\n" :should-forms ((... :form ... :explanation ...)) :du=
ration 1.045761238 :condition (void-function cps-internal-yield) :backtrace=
 (#s(backtrace-frame :evald t :fun signal :args ... :flags nil :locals ... =
:buffer nil :pos nil) #s(backtrace-frame :evald t :fun apply :args ... :fla=
gs nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun=
 setq :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-f=
rame :evald nil :fun unwind-protect :args ... :flags nil :locals nil :buffe=
r nil :pos nil) #s(backtrace-frame :evald nil :fun if :args ... :flags nil =
:locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun let :a=
rgs ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :ev=
ald nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(=
backtrace-frame :evald nil :fun let* :args ... :flags nil :locals ... :buff=
er nil :pos nil) #s(backtrace-frame :evald t :fun ... :args nil :flags nil =
:locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert--run=
-test-internal :args #0 :flags nil :locals ... :buffer nil :pos nil) #s(bac=
ktrace-frame :evald t :fun ert-run-test :args ... :flags nil :locals ... :b=
uffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-or-rerun-test =
:args ... :flags nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :=
evald t :fun ert-run-tests :args ... :flags nil :locals ... :buffer nil :po=
s nil) #s(backtrace-frame :evald t :fun ert :args ... :flags nil :locals ni=
l :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall-interactiv=
ely :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-fra=
me :evald t :fun call-interactively :args ... :flags nil :locals nil :buffe=
r nil :pos nil) #s(backtrace-frame :evald t :fun command-execute :args ... =
:flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :f=
un execute-extended-command :args ... :flags nil :locals ... :buffer nil :p=
os nil) #s(backtrace-frame :evald t :fun funcall-interactively :args ... :f=
lags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun=
 call-interactively :args ... :flags nil :locals nil :buffer nil :pos nil) =
#s(backtrace-frame :evald t :fun command-execute :args ... :flags nil :loca=
ls nil :buffer nil :pos nil)) :infos nil) :exit-continuation #f(compiled-fu=
nction () #<bytecode 0x15560c3e9c8d>) :next-debugger debug :ert-debug-on-er=
ror nil))
  ert-run-test(#s(ert-test :name foo :documentation nil :body (closure (t) =
nil (let* ((fn-16 #'equal) (args-17 (condition-case err ... ...))) (let ((v=
alue-18 ...)) (let (form-description-20) (if ... nil ...)) value-18))) :mos=
t-recent-result #s(ert-test-failed :messages "\n" :should-forms (((should (=
equal ... 123)) :form (signal void-function (cps-internal-yield)) :explanat=
ion (different-types void-function (cps-internal-yield)))) :duration 1.0457=
61238 :condition (void-function cps-internal-yield) :backtrace (#s(backtrac=
e-frame :evald t :fun signal :args (void-function (cps-internal-yield)) :fl=
ags nil :locals ((debugger-may-continue . t) (inhibit-redisplay) (inhibit-d=
ebugger . t) (inhibit-changing-match-data)) :buffer nil :pos nil) #s(backtr=
ace-frame :evald t :fun apply :args (signal (void-function ...)) :flags nil=
 :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun setq =
:args (value-18 (apply fn-16 args-17)) :flags nil :locals nil :buffer nil :=
pos nil) #s(backtrace-frame :evald nil :fun unwind-protect :args ((setq val=
ue-18 ...) (setq form-description-20 ...) (ert--signal-should-execution for=
m-description-20)) :flags nil :locals nil :buffer nil :pos nil) #s(backtrac=
e-frame :evald nil :fun if :args ((unwind-protect ... ... ...) nil (ert-fai=
l form-description-20)) :flags nil :locals nil :buffer nil :pos nil) #s(bac=
ktrace-frame :evald nil :fun let :args ((form-description-20) (if ... nil .=
..)) :flags nil :locals ((fn-16 . signal) (args-17 void-function ...) (valu=
e-18 . ert-form-evaluation-aborted-19) (form-description-20)) :buffer nil :=
pos nil) #s(backtrace-frame :evald nil :fun let :args ((...) (let ... ...) =
value-18) :flags nil :locals ((fn-16 . signal) (args-17 void-function ...) =
(value-18 . ert-form-evaluation-aborted-19)) :buffer nil :pos nil) #s(backt=
race-frame :evald nil :fun let* :args ((... ...) (let ... ... value-18)) :f=
lags nil :locals ((fn-16 . signal) (args-17 void-function ...)) :buffer nil=
 :pos nil) #s(backtrace-frame :evald t :fun (closure (t) nil (let* ... ...)=
) :args nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame=
 :evald t :fun ert--run-test-internal :args (#s(ert--test-execution-info :t=
est #1 :result #2 :exit-continuation #f(compiled-function () #<bytecode 0x1=
5560c3e9c8d>) :next-debugger debug :ert-debug-on-error nil)) :flags nil :lo=
cals ((ert--infos) (debug-ignored-errors) (debug-on-quit . t) (debug-on-err=
or . t) (debugger . #f(compiled-function (&rest args) #<bytecode 0x15560c24=
f14d>))) :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-run-tes=
t :args #0 :flags nil :locals ((ert--running-tests #1) (message-log-max . t=
) (ert--should-execution-observer . #f(compiled-function (form-description)=
 #<bytecode 0x15560c2547f1>))) :buffer nil :pos nil) #s(backtrace-frame :ev=
ald t :fun ert-run-or-rerun-test :args (#s(ert--stats :selector t :tests ..=
. :test-map #<hash-table eql 1/1 0x15560c4f68ad> :test-results ... :test-st=
art-times ... :test-end-times ... :passed-expected 0 :passed-unexpected 0 :=
failed-expected 0 :failed-unexpected 1 :skipped 0 :start-time ... :end-time=
 ... :aborted-p nil :current-test nil :next-redisplay 1586019421.4940612) #=
1 #f(compiled-function (event-type &rest event-args) #<bytecode 0x15560c4f6=
8a1>)) :flags nil :locals ((ert--current-run-stats . ...)) :buffer nil :pos=
 nil) #s(backtrace-frame :evald t :fun ert-run-tests :args (t #f(compiled-f=
unction (event-type &rest event-args) #<bytecode 0x15560c4f68a1>) t) :flags=
 nil :locals ((ert--current-run-stats . ...)) :buffer nil :pos nil) #s(back=
trace-frame :evald t :fun ert :args (t nil) :flags nil :locals nil :buffer =
nil :pos nil) #s(backtrace-frame :evald t :fun funcall-interactively :args =
(ert t nil) :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame=
 :evald t :fun call-interactively :args (ert record nil) :flags nil :locals=
 nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-execute=
 :args (ert record) :flags nil :locals nil :buffer nil :pos nil) #s(backtra=
ce-frame :evald t :fun execute-extended-command :args (nil "ert" "ert") :fl=
ags nil :locals ((prefix-arg)) :buffer nil :pos nil) #s(backtrace-frame :ev=
ald t :fun funcall-interactively :args (execute-extended-command nil "ert" =
"ert") :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :eva=
ld t :fun call-interactively :args (execute-extended-command nil nil) :flag=
s nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun co=
mmand-execute :args (execute-extended-command) :flags nil :locals nil :buff=
er nil :pos nil)) :infos nil) :expected-result-type :passed :tags nil))
  ert-run-or-rerun-test(#s(ert--stats :selector t :tests [#s(ert-test :name=
 foo :documentation nil :body (closure ... nil ...) :most-recent-result #s(=
ert-test-failed :messages "\n" :should-forms ... :duration 1.045761238 :con=
dition ... :backtrace ... :infos nil) :expected-result-type :passed :tags n=
il)] :test-map #<hash-table eql 1/1 0x15560c4f68ad> :test-results [#s(ert-t=
est-failed :messages "\n" :should-forms (...) :duration 1.045761238 :condit=
ion (void-function cps-internal-yield) :backtrace (... ... ... ... ... ... =
... ... ... ... ... ... ... ... ... ... ... ... ... ... ...) :infos nil)] :=
test-start-times [(24200 48220 301586 645000)] :test-end-times [(24200 4822=
1 347347 883000)] :passed-expected 0 :passed-unexpected 0 :failed-expected =
0 :failed-unexpected 1 :skipped 0 :start-time (24200 48220 161306 299000) :=
end-time (24200 48221 385475 311000) :aborted-p nil :current-test nil :next=
-redisplay 1586019421.4940612) #s(ert-test :name foo :documentation nil :bo=
dy (closure (t) nil (let* (... ...) (let ... ... value-18))) :most-recent-r=
esult #s(ert-test-failed :messages "\n" :should-forms ((... :form ... :expl=
anation ...)) :duration 1.045761238 :condition (void-function cps-internal-=
yield) :backtrace (#s(backtrace-frame :evald t :fun signal :args ... :flags=
 nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun app=
ly :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-fram=
e :evald nil :fun setq :args ... :flags nil :locals nil :buffer nil :pos ni=
l) #s(backtrace-frame :evald nil :fun unwind-protect :args ... :flags nil :=
locals nil :buffer nil :pos nil) #s(backtrace-frame :evald nil :fun if :arg=
s ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :eval=
d nil :fun let :args ... :flags nil :locals ... :buffer nil :pos nil) #s(ba=
cktrace-frame :evald nil :fun let :args ... :flags nil :locals ... :buffer =
nil :pos nil) #s(backtrace-frame :evald nil :fun let* :args ... :flags nil =
:locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ... :arg=
s nil :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :eval=
d t :fun ert--run-test-internal :args ... :flags nil :locals ... :buffer ni=
l :pos nil) #s(backtrace-frame :evald t :fun ert-run-test :args ... :flags =
nil :locals ... :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert-=
run-or-rerun-test :args #0 :flags nil :locals ... :buffer nil :pos nil) #s(=
backtrace-frame :evald t :fun ert-run-tests :args ... :flags nil :locals ..=
. :buffer nil :pos nil) #s(backtrace-frame :evald t :fun ert :args ... :fla=
gs nil :locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun f=
uncall-interactively :args ... :flags nil :locals nil :buffer nil :pos nil)=
 #s(backtrace-frame :evald t :fun call-interactively :args ... :flags nil :=
locals nil :buffer nil :pos nil) #s(backtrace-frame :evald t :fun command-e=
xecute :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-=
frame :evald t :fun execute-extended-command :args ... :flags nil :locals .=
.. :buffer nil :pos nil) #s(backtrace-frame :evald t :fun funcall-interacti=
vely :args ... :flags nil :locals nil :buffer nil :pos nil) #s(backtrace-fr=
ame :evald t :fun call-interactively :args ... :flags nil :locals nil :buff=
er nil :pos nil) #s(backtrace-frame :evald t :fun command-execute :args ...=
 :flags nil :locals nil :buffer nil :pos nil)) :infos nil) :expected-result=
-type :passed :tags nil) #f(compiled-function (event-type &rest event-args)=
 #<bytecode 0x15560c4f68a1>))
  ert-run-tests(t #f(compiled-function (event-type &rest event-args) #<byte=
code 0x15560c4f68a1>) t)
  ert(t nil)
  funcall-interactively(ert t nil)
  call-interactively(ert record nil)
  command-execute(ert record)
  execute-extended-command(nil "ert" "ert")
  funcall-interactively(execute-extended-command nil "ert" "ert")
  call-interactively(execute-extended-command nil nil)
  command-execute(execute-extended-command)



In GNU Emacs 27.0.90 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.12)
 of 2020-04-03
Repository revision: fa823653ffb0e3e893d30daa5abf68e909934e2e
Repository branch: emacs-27
Windowing system distributor 'The X.Org Foundation', version 11.0.12004000
System Description: Debian GNU/Linux rodete

Recent messages:
For information about GNU Emacs and the GNU system, type C-h C-a.

Configured using:
 'configure --enable-gcc-warnings=3Dwarn-only
 --enable-gtk-deprecation-warnings --without-pop --with-mailutils
 --enable-checking --enable-check-lisp-object-type --with-modules
 'CFLAGS=3D-O0 -ggdb3''

Configured features:
XPM JPEG TIFF GIF PNG SOUND DBUS GSETTINGS GLIB NOTIFY INOTIFY
LIBSELINUX GNUTLS FREETYPE HARFBUZZ XFT ZLIB TOOLKIT_SCROLL_BARS GTK3
X11 XDBE XIM MODULES THREADS PDUMPER GMP

Important settings:
  value of $LANG: en_US.UTF-8
  locale-coding-system: utf-8-unix

Major mode: Lisp Interaction

Minor modes in effect:
  tooltip-mode: t
  global-eldoc-mode: t
  eldoc-mode: t
  electric-indent-mode: t
  mouse-wheel-mode: t
  tool-bar-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  blink-cursor-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  line-number-mode: t
  transient-mark-mode: t

Load-path shadows:
None found.

Features:
(shadow sort mail-extr emacsbug message rmc dired dired-loaddefs
format-spec rfc822 mml easymenu mml-sec epa epg epg-config gnus-util
rmail rmail-loaddefs text-property-search time-date mm-decode mm-bodies
mm-encode mail-parse rfc2231 mailabbrev gmm-utils mailheader sendmail
rfc2047 rfc2045 ietf-drums mm-util mail-prsvr mail-utils phst skeleton
derived edmacro kmacro pcase ffap thingatpt url-parse auth-source cl-seq
eieio eieio-core cl-macs eieio-loaddefs password-cache json map url-vars
subr-x rx gnutls puny seq byte-opt gv bytecomp byte-compile cconv dbus
xml cl-loaddefs cl-lib tooltip eldoc electric uniquify ediff-hook
vc-hooks lisp-float-type mwheel term/x-win x-win term/common-win x-dnd
tool-bar dnd fontset image regexp-opt fringe tabulated-list replace
newcomment text-mode elisp-mode lisp-mode prog-mode register page
tab-bar menu-bar rfn-eshadow isearch timer select scroll-bar mouse
jit-lock font-lock syntax facemenu font-core term/tty-colors frame
minibuffer cl-generic cham georgian utf-8-lang misc-lang vietnamese
tibetan thai tai-viet lao korean japanese eucjp-ms cp51932 hebrew greek
romanian slovak czech european ethiopic indian cyrillic chinese
composite charscript charprop case-table epa-hook jka-cmpr-hook help
simple abbrev obarray cl-preloaded nadvice loaddefs button faces
cus-face macroexp files text-properties overlay sha1 md5 base64 format
env code-pages mule custom widget hashtable-print-readable backquote
threads dbusbind inotify dynamic-setting system-font-setting
font-render-setting move-toolbar gtk x-toolkit x multi-tty
make-network-process emacs)

Memory information:
((conses 16 60656 8398)
 (symbols 48 8240 1)
 (strings 32 21019 1859)
 (string-bytes 1 684594)
 (vectors 16 12144)
 (vector-slots 8 169116 5888)
 (floats 8 25 25)
 (intervals 56 202 0)
 (buffers 1000 12))

--=20
Google Germany GmbH
Erika-Mann-Stra=C3=9Fe 33
80636 M=C3=BCnchen

Registergericht und -nummer: Hamburg, HRB 86891
Sitz der Gesellschaft: Hamburg
Gesch=C3=A4ftsf=C3=BChrer: Paul Manicle, Halimah DeLaine Prado

If you received this communication by mistake, please don=E2=80=99t forward=
 it to
anyone else (it may contain confidential or privileged information), please
erase all copies of it, including all attachments, and please let the sender
know it went to the wrong person.  Thanks.




Acknowledgement sent to Philipp Stephani <p.stephani2@HIDDEN>:
New bug report received and forwarded. Copy sent to bug-gnu-emacs@HIDDEN. Full text available.
Report forwarded to bug-gnu-emacs@HIDDEN:
bug#40434; Package emacs. Full text available.
Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.
Last modified: Wed, 30 Sep 2020 04:00:02 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.