From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Taylan Kammer Newsgroups: gmane.lisp.guile.bugs Subject: bug#72378: srfi-64: top-level test-group does not work Date: Wed, 2 Oct 2024 00:25:40 +0200 Message-ID: References: Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 7bit Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="823"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Mozilla Thunderbird To: Tomas Volf <~@wolfsden.cz>, 72378@debbugs.gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Wed Oct 02 00:27:18 2024 Return-path: Envelope-to: guile-bugs@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 1svlKv-000Abf-L2 for guile-bugs@m.gmane-mx.org; Wed, 02 Oct 2024 00:27:17 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1svlKi-00033G-Gl; Tue, 01 Oct 2024 18:27:04 -0400 Original-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 ) id 1svlKh-000335-BK for bug-guile@gnu.org; Tue, 01 Oct 2024 18:27:03 -0400 Original-Received: from debbugs.gnu.org ([2001:470:142:5::43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1svlKh-000469-3J for bug-guile@gnu.org; Tue, 01 Oct 2024 18:27:03 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=debbugs.gnu.org; s=debbugs-gnu-org; h=In-Reply-To:From:References:MIME-Version:Date:To:Subject; bh=CkCpr4Q+NMV7ydnx92XVUEHApQVZlo8V0/rKThXs2CU=; b=UsGXegk5/rl9djUgvEJHjdWMisEpw7QuDwEOc0yUxiP7lSHxCCdx97JZec3FjAHq0+vIPp1mJpRy/dctiCn/jEIGWmqeKTS4MZ0XEndf+/MGEUAmOPqK0Z6CwpMGRfOzxg5y5cUoHB51vowyXs86t3L0NxxOSSOa9v0lKzpXO+P+nzIfhD3kx+K4We7xja9M/smfTON5iX6bMnJAUG6kYVRWL9UJ0e57atKaBZvRl7pb/Gy8FeqMig13As4o3ao/I9DEpcp03GsgCNsz90xa+99LCOudswiD0F5LpiBxWCjedHBfZVTv5gjSXopWg4+jn7aP3sbZ8P58QS++wkccYw==; Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1svlKg-00066n-Ke for bug-guile@gnu.org; Tue, 01 Oct 2024 18:27:02 -0400 X-Loop: help-debbugs@gnu.org 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 Original-Received: via spool by 72378-submit@debbugs.gnu.org id=B72378.172782160923468 (code B ref 72378); Tue, 01 Oct 2024 22:27:02 +0000 Original-Received: (at 72378) by debbugs.gnu.org; 1 Oct 2024 22:26:49 +0000 Original-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 Original-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 Original-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) Original-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) Content-Language: en-US In-Reply-To: X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-guile@gnu.org List-Id: "Bug reports for GUILE, GNU's Ubiquitous Extension Language" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Original-Sender: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.lisp.guile.bugs:11009 Archived-At: 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