summaryrefslogtreecommitdiff
path: root/libguile/vm-engine.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/vm-engine.c')
-rw-r--r--libguile/vm-engine.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c
index e2f8745eb..cf359c969 100644
--- a/libguile/vm-engine.c
+++ b/libguile/vm-engine.c
@@ -628,8 +628,8 @@ VM_NAME (SCM vm, SCM program, SCM *argv, int nargs)
case opcode:
#endif
-#define LOCAL_REF(i) SCM_FRAME_VARIABLE (fp, (i) - 1)
-#define LOCAL_SET(i,o) SCM_FRAME_VARIABLE (fp, (i) - 1) = o
+#define LOCAL_REF(i) SCM_FRAME_VARIABLE ((fp - 1), i)
+#define LOCAL_SET(i,o) SCM_FRAME_VARIABLE ((fp - 1), i) = o
#define VARIABLE_REF(v) SCM_VARIABLE_REF (v)
#define VARIABLE_SET(v,o) SCM_VARIABLE_SET (v, o)