[Guile-commits] 06/06: Fix build on platforms where the stack grows upwards.

[Ludovic Court�]

civodul pushed a commit to branch stable-2.2
in repository guile.

commit 51a52cd6c635abee6b742a7d9241eca513a41f96
Author: John Paul Adrian Glaubitz <glaub...@physik.fu-berlin.de>
AuthorDate: Tue Feb 4 13:11:53 2020 +0100

    Fix build on platforms where the stack grows upwards.
    
     * libguile/continuations.c (scm_dynthrow): Fix missing mra
       parameter to grow_stack for SCM_STACK_GROWS_UP.
    
    Signed-off-by: Ludovic Courtès <l...@gnu.org>
---
 libguile/continuations.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libguile/continuations.c b/libguile/continuations.c
index 80914bc..c02598b 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)