summaryrefslogtreecommitdiff
path: root/libguile/fluids.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/fluids.c')
-rw-r--r--libguile/fluids.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/fluids.c b/libguile/fluids.c
index 55910b0a5..282718e65 100644
--- a/libguile/fluids.c
+++ b/libguile/fluids.c
@@ -160,7 +160,7 @@ new_fluid (SCM init)
SCM_SET_CELL_WORD_0 (fluid, (scm_tc7_fluid | (n << 8)));
GC_GENERAL_REGISTER_DISAPPEARING_LINK (&allocated_fluids[n],
- SCM_HEAP_OBJECT_BASE (fluid));
+ SCM2PTR (fluid));
scm_dynwind_end ();