summaryrefslogtreecommitdiff
path: root/libguile/mallocs.h
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/mallocs.h')
-rw-r--r--libguile/mallocs.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/mallocs.h b/libguile/mallocs.h
index 1f3240b63..0a1dbad0d 100644
--- a/libguile/mallocs.h
+++ b/libguile/mallocs.h
@@ -49,8 +49,8 @@
extern int scm_tc16_malloc;
#define SCM_MALLOCP(X) (SCM_TYP16 (X) == scm_tc16_malloc)
-#define SCM_MALLOCDATA(obj) ((char *)SCM_CDR(obj))
-#define SCM_SETMALLOCDATA(obj, val) ((char *)SCM_SETCDR(obj, val))
+#define SCM_MALLOCDATA(obj) ((char *) SCM_CELL_WORD_1 (obj))
+#define SCM_SETMALLOCDATA(obj, val) (SCM_SET_CELL_WORD_1 (obj, val))