From 9557ecc6620c83a9254649e63248ce997d749cde Mon Sep 17 00:00:00 2001 From: Andy Wingo Date: Sun, 26 Jul 2009 11:21:18 +0200 Subject: [PATCH] fix unused SCM_FRAME_SET_DYNAMIC_LINK macro * libguile/frames.h (SCM_FRAME_SET_DYNAMIC_LINK): Fix for new stack layout, though this macro is not used. --- libguile/frames.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/libguile/frames.h b/libguile/frames.h index 1d8a30f8e..1b3153a3e 100644 --- a/libguile/frames.h +++ b/libguile/frames.h @@ -63,7 +63,7 @@ #define SCM_FRAME_DYNAMIC_LINK(fp) \ (SCM_FRAME_STACK_CAST (SCM_FRAME_DATA_ADDRESS (fp)[0])) #define SCM_FRAME_SET_DYNAMIC_LINK(fp, dl) \ - ((SCM_FRAME_DATA_ADDRESS (fp)[1])) = (SCM)(dl); + ((SCM_FRAME_DATA_ADDRESS (fp)[0])) = (SCM)(dl); #define SCM_FRAME_VARIABLE(fp,i) fp[i] #define SCM_FRAME_PROGRAM(fp) fp[-1]