From 6c00f721c834e2c622eb995a58f02900b6d98574 Mon Sep 17 00:00:00 2001 From: Simon Marchi Date: Fri, 28 Jan 2022 11:19:50 -0500 Subject: gdb: remove BLOCK_FUNCTION macro Replace with equivalent methods. Change-Id: I31ec00f5bf85335c8b23d306ca0fe0b84d489101 --- gdb/guile/scm-block.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'gdb/guile/scm-block.c') 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); -- cgit v1.1