FreeChainXenon/binutils-gdb
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

remove unnecessary smob mark/free functions

Browse source 
* 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:
Andy Wingo 2014-05-26 18:11:58 -07:00 • committed by Doug Evans
parent b2715b270a
commit 92c48fc5e7
14 changed files with 21 additions and 204 deletions
Download patch file Download diff file Expand all files Collapse all files

13
gdb/guile/scm-iterator.c
View file

@ -110,18 +110,6 @@ itscm_set_iterator_smob_progress_x (iterator_smob *i_smob, SCM progress)
/* Administrivia for iterator smobs. */
/* The smob "mark" function for <gdb:iterator>. */
static SCM
itscm_mark_iterator_smob (SCM self)
{
iterator_smob *i_smob = (iterator_smob *) SCM_SMOB_DATA (self);
scm_gc_mark (i_smob->object);
scm_gc_mark (i_smob->progress);
return i_smob->next_x;
}
/* The smob "print" function for <gdb:iterator>. */
static int
@ -362,7 +350,6 @@ gdbscm_initialize_iterators (void)
{
iterator_smob_tag = gdbscm_make_smob_type (iterator_smob_name,
sizeof (iterator_smob));
scm_set_smob_mark (iterator_smob_tag, itscm_mark_iterator_smob);
scm_set_smob_print (iterator_smob_tag, itscm_print_iterator_smob);
gdbscm_define_functions (iterator_functions, 1);