klisp

commit 043d7c31f210c895b0047f622eb9fba6de8afeab
parent 6ab2457a0d8bf3ce53b6667ef75e8e654e821dec
Author: Andres Navarro <canavarro82@gmail.com>
Date:   Mon, 23 Apr 2012 19:53:23 -0300

Merged GC bugfix from stable

Diffstat:
M
src/kinteger.c
 | 
2
++

1 file changed, 2 insertions(+), 0 deletions(-)
diff --git a/src/kinteger.c b/src/kinteger.c
@@ -42,8 +42,10 @@ TValue kbigint_new(klisp_State *K, bool sign, uint32_t digit)
 TValue kbigint_copy(klisp_State *K, TValue src)
 {
     TValue copy = kbigint_make_simple(K);
+    krooted_tvs_push(K, copy);
     /* arguments are in reverse order with respect to mp_int_copy */
     UNUSED(mp_int_init_copy(K, tv2bigint(copy), tv2bigint(src)));
+    krooted_tvs_pop(K);
     return copy;
 }