From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.ciao.gmane.io!not-for-mail From: Andy Wingo Newsgroups: gmane.lisp.guile.bugs Subject: bug#39811: Missing dynwind exit application Date: Tue, 03 Mar 2020 21:33:47 +0100 Message-ID: <87r1y918lw.fsf@igalia.com> References: Mime-Version: 1.0 Content-Type: text/plain Injection-Info: ciao.gmane.io; posting-host="ciao.gmane.io:159.69.161.202"; logging-data="36807"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.3 (gnu/linux) Cc: 39811-close@debbugs.gnu.org To: Stefan Israelsson Tampe Original-X-From: bug-guile-bounces+guile-bugs=m.gmane-mx.org@gnu.org Tue Mar 03 21:35:11 2020 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 1j9EFx-0009RL-Dt for guile-bugs@m.gmane-mx.org; Tue, 03 Mar 2020 21:35:09 +0100 Original-Received: from localhost ([::1]:53472 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1j9EFv-0002nE-Vk for guile-bugs@m.gmane-mx.org; Tue, 03 Mar 2020 15:35:08 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:45667) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1j9EFr-0002mx-8C for bug-guile@gnu.org; Tue, 03 Mar 2020 15:35:04 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1j9EFq-0000eo-9V for bug-guile@gnu.org; Tue, 03 Mar 2020 15:35:03 -0500 Original-Received: from debbugs.gnu.org ([209.51.188.43]:34060) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1j9EFq-0000ek-6B for bug-guile@gnu.org; Tue, 03 Mar 2020 15:35:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1j9EFq-0000Si-3Z for bug-guile@gnu.org; Tue, 03 Mar 2020 15:35:02 -0500 Resent-From: Andy Wingo Original-Sender: "Debbugs-submit" Resent-To: bug-guile@gnu.org Resent-Date: Tue, 03 Mar 2020 20:35:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: cc-closed 39811 X-GNU-PR-Package: guile Mail-Followup-To: 39811@debbugs.gnu.org, wingo@igalia.com, stefan.itampe@gmail.com Original-Received: via spool by 39811-done@debbugs.gnu.org id=D39811.15832676461693 (code D ref 39811); Tue, 03 Mar 2020 20:35:01 +0000 Original-Received: (at 39811-close) by debbugs.gnu.org; 3 Mar 2020 20:34:06 +0000 Original-Received: from localhost ([127.0.0.1]:40033 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1j9EEw-0000RE-6D for submit@debbugs.gnu.org; Tue, 03 Mar 2020 15:34:06 -0500 Original-Received: from fanzine.igalia.com ([178.60.130.6]:55044) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1j9EEu-0000Qg-Pg for 39811-close@debbugs.gnu.org; Tue, 03 Mar 2020 15:34:05 -0500 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=igalia.com; s=20170329; h=Content-Type:MIME-Version:Message-ID:In-Reply-To:Date:References:Subject:Cc:To:From; bh=b1It8JmMqZFXURj0q19eKIBM8tJKqEMKqH594XFlVpk=; b=JA/pzeyjrj+vf4pUtvHxr707+xQhONPZfxFZ0HDmw7UNYsvO8t5olkxXyPTvwFRnRZ3uTYEE3AIZxG0rTZTvtzln8G00/2V24ZB/LpC8EG5y3ZjsOP4W6KcYifWsR1Ll9hOJ1I1saG8Z/gE52pHoeItJR8dKLvOiLmVi4UbLEXXnStjvjcpIZnRvJnfkWYQB7jZt6S/L1HJr2DBux8FOxQonrSzpdXc0TZuepsc0/xbW8CqNJ8kwmqRVb8BF3F2KO6d38iI2NrplXAtm1mTWlJZ5w79wb98J8HRW0N0MEWi4SD0bm0e5MgBy58p258Wz9wxP9SE3VFGPMpqiof8cLw==; Original-Received: from [88.123.12.110] (helo=sparrow) by fanzine.igalia.com with esmtpsa (Cipher TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim) id 1j9EEo-0008Dy-3a; Tue, 03 Mar 2020 21:33:58 +0100 In-Reply-To: (Stefan Israelsson Tampe's message of "Thu, 27 Feb 2020 19:59:25 +0100") X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 209.51.188.43 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" Xref: news.gmane.io gmane.lisp.guile.bugs:9607 Archived-At: Stefan Israelsson Tampe writes: > Executing this code on guile-3.0.0: > > (dynamic-wind > (lambda () (pk 'enter)) > (lambda () (catch #t > (lambda () (throw 1)) > (lambda x (pk 'catch x) (apply throw x)))) > (lambda () (pk 'leave))) > > Leads to the output: > > scheme@(guile-user)> (load "bug.scm") > ;;; (enter) > ;;; (catch (a)) > > ice-9/boot-9.scm:1669:16: In procedure raise-exception: > Throw to key `a' with args `()'. > > What, it does not execute the leave part of the dynamic wind. That is because the REPL leaves you in the context of where the uncaught error was thrown. If you ,quit the REPL to go back to the outer REPL, it will print "leave" as expected. Please reopen if I have misunderstood :) Cheers, Andy