diff options
Diffstat (limited to 'libguile')
-rw-r--r-- | libguile/gc-mark.c | 6 | ||||
-rw-r--r-- | libguile/gc.h | 2 |
2 files changed, 2 insertions, 6 deletions
diff --git a/libguile/gc-mark.c b/libguile/gc-mark.c index 7c176f101..12303d385 100644 --- a/libguile/gc-mark.c +++ b/libguile/gc-mark.c @@ -152,12 +152,10 @@ void scm_gc_mark (SCM ptr) { if (SCM_IMP (ptr)) - return ; + return; if (SCM_GC_MARK_P (ptr)) - { - return; - } + return; SCM_SET_GC_MARK (ptr); scm_gc_mark_dependencies (ptr); diff --git a/libguile/gc.h b/libguile/gc.h index a2d7fc0af..f2620f8fb 100644 --- a/libguile/gc.h +++ b/libguile/gc.h @@ -221,8 +221,6 @@ typedef unsigned long scm_t_c_bvec_long; #define SCM_CELL_TYPE(x) SCM_CELL_WORD_0 (x) #define SCM_SET_CELL_TYPE(x, t) SCM_SET_CELL_WORD_0 (x, t) - - /* Freelists consist of linked cells where the type entry holds the value * scm_tc_free_cell and the second entry holds a pointer to the next cell of * the freelist. Due to this structure, freelist cells are not cons cells |