diff options
author | Andy Wingo <wingo@pobox.com> | 2009-07-26 11:21:18 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-07-26 11:21:18 +0200 |
commit | 9557ecc6620c83a9254649e63248ce997d749cde (patch) | |
tree | a60cf02ded93d87baf6b6041fd7d9b5091e0461f /libguile/frames.h | |
parent | cb8ab66c6657a61797399e5f63c7942ae7cd20e3 (diff) | |
download | guile-9557ecc6620c83a9254649e63248ce997d749cde.tar.gz |
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.
Diffstat (limited to 'libguile/frames.h')
-rw-r--r-- | libguile/frames.h | 2 |
1 files changed, 1 insertions, 1 deletions
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] |