SCM make_c_closure (SCM (*) (), void *, int, int); void init_guile (void);