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

Remove some unused functions from guile code

Browse source 
The guile code has a couple of unused functions that touch on the
registry API.  This patch removes them.
This commit is contained in:
Tom Tromey 2022-05-24 16:55:04 -06:00
parent bde539c2f9
commit 8f83e7b926
2 changed files with 0 additions and 44 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
gdb/guile/guile-internal.h
View file

@ -287,14 +287,6 @@ extern void gdbscm_init_chained_gsmob (chained_gdb_smob *base);
extern void gdbscm_init_eqable_gsmob (eqable_gdb_smob *base,
SCM containing_scm);
extern void gdbscm_add_objfile_ref (struct objfile *objfile,
const struct objfile_data *data_key,
chained_gdb_smob *g_smob);
extern void gdbscm_remove_objfile_ref (struct objfile *objfile,
const struct objfile_data *data_key,
chained_gdb_smob *g_smob);
extern htab_t gdbscm_create_eqable_gsmob_ptr_map (htab_hash hash_fn,
htab_eq eq_fn);

36
gdb/guile/scm-gsmob.c
View file

@ -206,42 +206,6 @@ gdbscm_gsmob_kind (SCM self)
smobs with references to them. There are several smobs that reference
objfile-based data, so we provide helpers to manage this. */
/* Add G_SMOB to the reference chain for OBJFILE specified by DATA_KEY.
OBJFILE may be NULL, in which case just set prev,next to NULL. */
void
gdbscm_add_objfile_ref (struct objfile *objfile,
const struct objfile_data *data_key,
chained_gdb_smob *g_smob)
{
g_smob->prev = NULL;
if (objfile != NULL)
{
g_smob->next = (chained_gdb_smob *) objfile_data (objfile, data_key);
if (g_smob->next)
g_smob->next->prev = g_smob;
set_objfile_data (objfile, data_key, g_smob);
}
else
g_smob->next = NULL;
}
/* Remove G_SMOB from the reference chain for OBJFILE specified
by DATA_KEY. OBJFILE may be NULL. */
void
gdbscm_remove_objfile_ref (struct objfile *objfile,
const struct objfile_data *data_key,
chained_gdb_smob *g_smob)
{
if (g_smob->prev)
g_smob->prev->next = g_smob->next;
else if (objfile != NULL)
set_objfile_data (objfile, data_key, g_smob->next);
if (g_smob->next)
g_smob->next->prev = g_smob->prev;
}
/* Create a hash table for mapping a pointer to a gdb data structure to the
gsmob that wraps it. */