From 51a52cd6c635abee6b742a7d9241eca513a41f96 Mon Sep 17 00:00:00 2001 From: John Paul Adrian Glaubitz Date: Tue, 4 Feb 2020 13:11:53 +0100 Subject: Fix build on platforms where the stack grows upwards. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * libguile/continuations.c (scm_dynthrow): Fix missing mra parameter to grow_stack for SCM_STACK_GROWS_UP. Signed-off-by: Ludovic Courtès --- libguile/continuations.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/libguile/continuations.c b/libguile/continuations.c index 80914bc04..c02598bf0 100644 --- a/libguile/continuations.c +++ b/libguile/continuations.c @@ -302,7 +302,7 @@ scm_dynthrow (SCM cont) #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) -- cgit v1.2.3