From 542f0b4879cc73ba6afcd1e5116f099e18640b67 Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Sat, 5 Jun 2010 09:01:04 -0700 Subject: [PATCH] Alien address offsets are byte offsets. --- src/microcode/pruxffi.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/microcode/pruxffi.c b/src/microcode/pruxffi.c index ab19b2692..477c46c23 100644 --- a/src/microcode/pruxffi.c +++ b/src/microcode/pruxffi.c @@ -90,7 +90,7 @@ arg_address (int argn) } #define ALIEN_ADDRESS_LOC(type) \ - (((type *) (arg_address (1))) + (UNSIGNED_FIXNUM_ARG (2))) + ((type *)(((char *) (arg_address (1))) + (UNSIGNED_FIXNUM_ARG (2)))) #define ALIEN_ADDRESS_REF(type) (* (ALIEN_ADDRESS_LOC (type))) -- 2.25.1