diff options
-rw-r--r-- | libguile/guardians.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/guardians.c b/libguile/guardians.c index b85ec0284..a341fbfdc 100644 --- a/libguile/guardians.c +++ b/libguile/guardians.c @@ -77,7 +77,7 @@ typedef struct t_guardian } t_guardian; #define GUARDIAN_P(x) SCM_SMOB_PREDICATE(tc16_guardian, x) -#define GUARDIAN_DATA(x) ((t_guardian *) SCM_CELL_WORD_1 (x)) +#define GUARDIAN_DATA(x) ((t_guardian *) SCM_SMOB_DATA_1 (x)) |