From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.ciao.gmane.io!not-for-mail From: John Paul Adrian Glaubitz Newsgroups: gmane.lisp.guile.devel Subject: [PATCH] Fix build of platforms where the stack grows upwards Date: Tue, 4 Feb 2020 12:26:44 +0100 Message-ID: <20200204112644.3325349-2-glaubitz@physik.fu-berlin.de> References: <20200204112644.3325349-1-glaubitz@physik.fu-berlin.de> Mime-Version: 1.0 Content-Transfer-Encoding: 8bit Injection-Info: ciao.gmane.io; posting-host="ciao.gmane.io:159.69.161.202"; logging-data="61473"; mail-complaints-to="usenet@ciao.gmane.io" Cc: wingo@igalia.com, deller@gmx.de, dave.anglin@bell.net, John Paul Adrian Glaubitz To: guile-devel@gnu.org Original-X-From: guile-devel-bounces+guile-devel=m.gmane-mx.org@gnu.org Tue Feb 04 12:28:34 2020 Return-path: Envelope-to: guile-devel@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 1iywNe-000FtJ-Hd for guile-devel@m.gmane-mx.org; Tue, 04 Feb 2020 12:28:34 +0100 Original-Received: from localhost ([::1]:56602 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iywNd-00068b-Kf for guile-devel@m.gmane-mx.org; Tue, 04 Feb 2020 06:28:33 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:52314) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iywNR-00068P-Rn for guile-devel@gnu.org; Tue, 04 Feb 2020 06:28:22 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1iywNQ-0001La-Sw for guile-devel@gnu.org; Tue, 04 Feb 2020 06:28:21 -0500 Original-Received: from outpost17.zedat.fu-berlin.de ([130.133.4.110]:43449) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1iywNQ-0001Hd-Mm for guile-devel@gnu.org; Tue, 04 Feb 2020 06:28:20 -0500 Original-Received: from relay1.zedat.fu-berlin.de ([130.133.4.67]) by outpost.zedat.fu-berlin.de (Exim 4.85) with esmtps (TLSv1.2:ECDHE-RSA-AES256-GCM-SHA384:256) (envelope-from ) id <1iywNP-0041Rn-Ch>; Tue, 04 Feb 2020 12:28:19 +0100 Original-Received: from z6.physik.fu-berlin.de ([160.45.32.137] helo=z6) by relay1.zedat.fu-berlin.de (Exim 4.85) with esmtps (TLSv1.2:ECDHE-RSA-AES256-GCM-SHA384:256) (envelope-from ) id <1iywNP-0049HM-AK>; Tue, 04 Feb 2020 12:28:19 +0100 Original-Received: from glaubitz by z6 with local (Exim 4.93) (envelope-from ) id 1iywLw-00DxHh-I3; Tue, 04 Feb 2020 12:26:48 +0100 X-Mailer: git-send-email 2.25.0 In-Reply-To: <20200204112644.3325349-1-glaubitz@physik.fu-berlin.de> X-Originating-IP: 160.45.32.137 X-ZEDAT-Hint: RV X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 130.133.4.110 X-BeenThere: guile-devel@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: "Developers list for Guile, the GNU extensibility library" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-devel-bounces+guile-devel=m.gmane-mx.org@gnu.org Original-Sender: "guile-devel" Xref: news.gmane.io gmane.lisp.guile.devel:20381 Archived-At: * libguile/continuations.c (scm_dynthrow): Fix missing mra parameter to grow_stack for SCM_STACK_GROWS_UP. --- libguile/continuations.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/libguile/continuations.c b/libguile/continuations.c index 3f86c6bd4..67a47d38c 100644 --- a/libguile/continuations.c +++ b/libguile/continuations.c @@ -323,7 +323,7 @@ scm_dynthrow (SCM cont, uint8_t *mra) #if SCM_STACK_GROWS_UP if (dst + continuation->num_stack_items >= &stack_top_element) - grow_stack (cont); + grow_stack (cont, mra); #else dst -= continuation->num_stack_items; if (dst <= &stack_top_element) -- 2.25.0