remove unnecessary smob mark/free functions
* guile/scm-arch.c (arscm_mark_arch_smob): * guile/scm-block.c (bkscm_mark_block_smob) (bkscm_mark_block_syms_progress_smob): * guile/scm-breakpoint.c (bpscm_mark_breakpoint_smob): * guile/scm-exception.c (exscm_mark_exception_smob): * guile/scm-frame.c (frscm_mark_frame_smob): * guile/scm-iterator.c (itscm_mark_iterator_smob): * guile/scm-lazy-string.c (lsscm_mark_lazy_string_smob): * guile/scm-objfile.c (ofscm_mark_objfile_smob): * guile/scm-pretty-print.c (ppscm_mark_pretty_printer_smob) (ppscm_mark_pretty_printer_worker_smob): * guile/scm-symbol.c (syscm_mark_symbol_smob): * guile/scm-symtab.c (stscm_mark_symtab_smob, stscm_mark_sal_smob): * guile/scm-type.c (tyscm_mark_type_smob, tyscm_mark_field_smob): * guile/scm-value.c (vlscm_mark_value_smob): Remove unnecessary mark functions. * guile/scm-symtab.c (stscm_free_sal_smob): Remove unnecessary free function.
This commit is contained in:
parent
b2715b270a
commit
92c48fc5e7
14 changed files with 21 additions and 204 deletions
|
@ -63,14 +63,6 @@ static scm_t_bits lazy_string_smob_tag;
|
|||
|
||||
/* Administrivia for lazy string smobs. */
|
||||
|
||||
/* The smob "mark" function for <gdb:lazy-string>. */
|
||||
|
||||
static SCM
|
||||
lsscm_mark_lazy_string_smob (SCM self)
|
||||
{
|
||||
return SCM_BOOL_F;
|
||||
}
|
||||
|
||||
/* The smob "free" function for <gdb:lazy-string>. */
|
||||
|
||||
static size_t
|
||||
|
@ -362,7 +354,6 @@ gdbscm_initialize_lazy_strings (void)
|
|||
{
|
||||
lazy_string_smob_tag = gdbscm_make_smob_type (lazy_string_smob_name,
|
||||
sizeof (lazy_string_smob));
|
||||
scm_set_smob_mark (lazy_string_smob_tag, lsscm_mark_lazy_string_smob);
|
||||
scm_set_smob_free (lazy_string_smob_tag, lsscm_free_lazy_string_smob);
|
||||
scm_set_smob_print (lazy_string_smob_tag, lsscm_print_lazy_string_smob);
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue