diff options
Diffstat (limited to 'libguile/futures.c')
-rw-r--r-- | libguile/futures.c | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/libguile/futures.c b/libguile/futures.c index 5b1a3fb7e..1bba960b3 100644 --- a/libguile/futures.c +++ b/libguile/futures.c @@ -207,10 +207,6 @@ scm_i_make_future (SCM thunk) return future; } -static SCM -future_mark (SCM ptr) { - return SCM_FUTURE_DATA (ptr); -} static int future_print (SCM exp, SCM port, scm_print_state *pstate) @@ -363,7 +359,6 @@ scm_init_futures () = SCM_VARIABLE_LOC (scm_c_define ("%thread-handler", SCM_BOOL_F)); scm_tc16_future = scm_make_smob_type ("future", 0); - scm_set_smob_mark (scm_tc16_future, future_mark); scm_set_smob_print (scm_tc16_future, future_print); scm_c_hook_add (&scm_before_sweep_c_hook, scan_futures, 0, 0); |