From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Olivier Dion via "Bug reports for GUILE, GNU's Ubiquitous Extension Language" Newsgroups: gmane.lisp.guile.bugs Subject: bug#59055: [PATCH] Fix possible deadlock. Date: Sun, 20 Nov 2022 13:33:56 -0500 Message-ID: <874jutqxuz.fsf@laura> References: <20221105165923.5426-1-olivier.dion@polymtl.ca> <87wn7p5yt0.fsf@gnu.org> Reply-To: Olivier Dion 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="23731"; mail-complaints-to="usenet@ciao.gmane.io" Cc: 59055-done@debbugs.gnu.org To: Ludovic =?UTF-8?Q?Court=C3=A8s?= Original-X-From: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Sun Nov 20 19:35:40 2022 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 1owpAK-0005zg-17 for guile-bugs@m.gmane-mx.org; Sun, 20 Nov 2022 19:35:40 +0100 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1owp9j-0001sV-Vk; Sun, 20 Nov 2022 13:35:04 -0500 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 1owp9i-0001s8-LM for bug-guile@gnu.org; Sun, 20 Nov 2022 13:35:02 -0500 Original-Received: from debbugs.gnu.org ([209.51.188.43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1owp9h-00070G-SH for bug-guile@gnu.org; Sun, 20 Nov 2022 13:35:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1owp9h-0006ac-Nb for bug-guile@gnu.org; Sun, 20 Nov 2022 13:35:01 -0500 X-Loop: help-debbugs@gnu.org Resent-From: Olivier Dion Original-Sender: "Debbugs-submit" Resent-CC: bug-guile@gnu.org Resent-Date: Sun, 20 Nov 2022 18:35:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 59055 X-GNU-PR-Package: guile X-GNU-PR-Keywords: patch Original-Received: via spool by 59055-done@debbugs.gnu.org id=D59055.166896925425271 (code D ref 59055); Sun, 20 Nov 2022 18:35:01 +0000 Original-Received: (at 59055-done) by debbugs.gnu.org; 20 Nov 2022 18:34:14 +0000 Original-Received: from localhost ([127.0.0.1]:44612 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1owp8w-0006ZW-0h for submit@debbugs.gnu.org; Sun, 20 Nov 2022 13:34:14 -0500 Original-Received: from smtp.polymtl.ca ([132.207.4.11]:44345) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1owp8q-0006ZF-0v for 59055-done@debbugs.gnu.org; Sun, 20 Nov 2022 13:34:12 -0500 Original-Received: from localhost (modemcable094.169-200-24.mc.videotron.ca [24.200.169.94]) by smtp.polymtl.ca (8.14.7/8.14.7) with ESMTP id 2AKIXubO010837; Sun, 20 Nov 2022 13:34:01 -0500 DKIM-Filter: OpenDKIM Filter v2.11.0 smtp.polymtl.ca 2AKIXubO010837 In-Reply-To: <87wn7p5yt0.fsf@gnu.org> X-Poly-FromMTA: (modemcable094.169-200-24.mc.videotron.ca [24.200.169.94]) at Sun, 20 Nov 2022 18:33:56 +0000 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:10441 Archived-At: On Sun, 20 Nov 2022, Ludovic Court=C3=A8s wrote: > Did you try to come up with a reproducer? That would be awesome but I > guess it=E2=80=99s hard because you need to trigger EINTR at the right po= int. With a stress test in guile-parallel. Very hard to reproduce indeed. You can also reproduce it with `ice-9 futures` I think. Here's the stress test that I've been using: --8<---------------cut here---------------start------------->8--- (use-modules ((ice-9 futures) #:prefix ice-9:) (srfi srfi-1) (srfi srfi-26)) (define (run-stress-test N future touch) (for-each touch (unfold (cut =3D N <>) (lambda (_) (future (const #t))) 1+ 0))) (run-stress-test 10000000 ice-9:make-future ice-9:touch) --8<---------------cut here---------------end--------------->8--- --=20 Olivier Dion oldiob.dev