From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Lars Ingebrigtsen Newsgroups: gmane.emacs.bugs Subject: bug#50629: 28.0.50; hard to debug an uncaught error with ert Date: Sat, 27 Aug 2022 16:29:04 +0200 Message-ID: <871qt192vj.fsf@gnus.org> References: <15445.1631834888@alto> <87pmgncjvg.fsf@gnus.org> <871qt1aklk.fsf@gnus.org> <875yid94k2.fsf@gnus.org> Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="30668"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/29.0.50 (gnu/linux) Cc: Mike Kupfer , 50629@debbugs.gnu.org To: Gerd =?UTF-8?Q?M=C3=B6llmann?= Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Sat Aug 27 16:30:12 2022 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1oRwp9-0007jF-36 for geb-bug-gnu-emacs@m.gmane-mx.org; Sat, 27 Aug 2022 16:30:11 +0200 Original-Received: from localhost ([::1]:33068 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1oRwp7-0008Rm-HJ for geb-bug-gnu-emacs@m.gmane-mx.org; Sat, 27 Aug 2022 10:30:09 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:51822) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oRwp0-0008RW-ON for bug-gnu-emacs@gnu.org; Sat, 27 Aug 2022 10:30:02 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:38752) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1oRwp0-0003V8-Ei for bug-gnu-emacs@gnu.org; Sat, 27 Aug 2022 10:30:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1oRwp0-0005Wh-8b for bug-gnu-emacs@gnu.org; Sat, 27 Aug 2022 10:30:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Lars Ingebrigtsen Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 27 Aug 2022 14:30:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 50629 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: moreinfo Original-Received: via spool by 50629-submit@debbugs.gnu.org id=B50629.166161055721170 (code B ref 50629); Sat, 27 Aug 2022 14:30:02 +0000 Original-Received: (at 50629) by debbugs.gnu.org; 27 Aug 2022 14:29:17 +0000 Original-Received: from localhost ([127.0.0.1]:56734 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1oRwoH-0005VO-0M for submit@debbugs.gnu.org; Sat, 27 Aug 2022 10:29:17 -0400 Original-Received: from quimby.gnus.org ([95.216.78.240]:55434) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1oRwoE-0005V8-9u for 50629@debbugs.gnu.org; Sat, 27 Aug 2022 10:29:15 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnus.org; s=20200322; h=Content-Transfer-Encoding:Content-Type:MIME-Version:Message-ID :Date:References:In-Reply-To:Subject:Cc:To:From:Sender:Reply-To:Content-ID: Content-Description:Resent-Date:Resent-From:Resent-Sender:Resent-To:Resent-Cc :Resent-Message-ID:List-Id:List-Help:List-Unsubscribe:List-Subscribe: List-Post:List-Owner:List-Archive; bh=KxgZQ5LOgg+EIB0vNtTS+6Ds0wy6ZOZIb+NIMr8mitg=; b=cV7PV9A0u3F0/+ZEA8MeHby4yn FNUjN3nEUiPkQb7Wh1JkqR33kflnh0f92Mf5DZfrtLtlKU2xbiqFyYq8jQylno8pal+oM2Yy17fS/ AyCELdzHYbQZHa4B2yQw7RCCSGg0teH9waxAXgSFQInzElTzyfg5VmDjY+OY2x1XqMi4=; Original-Received: from [84.212.220.105] (helo=joga) by quimby.gnus.org with esmtpsa (TLS1.3:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1oRwo4-0003Ro-Nz; Sat, 27 Aug 2022 16:29:06 +0200 In-Reply-To: ("Gerd =?UTF-8?Q?M=C3=B6llmann?="'s message of "Sat, 27 Aug 2022 16:06:14 +0200") Face: iVBORw0KGgoAAAANSUhEUgAAADAAAAAwAgMAAAAqbBEUAAAABGdBTUEAALGPC/xhBQAAACBj SFJNAAB6JgAAgIQAAPoAAACA6AAAdTAAAOpgAAA6mAAAF3CculE8AAAACVBMVEVaUk7g2c/////b GQZfAAAAAWJLR0QCZgt8ZAAAAAd0SU1FB+YIGw4cG90tcNsAAAEZSURBVCjPRVHRisAwCLPQvncw /6fC+V5B//9XLtrubrCOLLHRSJM5wqIe2ufLBeSCJGng2C1GMcXvUBxER+XjAgcwu8BauAMVWMQe V+aPHNuVoHWF7oIXXhpHZj2Njyl+9BY8nAvIfHCLaoE2R0gSANaWhsoBuy3GBLiRcfV+I3IqBxPU Yr38lCw7aZaU1jzOYse0Bo2i6Ebj+wP5vPyfGybIdMZJJMXE64Js9Cer7LwkfFL3GULzuwBu9Kb4 iWH+OA32Q2QNa1nUgijrsZKf06iHrzWkTDtliAKg2NzUxuatYXTSMEWZ+LBacKYO3JPBOQC8IyqG WFIZg9LGdnWrNSnv7AOm2ZnKtx/Ubp/8lxv2oV9vbBoV0i91tJoJh+Nc6gAAACV0RVh0ZGF0ZTpj cmVhdGUAMjAyMi0wOC0yN1QxNDoyODoyNiswMDowMDVQmtcAAAAldEVYdGRhdGU6bW9kaWZ5ADIw MjItMDgtMjdUMTQ6Mjg6MjYrMDA6MDBEDSJrAAAAAElFTkSuQmCC X-Now-Playing: Stereolab's _Switched On Vol. 4: Electrically Possessed (2)_: "Variation One" X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list 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-mx.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.io gmane.emacs.bugs:240927 Archived-At: Gerd M=C3=B6llmann writes: > That's what I meant with macrology. Please macroexpand and look at > what's actually executed. This is what macroexpand-all says is executed: (progn (ert-set-test 'f (record 'ert-test 'f nil #'(lambda () (defalias 'foo #'(lambda () (bar))) (defalias 'bar #'(lambda () (zot))) (let* ((fn-573 #'equal) (args-574 (condition-case err (let ( foo) (list 42 (foo))) (error (progn (setq fn-573 #'signal) (list (car err) (cdr err))))))) (let ((value-575 'ert-form-evaluation-aborted-576)) (let ( form-description-577) (if (unwind-protect (setq value-575 (apply fn-573 args-574)) (setq form-description-577 (nconc (list '(should (equal 42 (foo)))) (list :form (cons fn-573 args-574)) (if (eql value-575 'ert-form-evaluation-aborted-576) () (list :value value-575)) (if (eql value-575 'ert-form-evaluation-aborted-576) () (let* ((-explainer- (and t (ert--get-explainer 'equal)))) (if -explainer- (list :explanation (apply -explainer- args-574)) nil))))) (ert--signal-should-execution form-description-577)) () (ert-fail form-description-577))) value-575))) nil ':passed 'nil nil)) 'f) The foo->bar->zot calling sequence is preserved.