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-block.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-block.c')
| -rw-r--r-- | gdb/guile/scm-block.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/guile/scm-block.c b/gdb/guile/scm-block.c index de41af2..4e1748e 100644 --- a/gdb/guile/scm-block.c +++ b/gdb/guile/scm-block.c @@ -193,7 +193,7 @@ bkscm_make_block_smob (void) b_smob->block = NULL; b_smob->objfile = NULL; b_scm = scm_new_smob (block_smob_tag, (scm_t_bits) b_smob); - gdbscm_init_eqable_gsmob (&b_smob->base); + gdbscm_init_eqable_gsmob (&b_smob->base, b_scm); return b_scm; } @@ -237,7 +237,7 @@ bkscm_scm_from_block (const struct block *block, struct objfile *objfile) b_smob = (block_smob *) SCM_SMOB_DATA (b_scm); b_smob->block = block; b_smob->objfile = objfile; - gdbscm_fill_eqable_gsmob_ptr_slot (slot, &b_smob->base, b_scm); + gdbscm_fill_eqable_gsmob_ptr_slot (slot, &b_smob->base); return b_scm; } |