forked from Imagelibrary/binutils-gdb
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:
@@ -48,14 +48,6 @@ static int arscm_is_arch (SCM);
|
||||
|
||||
/* Administrivia for arch smobs. */
|
||||
|
||||
/* The smob "mark" function for <gdb:arch>. */
|
||||
|
||||
static SCM
|
||||
arscm_mark_arch_smob (SCM self)
|
||||
{
|
||||
return SCM_BOOL_F;
|
||||
}
|
||||
|
||||
/* The smob "print" function for <gdb:arch>. */
|
||||
|
||||
static int
|
||||
@@ -655,7 +647,6 @@ void
|
||||
gdbscm_initialize_arches (void)
|
||||
{
|
||||
arch_smob_tag = gdbscm_make_smob_type (arch_smob_name, sizeof (arch_smob));
|
||||
scm_set_smob_mark (arch_smob_tag, arscm_mark_arch_smob);
|
||||
scm_set_smob_print (arch_smob_tag, arscm_print_arch_smob);
|
||||
|
||||
gdbscm_define_functions (arch_functions, 1);
|
||||
|
||||
Reference in New Issue
Block a user