diff options
author | Doug Evans <xdje42@gmail.com> | 2014-02-20 09:27:12 -0800 |
---|---|---|
committer | Doug Evans <xdje42@gmail.com> | 2014-02-20 09:27:12 -0800 |
commit | 1254eefca2c2af47e8333bbc33d878998703a204 (patch) | |
tree | 263fa84864a3ccfa8a218c0c9df20994d852a7d7 /gdb/guile/scm-symbol.c | |
parent | 8c3cb9fa4405d86e57cc3b02ef38e50ef6747924 (diff) | |
download | gdb-1254eefca2c2af47e8333bbc33d878998703a204.zip gdb-1254eefca2c2af47e8333bbc33d878998703a204.tar.gz gdb-1254eefca2c2af47e8333bbc33d878998703a204.tar.bz2 |
Move containing_scm arg from gdbscm_fill_eqable_gsmob_ptr_slot
to gdbscm_init_eqable_gsmob.
* guile/scm-gsmob.c (gdbscm_init_eqable_gsmob): New arg containing_scm.
All callers updated.
(gdbscm_fill_eqable_gsmob_ptr_slot): Delete arg containing_scm.
All callers updated.
* guile/guile-internal.h (gdbscm_init_eqable_gsmob): Update.
(gdbscm_fill_eqable_gsmob_ptr_slot): Update.
Diffstat (limited to 'gdb/guile/scm-symbol.c')
-rw-r--r-- | gdb/guile/scm-symbol.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/guile/scm-symbol.c b/gdb/guile/scm-symbol.c index 53cc272..0c5cc05 100644 --- a/gdb/guile/scm-symbol.c +++ b/gdb/guile/scm-symbol.c @@ -159,7 +159,7 @@ syscm_make_symbol_smob (void) s_smob->symbol = NULL; s_scm = scm_new_smob (symbol_smob_tag, (scm_t_bits) s_smob); - gdbscm_init_eqable_gsmob (&s_smob->base); + gdbscm_init_eqable_gsmob (&s_smob->base, s_scm); return s_scm; } @@ -202,7 +202,7 @@ syscm_scm_from_symbol (struct symbol *symbol) s_scm = syscm_make_symbol_smob (); s_smob = (symbol_smob *) SCM_SMOB_DATA (s_scm); s_smob->symbol = symbol; - gdbscm_fill_eqable_gsmob_ptr_slot (slot, &s_smob->base, s_scm); + gdbscm_fill_eqable_gsmob_ptr_slot (slot, &s_smob->base); return s_scm; } |