From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Tomas Volf <~@wolfsden.cz> Newsgroups: gmane.lisp.guile.bugs Subject: bug#72367: srfi-64: nested group not counted as one test Date: Tue, 30 Jul 2024 21:51:53 +0200 Message-ID: Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="26071"; mail-complaints-to="usenet@ciao.gmane.io" To: 72367@debbugs.gnu.org Original-X-From: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Tue Jul 30 21:54:00 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 1sYsv0-0006YA-TX for guile-bugs@m.gmane-mx.org; Tue, 30 Jul 2024 21:53:59 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1sYstv-0004zM-JW; Tue, 30 Jul 2024 15:52:51 -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 1sYstt-0004yX-Rb for bug-guile@gnu.org; Tue, 30 Jul 2024 15:52:49 -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 1sYstt-0006xU-I5 for bug-guile@gnu.org; Tue, 30 Jul 2024 15:52:49 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=debbugs.gnu.org; s=debbugs-gnu-org; h=MIME-Version:From:Date:To:Subject; bh=9XRfb0IZHcpVChOuHUs6AAKaJrEoZ4c9YfurOoojjK4=; b=LOUPeXPk+dSjV/S1+lglF79NpdhywOwtS23b0wgKM62t06eYGjNSaXe3MbGzCybtS1PqKH0vaoU1ltDxaayjWTx2/JUvm1rDEQCMli9UUgOgOogzmYbIv1ukAvCb45EZ7IvuXyvl9JfjWQ3NDOSRnvfAz7LwVUnN16UruEqj38VxCr1Zu16ea+PvXrSJtsSY6CIuQjMnlnflwfewfkcBq3aG9HhPlenjgn27L6qW/to2bAP0HOywlL1TWofioV+0UvGAxD3SPnrto4u48jC8IMJ9qxkkSAGf8cqkGhDBCSHw9+nVrkBYs+N0vzsA/nuvW89VF45D7uFYiX6JFrGzSg==; Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1sYsu7-0006c2-V5 for bug-guile@gnu.org; Tue, 30 Jul 2024 15:53:03 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Tomas Volf <~@wolfsden.cz> Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Tue, 30 Jul 2024 19:53:03 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 72367 X-GNU-PR-Package: guile X-Debbugs-Original-To: bug-guile@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.172236913725104 (code B ref -1); Tue, 30 Jul 2024 19:53:03 +0000 Original-Received: (at submit) by debbugs.gnu.org; 30 Jul 2024 19:52:17 +0000 Original-Received: from localhost ([127.0.0.1]:48443 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1sYstM-0006Wj-M0 for submit@debbugs.gnu.org; Tue, 30 Jul 2024 15:52:17 -0400 Original-Received: from lists.gnu.org ([209.51.188.17]:44564) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <~@wolfsden.cz>) id 1sYstL-0006WG-AW for submit@debbugs.gnu.org; Tue, 30 Jul 2024 15:52:15 -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 <~@wolfsden.cz>) id 1sYst6-0004sR-Hn for bug-guile@gnu.org; Tue, 30 Jul 2024 15:52:00 -0400 Original-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 1sYst3-0006qr-Cu for bug-guile@gnu.org; Tue, 30 Jul 2024 15:52:00 -0400 Original-Received: by wolfsden.cz (Postfix, from userid 104) id 926AE28F475; Tue, 30 Jul 2024 19:51:53 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=wolfsden.cz; s=mail; t=1722369113; bh=PRe3xyjTfE9QTqzboUTgAfs0GcTB7Y4B3epyG7Uv69I=; h=Date:From:To:Subject; b=WRcateDRIH3hVEDL1G8cGUxOfq5DIU3AhAPAbeNJzTvy+TkdHeSabQrB7k8faPkRg uwwswiIhApHAFaUq5CbiR+qAbFcPa3S0Ry/PNGFKYfwdib7m8Zn76IaQsFnWNfI2gG Oyo/u7dIHGkTw7ajamZ9c8VVs276FXfHzpxllRE12i5zq7zju9115qrkoM+GnsrrSs Dm2yTidMDMwwDJYwAaQ5LircSt/8S4SVo6+i6Rj+Y7sIHFpLdVkm4Qcjok/c+dRL/t VinH8Npsp2MvjLXFPlMDtbLVvbUwpk8W/fuat/kWBdlHOesPXwVg+0y9MHLuqaG2nK shYQqS+yKbmPyK5h1sR0w0KVawY/8df2VF6y37Cknn1hojJ8tDHaA6tpE+PsDFzUA+ 5I6pXDkQkzueApaVQyB2F68iXncm/G58R5lnHJdNL4uMJ5T0DzDQmVgWz/fLE+0edC QX9adPi2d4ffVlszY6qDGda7nxSHLtEhRPYyZ0KOQ/Dhk0BNBmmDEkunvmL3Qz9YRi MRY+7i90IMYfIO7odAEYsVrdps9gK8Qb63XPhhaw62oLmc0exECLc12eUj34+xeD6v fi1NY6h3BFt/RaA8bACx7K+WJo45O/SGU7u4jlUkkeNwGlXnY4oXxzf1zrIdRZWYMG bo6oBnM5iUD/6BfmVcuOiFQo= Original-Received: from localhost (unknown [128.0.188.242]) by wolfsden.cz (Postfix) with ESMTPSA id 5DBBE293794 for ; Tue, 30 Jul 2024 19:51:53 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=wolfsden.cz; s=mail; t=1722369113; bh=PRe3xyjTfE9QTqzboUTgAfs0GcTB7Y4B3epyG7Uv69I=; h=Date:From:To:Subject; b=WRcateDRIH3hVEDL1G8cGUxOfq5DIU3AhAPAbeNJzTvy+TkdHeSabQrB7k8faPkRg uwwswiIhApHAFaUq5CbiR+qAbFcPa3S0Ry/PNGFKYfwdib7m8Zn76IaQsFnWNfI2gG Oyo/u7dIHGkTw7ajamZ9c8VVs276FXfHzpxllRE12i5zq7zju9115qrkoM+GnsrrSs Dm2yTidMDMwwDJYwAaQ5LircSt/8S4SVo6+i6Rj+Y7sIHFpLdVkm4Qcjok/c+dRL/t VinH8Npsp2MvjLXFPlMDtbLVvbUwpk8W/fuat/kWBdlHOesPXwVg+0y9MHLuqaG2nK shYQqS+yKbmPyK5h1sR0w0KVawY/8df2VF6y37Cknn1hojJ8tDHaA6tpE+PsDFzUA+ 5I6pXDkQkzueApaVQyB2F68iXncm/G58R5lnHJdNL4uMJ5T0DzDQmVgWz/fLE+0edC QX9adPi2d4ffVlszY6qDGda7nxSHLtEhRPYyZ0KOQ/Dhk0BNBmmDEkunvmL3Qz9YRi MRY+7i90IMYfIO7odAEYsVrdps9gK8Qb63XPhhaw62oLmc0exECLc12eUj34+xeD6v fi1NY6h3BFt/RaA8bACx7K+WJo45O/SGU7u4jlUkkeNwGlXnY4oXxzf1zrIdRZWYMG bo6oBnM5iUD/6BfmVcuOiFQo= 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-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:10919 Archived-At: Hello, I think I found a bug in (srfi srfi-64) module shipped with GNU Guile. The specification says the following about the count argument to the test-begin form: > The optional count must match the number of test-cases executed by this > group. (Nested test groups count as a single test case for this count.) Thus I believe that following should *not* call on-bad-count-function. (use-modules (srfi srfi-64)) (let ((r (test-runner-null))) (test-runner-current r) (test-runner-on-bad-count! r (λ (runner actual-count expected-count) (pk (test-runner-group-stack runner)) (pk actual-count expected-count))) (test-begin "x" 1) (test-begin "y" 3) (test-assert #t) (test-assert #t) (test-assert #t) (test-end) (test-end)) However as we can see it does: ;;; (("x")) ;;; (3 1) Have a nice day Tomas Volf