summaryrefslogtreecommitdiff
path: root/libguile/mallocs.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/mallocs.c')
-rw-r--r--libguile/mallocs.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/mallocs.c b/libguile/mallocs.c
index 78dd76307..4201adca8 100644
--- a/libguile/mallocs.c
+++ b/libguile/mallocs.c
@@ -88,8 +88,8 @@ scm_malloc_obj (n)
SCM_ALLOW_INTS;
return SCM_BOOL_F;
}
- SCM_CDR (answer) = mem;
- SCM_CAR (answer) = scm_tc16_malloc;
+ SCM_SETCDR (answer, mem);
+ SCM_SETCAR (answer, scm_tc16_malloc);
SCM_ALLOW_INTS;
return answer;
}