aboutsummaryrefslogtreecommitdiff
path: root/gdb/guile/scm-block.c
diff options
context:
space:
mode:
authorSimon Marchi <simon.marchi@efficios.com>2022-01-28 11:19:50 -0500
committerSimon Marchi <simon.marchi@polymtl.ca>2022-04-27 22:05:03 -0400
commit6c00f721c834e2c622eb995a58f02900b6d98574 (patch)
tree5eed7fcd03403d92fa6c0297582b94d1b74358fe /gdb/guile/scm-block.c
parent4b8791e10e574d3279e6783b58556893b0c92853 (diff)
downloadgdb-6c00f721c834e2c622eb995a58f02900b6d98574.zip
gdb-6c00f721c834e2c622eb995a58f02900b6d98574.tar.gz
gdb-6c00f721c834e2c622eb995a58f02900b6d98574.tar.bz2
gdb: remove BLOCK_FUNCTION macro
Replace with equivalent methods. Change-Id: I31ec00f5bf85335c8b23d306ca0fe0b84d489101
Diffstat (limited to 'gdb/guile/scm-block.c')
-rw-r--r--gdb/guile/scm-block.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/gdb/guile/scm-block.c b/gdb/guile/scm-block.c
index 921225d..1683ed1 100644
--- a/gdb/guile/scm-block.c
+++ b/gdb/guile/scm-block.c
@@ -156,8 +156,8 @@ bkscm_print_block_smob (SCM self, SCM port, scm_print_state *pstate)
else if (BLOCK_SUPERBLOCK (BLOCK_SUPERBLOCK (b)) == NULL)
gdbscm_printf (port, " static");
- if (BLOCK_FUNCTION (b) != NULL)
- gdbscm_printf (port, " %s", BLOCK_FUNCTION (b)->print_name ());
+ if (b->function () != NULL)
+ gdbscm_printf (port, " %s", b->function ()->print_name ());
gdbscm_printf (port, " %s-%s",
hex_string (b->start ()), hex_string (b->end ()));
@@ -404,7 +404,7 @@ gdbscm_block_function (SCM self)
const struct block *block = b_smob->block;
struct symbol *sym;
- sym = BLOCK_FUNCTION (block);
+ sym = block->function ();
if (sym != NULL)
return syscm_scm_from_symbol (sym);