From d24e14a0c62181b49f513f6ed3704212fd276c79 Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Mon, 16 Jan 2023 18:14:47 -0700 Subject: Convert block_static_block and block_global_block to methods This converts block_static_block and block_global_block to be methods. This was mostly written by script. It was simpler to convert them at the same time because they're often used near each other. --- gdb/guile/scm-block.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gdb/guile/scm-block.c') diff --git a/gdb/guile/scm-block.c b/gdb/guile/scm-block.c index 02cd3ff..c9d847a 100644 --- a/gdb/guile/scm-block.c +++ b/gdb/guile/scm-block.c @@ -438,7 +438,7 @@ gdbscm_block_global_block (SCM self) const struct block *block = b_smob->block; const struct block *global_block; - global_block = block_global_block (block); + global_block = block->global_block (); return bkscm_scm_from_block (global_block, b_smob->objfile); } @@ -458,7 +458,7 @@ gdbscm_block_static_block (SCM self) if (block->superblock () == NULL) return SCM_BOOL_F; - static_block = block_static_block (block); + static_block = block->static_block (); return bkscm_scm_from_block (static_block, b_smob->objfile); } -- cgit v1.1