From da60ba8062406cc017ecdd14f0a0bfc65245c449 Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Tue, 5 Nov 2013 19:22:26 +0100 Subject: [PATCH] fix make-long-immediate, make-long-long-immediate for dst >= 256 * libguile/vm-engine.c (make-long-immediate, make-long-long-immediate): Fix declaration of "dst" variable. --- libguile/vm-engine.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c index d0f63fb27..a40352447 100644 --- a/libguile/vm-engine.c +++ b/libguile/vm-engine.c @@ -2020,7 +2020,7 @@ RTL_VM_NAME (SCM vm, SCM program, SCM *argv, size_t nargs_) */ VM_DEFINE_OP (50, make_long_immediate, "make-long-immediate", OP2 (U8_U24, I32)) { - scm_t_uint8 dst; + scm_t_uint32 dst; scm_t_bits val; SCM_UNPACK_RTL_24 (op, dst); @@ -2035,7 +2035,7 @@ RTL_VM_NAME (SCM vm, SCM program, SCM *argv, size_t nargs_) */ VM_DEFINE_OP (51, make_long_long_immediate, "make-long-long-immediate", OP3 (U8_U24, A32, B32) | OP_DST) { - scm_t_uint8 dst; + scm_t_uint32 dst; scm_t_bits val; SCM_UNPACK_RTL_24 (op, dst);