diff options
Diffstat (limited to 'libguile/root.h')
-rw-r--r-- | libguile/root.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/root.h b/libguile/root.h index 6d0e5d38f..a97cf7536 100644 --- a/libguile/root.h +++ b/libguile/root.h @@ -49,8 +49,8 @@ SCM_API SCM scm_sys_protects[]; SCM_API scm_t_bits scm_tc16_root; -#define SCM_ROOTP(obj) SCM_TYP16_PREDICATE (scm_tc16_root, obj) -#define SCM_ROOT_STATE(root) ((scm_root_state *) SCM_CELL_WORD_1 (root)) +#define SCM_ROOTP(obj) SCM_SMOB_PREDICATE (scm_tc16_root, (obj)) +#define SCM_ROOT_STATE(root) ((scm_root_state *) SCM_SMOB_DATA (root)) typedef struct scm_root_state { |