summaryrefslogtreecommitdiff
path: root/libguile/root.h
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/root.h')
-rw-r--r--libguile/root.h4
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
{