From unknown Sat Sep 13 17:34:42 2025 X-Loop: help-debbugs@gnu.org Subject: bug#72378: srfi-64: top-level test-group does not work Resent-From: Tomas Volf <~@wolfsden.cz> Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Tue, 30 Jul 2024 19:53:13 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 72378 X-GNU-PR-Package: guile X-GNU-PR-Keywords: To: 72378@debbugs.gnu.org X-Debbugs-Original-To: bug-guile@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.172236916825323 (code B ref -1); Tue, 30 Jul 2024 19:53:13 +0000 Received: (at submit) by debbugs.gnu.org; 30 Jul 2024 19:52:48 +0000 Received: from localhost ([127.0.0.1]:48510 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1sYsts-0006aH-0E for submit@debbugs.gnu.org; Tue, 30 Jul 2024 15:52:48 -0400 Received: from lists.gnu.org ([209.51.188.17]:45500) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <~@wolfsden.cz>) id 1sYstZ-0006Yo-C0 for submit@debbugs.gnu.org; Tue, 30 Jul 2024 15:52:30 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from <~@wolfsden.cz>) id 1sYstK-0004vs-Id for bug-guile@gnu.org; Tue, 30 Jul 2024 15:52:14 -0400 Received: from wolfsden.cz ([37.205.8.62]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from <~@wolfsden.cz>) id 1sYstI-0006sa-UJ for bug-guile@gnu.org; Tue, 30 Jul 2024 15:52:14 -0400 Received: by wolfsden.cz (Postfix, from userid 104) id 32ABB2936DB; Tue, 30 Jul 2024 19:51:59 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=wolfsden.cz; s=mail; t=1722369119; bh=e1IXl8VqLp0H827Urp3Cn31dg/s1Ahkg52jbQ7RQbUQ=; h=Date:From:To:Subject; b=mqmHME3GfPtbMCHGrcS3FC7Zwm8HChJQAPzMxmbQsDIM0VS3n/J/sFntgIc2tZVXY WVKmiypwshSSiN+9T5s6w7CRW9Njnl2zul22b7PO7jT7iHjwUD/o9niK0fpSAx2V69 0zb4Wf8UaJQ2gA1Uw/QK0RJPWTxnGkftFX9pNApUrLQpKlF6FkEk6UD791kS0ajGnJ hgspIqmk+LZvJW8U8WzL+pU9rfRGbJAKKNynLFWwItEpdsR0KyN4PndUAX84D6adHf 2RWizUE5jn93Yt4hSBT3NVdIfuVcJaKIv7bScF1QNXV4+f1m0aYF346/6n0gmCr8sM pSkD+BTJq0dYhLktxa0kytjtTV21mG8kPdKkg1TOiP9Y+kvJoUt7qkJAhNnyIgGD0a sl1M5Gg0zD7+XSmFvATsYyy6zgU3scTudbbiy4VO/OKuxdneYucGwN6iv3+1H/lic4 h3I8akmbiGX9u+8G34NkqaMB2zOoe78Bv8s0xPTrgbq6o9YOYAU6/mfmwzH1UW5Hcg dman+uMfMDttwO7uTcJTS1PVSJekAObndVktcXcYsz8422z4Fu0B9mSndQUqxCIazE 2HsK+QvxIHv4oVTNx7nB5qWEBJPuq28o2DFicVl+19CtUEPkUurnGx54cdeSCDbwud T0oefCxllrv0Kul7c6nLYtKc= X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on wolfsden X-Spam-Level: X-Spam-Status: No, score=-1.2 required=5.0 tests=ALL_TRUSTED,DKIM_SIGNED, DKIM_VALID,DKIM_VALID_AU,DKIM_VALID_EF,URIBL_BLOCKED autolearn=unavailable autolearn_force=no version=3.4.6 Received: from localhost (unknown [128.0.188.242]) by wolfsden.cz (Postfix) with ESMTPSA id DCEC8293598 for ; Tue, 30 Jul 2024 19:51:58 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=wolfsden.cz; s=mail; t=1722369118; bh=e1IXl8VqLp0H827Urp3Cn31dg/s1Ahkg52jbQ7RQbUQ=; h=Date:From:To:Subject; b=LcAa4p24xAsm1bhS3jmYpJDyXXqQ6C8HS4a5fG6tLLPAchd1SpSpQ1SevxVHxN20J VuMjAaDRPV0Fvo9FEOTF8dOo7I2jnYwfn/x25Map+pJwJZUctFQpq+ddnf5p7ZrviL a/25y+3ffti5gUfRL+cNgQEemVVFdmsKLSG2xU8PUHfokDktKEkK7KR1098R2AyCwF ZcEoXbKCaax4oF4HK+2tgueZsQ3d7+gtRO2Wpdt8SzTSvXTByTw//hrRT97rk6Rq+m 2ShYziFaQ89I8E2GSvI3t15qxANjWraDo2RLIyGWqIBa8WkcCwoaLrcXJEHeEg3wtz mqGzEIhC9Rxo3V3NjxwHYttH84ia2l1xI8zwq0Z6qC9Sg29Md90PhvVlP1qR4iF2lU VlHu7kNMt4b2Auw0MAgIlQQlBN1TWPyuHzPPR8G6UJws7fSXRLXds5yKvCFFcZGcfW QpU02agRWD/kcr2n1InBvnMMLCXnieR1d+oMI+Z5Ml1nqtVARV3BRe+2Wb3jFyEqhx Omw1OLKRBo23Lu+yYhyU2ZJGf6shF0QvA6kDO6Qc8Gus58zQ26zKJZmBwJWOc8CfGP 2nXJX7GeHEw/1czW43J4TV3PrX30GO7fbCOzDLGFJ0Q5HxgTo1ncgpgxOTzWlsLsNo JDrdPvEQ+raEU98lD0hpHQZk= Date: Tue, 30 Jul 2024 21:51:58 +0200 From: Tomas Volf <~@wolfsden.cz> Message-ID: MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline Received-SPF: pass client-ip=37.205.8.62; envelope-from=~@wolfsden.cz; helo=wolfsden.cz X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 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, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-Spam-Score: -1.3 (-) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -2.3 (--) Hello, I think I found a bug in (srfi srfi-64) module shipped with GNU Guile. The test-group is defined as equivalent to: (if (not (test-to-skip% suite-name)) (dynamic-wind (lambda () (test-begin suite-name)) (lambda () decl-or-expr ...) (lambda () (test-end suite-name)))) `test-to-skip%' is not defined anywhere (great), however in the text we have this sentence: > However, the entire group is skipped if it matched an active test-skip Since active skip list is mandated to be a property of test runner, in case the test runner does not exist yet, there cannot be active skip list. Hence the group should run. However: (use-modules (srfi srfi-64)) (test-group "x" #t) Leads to: Backtrace: In ice-9/boot-9.scm: 1752:10 6 (with-exception-handler _ _ #:unwind? _ #:unwind-for-type _) In unknown file: 5 (apply-smob/0 #) In ice-9/boot-9.scm: 724:2 4 (call-with-prompt _ _ #) In ice-9/eval.scm: 619:8 3 (_ #(#(#))) In ice-9/boot-9.scm: 2836:4 2 (save-module-excursion _) 4388:12 1 (_) In /home/wolf/src/guile-wolfsden/tests/srfi-64/test-group-top-level.srfi64test: 8:0 0 (_) /home/wolf/src/guile-wolfsden/tests/srfi-64/test-group-top-level.srfi64test:8:0: In procedure struct-vtable: Wrong type argument in position 1 (expecting struct): #f Have a nice day Tomas Volf From unknown Sat Sep 13 17:34:42 2025 X-Loop: help-debbugs@gnu.org Subject: bug#72378: srfi-64: top-level test-group does not work Resent-From: Taylan Kammer Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Tue, 01 Oct 2024 22:27:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 72378 X-GNU-PR-Package: guile X-GNU-PR-Keywords: To: Tomas Volf <~@wolfsden.cz>, 72378@debbugs.gnu.org Received: via spool by 72378-submit@debbugs.gnu.org id=B72378.172782160923468 (code B ref 72378); Tue, 01 Oct 2024 22:27:02 +0000 Received: (at 72378) by debbugs.gnu.org; 1 Oct 2024 22:26:49 +0000 Received: from localhost ([127.0.0.1]:54075 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1svlKT-00066S-1Z for submit@debbugs.gnu.org; Tue, 01 Oct 2024 18:26:49 -0400 Received: from mail-wm1-f46.google.com ([209.85.128.46]:41174) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1svlKS-00066F-1C for 72378@debbugs.gnu.org; Tue, 01 Oct 2024 18:26:48 -0400 Received: by mail-wm1-f46.google.com with SMTP id 5b1f17b1804b1-42cb1866c00so7885475e9.0 for <72378@debbugs.gnu.org>; Tue, 01 Oct 2024 15:26:48 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20230601; t=1727821542; x=1728426342; darn=debbugs.gnu.org; h=content-transfer-encoding:in-reply-to:from:content-language :references:to:subject:user-agent:mime-version:date:message-id:from :to:cc:subject:date:message-id:reply-to; bh=CkCpr4Q+NMV7ydnx92XVUEHApQVZlo8V0/rKThXs2CU=; b=WxEs9fpY+E94xa7rCHIuyfq8c+7MPteuVfmvSrmvje8rA/kBPoGlesMGiFMX2kCYh9 whZ/oifkQSS0/GRFZa1NhMwLAJoXgqhwC4zmKY26bHmxAjLYruKdM/0prJGgvpEfNei3 yIGQ7AQFU8XPIoT3iJPHoWXlGtiJ1yYvvYmwtKMfhUjwGiK7CAksNlOIj1wr3Jr4dCaf FMkWSbci8sBqiAqPQZ3OFkKwRdYD9GHsrVzyh4h8Vi7piucQCANLvxmx1PAqjbiB1X/n uJbsl8+reCCQ9Cr8+HxImryn6Hn0+SYyGYiB8D4rckvxCloZTw+BTdNRGlrcxxRf27ao H5Cg== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20230601; t=1727821542; x=1728426342; h=content-transfer-encoding:in-reply-to:from:content-language :references:to:subject:user-agent:mime-version:date:message-id :x-gm-message-state:from:to:cc:subject:date:message-id:reply-to; bh=CkCpr4Q+NMV7ydnx92XVUEHApQVZlo8V0/rKThXs2CU=; b=bTOBYVdtMlMF6cYkva0MDQLiK1/drjmkAxFRbg2ibrH9MNc+yNk2Qtj4nUP8cMufSA RKWRgh4WjmNXq18FligPvrpDheL2W4s1OGB4ZJkNKY9aN62CVUwamZmH2NbnCH2vn9jx mpyyFCG6K/gDrDPoIFehD0yYf9BKIP4Pf5LlhA2qHLRMMcE9z0JTtHP8nifVs345O10a dPwQrL2HSOHM85EMfvo1SBgEkvpZyMsYzcJ6F2mY9LEIzTYTCd/Jnr3L3FGa0xKISq8q vx8TXYnnJ+B4kNhnfajIVLAj2HBqzgGJV1+txu+wx3GMKkRIbCAS4dhNIobgz1RRXEmx Cwkg== X-Forwarded-Encrypted: i=1; AJvYcCUmFSW9I/ZzrlVVOgcUBQQlloj5CQupLh4pU9dDEk69l8vlLrsCyn4ZB5IdB+u7txTk+BdUUA==@debbugs.gnu.org X-Gm-Message-State: AOJu0Yy7skR/94/2f0rAY6QEaVAeeDG4ZhHUZSBesML2kgDoUkTX53Kd s+zy5Nc1JgwhznlVHs0Wy4LFS8BcC3kICmnbpAveKfCO8SvN7bAv8pxM70X+ X-Google-Smtp-Source: AGHT+IHfNod6KRDnmNcB9YKc8ZSbjUC6l3m30MXwocprcMRVEw80uEOt4Oqpf6/GI1OKwaV605eLGQ== X-Received: by 2002:a05:600c:1884:b0:42c:aeee:d8ee with SMTP id 5b1f17b1804b1-42f77951d97mr3295185e9.8.1727821542458; Tue, 01 Oct 2024 15:25:42 -0700 (PDT) Received: from ?IPV6:2003:106:8f04:c300:95ac:529d:6db3:196b? (p200301068f04c30095ac529d6db3196b.dip0.t-ipconnect.de. [2003:106:8f04:c300:95ac:529d:6db3:196b]) by smtp.gmail.com with ESMTPSA id ffacd0b85a97d-37cd564d01esm12872709f8f.3.2024.10.01.15.25.41 (version=TLS1_3 cipher=TLS_AES_128_GCM_SHA256 bits=128/128); Tue, 01 Oct 2024 15:25:42 -0700 (PDT) Message-ID: Date: Wed, 2 Oct 2024 00:25:40 +0200 MIME-Version: 1.0 User-Agent: Mozilla Thunderbird References: Content-Language: en-US From: Taylan Kammer In-Reply-To: Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 7bit X-Spam-Score: 0.0 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) On 30.07.2024 21:51, Tomas Volf wrote: > Hello, > > I think I found a bug in (srfi srfi-64) module shipped with GNU Guile. > > The test-group is defined as equivalent to: > > (if (not (test-to-skip% suite-name)) > (dynamic-wind > (lambda () (test-begin suite-name)) > (lambda () decl-or-expr ...) > (lambda () (test-end suite-name)))) > > `test-to-skip%' is not defined anywhere (great), however in the text we have > this sentence: > >> However, the entire group is skipped if it matched an active test-skip > Since active skip list is mandated to be a property of test runner, in case the > test runner does not exist yet, there cannot be active skip list. Hence the > group should run. However: > > (use-modules (srfi srfi-64)) > (test-group "x" > #t) > > Leads to: > > Backtrace: > In ice-9/boot-9.scm: > 1752:10 6 (with-exception-handler _ _ #:unwind? _ #:unwind-for-type _) > In unknown file: > 5 (apply-smob/0 #) > In ice-9/boot-9.scm: > 724:2 4 (call-with-prompt _ _ #) > In ice-9/eval.scm: > 619:8 3 (_ #(#(#))) > In ice-9/boot-9.scm: > 2836:4 2 (save-module-excursion _) > 4388:12 1 (_) > In /home/wolf/src/guile-wolfsden/tests/srfi-64/test-group-top-level.srfi64test: > 8:0 0 (_) > > /home/wolf/src/guile-wolfsden/tests/srfi-64/test-group-top-level.srfi64test:8:0: In procedure struct-vtable: Wrong type argument in position 1 (expecting struct): #f > > Have a nice day > Tomas Volf > > I don't know how to fix this in the reference implementation that Guile uses, and don't care to find out because (as you seem to have noticed) the implementation is somewhat over-complicated in many parts. But in any case, my implementation isn't affected by this bug, and your example works as intended with it. - Taylan From debbugs-submit-bounces@debbugs.gnu.org Mon Oct 21 16:29:14 2024 Received: (at control) by debbugs.gnu.org; 21 Oct 2024 20:29:15 +0000 Received: from localhost ([127.0.0.1]:53517 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1t2z1e-0004Wk-J6 for submit@debbugs.gnu.org; Mon, 21 Oct 2024 16:29:14 -0400 Received: from wolfsden.cz ([37.205.8.62]:40732) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <~@wolfsden.cz>) id 1t2z1c-0004WU-M2 for control@debbugs.gnu.org; Mon, 21 Oct 2024 16:29:13 -0400 Received: by wolfsden.cz (Postfix, from userid 104) id 2999C3312BB; Mon, 21 Oct 2024 20:28:45 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=wolfsden.cz; s=mail; t=1729542525; bh=A5F4s26amvmr9fmoK57ZDFNcG8qB0eU67++FnWBdSJw=; h=Date:To:From:Subject; b=PuAH8Q8pJ+FNmFD4s0ODh03IrOgVGyRAu1aQtv0asAT8GwLv6pnV9Jq1d5NQJJ42Q msj4dlVtyZ/XtY0pz5ABlGd4JqrrSw378TZFPczGhw7stYjfq+TJbLJPq0WUNFNc/W SykxLE9K7Ro4b56mDoEbwvG1w+kEvQz/JZzwdx0R8WpQxKpYOHKa6G0kERmaJN/ktD l1lyprpf+vaaOUFG+BhT2btz5xeuNhxBPP5UJ+ziBV3Pok2LgMO4PIH897b3pepkZ7 bWZSbk5l4kH0TKbJuLsvsMRW9b7Y0oFwVxYrV/4lIt/H3b1Zvrhxc9pUK94IcepjRs ikS3A8s32CSXzwZnpaKk16A7vn3vI39c9+8QfZbHVdT/AqkkZWU6zJhu6Idtmk2ZH/ cdBwuhc+bLTS/FuIWY1uewNvJxAcI21EseR8VjG7Z+Cumyz9ZMRZUXYRbfevtquTXq zPl0mfj6B5aABBjguvgDY3TrS6aM5tFSyPl2zrrIrnzMSOgilns20bCZBa4I05EmD8 Bza0fec6BEc65YsmU/IklVokjExziyOzXjv+HrnuXkRryVn+YnR6CzuulYVtY0gXyq na15TF3YBiQdZy5CVbtpldL/u21s2PlNF/CC7pZEEg2ZN3a7pvw9EdqXP3wKahp275 Qvi4nX7kPwJ2S5LHnaxDIIgA= X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on wolfsden X-Spam-Level: X-Spam-Status: No, score=-3.1 required=5.0 tests=ALL_TRUSTED,BAYES_00, DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,DKIM_VALID_EF,URIBL_BLOCKED autolearn=ham autolearn_force=no version=3.4.6 Received: from localhost (unknown [193.32.127.157]) by wolfsden.cz (Postfix) with ESMTPSA id AD5FB330B5E for ; Mon, 21 Oct 2024 20:28:44 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=wolfsden.cz; s=mail; t=1729542524; bh=A5F4s26amvmr9fmoK57ZDFNcG8qB0eU67++FnWBdSJw=; h=Date:To:From:Subject; b=uIFwvTCEXqQrBb8umCbxC2wrREgAcFLNDrnf+aGIB0FgUsiUDxAaWgwupGOENwPWe +dqyhSdJAbMBBFHtLYME9PMIXpzXXloeL5juicuZQfyixaIJBvO8Ba6hCSK6axky2z sjn5i19vD6GSrccHZ2OageXLcCoGytnJoQ43tHaYh8PN8ARlT4ToDAu2CeRPehXt9t qVSJMGIa7cf/6lsA/0k94IVIknt5vJJw8oPkMXVGJqc4NkEkme9+MqGiuXuUUBD3sM dPwrApIWAHpVUOraGSM7Vf/1ymVxE0vNVa+NaxcmIuaX2/NP1QGdflFEDa0UQ8zcBk aP97g/NLNrUpp8W/r8e8yIxyt5fDPe+CWaHFIOo44gBm/4+qx9akV4hdzveBmOTyYp Hci8GmVEewJlP2oQadHB9XC9WHLvy9dskPfdM9Q5kilpRkYxh3zC5bl+2D4EoWdsDo 84qrf0OjGh4Xw54WMQ4E+unQnY7DcPZTFG6fzd4EGAIYR5HsC/eA9p0hm2bZafGVZL q9ILWV5+ny4ok2FVaErHXI2wBkpE6YyRfndBBXVQHq+We3Jig8wyTO0FgwKCk+SebV Jl0IalpgCN71SXPL+BAvYIxxwOMk4DEcLB7JF9ghJxUXq494C9DLD5p81SiyPRgXBe qH40sKTKe1rwQ3CDGNpKcwjo= Date: Mon, 21 Oct 2024 22:28:43 +0200 Message-ID: To: control@debbugs.gnu.org From: Tomas Volf <~@wolfsden.cz> Subject: control message for bug #72378 X-Spam-Score: 0.0 (/) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) close 72378 quit