Replace SYMBOL_*_NAME accessors with member functions

[deliverable/binutils-gdb.git] / gdb / guile / scm-block.c

diff --git a/gdb/guile/scm-block.c b/gdb/guile/scm-block.c
index fbb2f4ae1d83f1b38aca6c51b5e104cf3865e20a..20037b2e66c8ad44d3998d127ee68bfdfca14f57 100644 (file)
--- a/gdb/guile/scm-block.c
+++ b/gdb/guile/scm-block.c
@@ -157,7 +157,7 @@ bkscm_print_block_smob (SCM self, SCM port, scm_print_state *pstate)
     gdbscm_printf (port, " static");
 
   if (BLOCK_FUNCTION (b) != NULL)
-    gdbscm_printf (port, " %s", SYMBOL_PRINT_NAME (BLOCK_FUNCTION (b)));
+    gdbscm_printf (port, " %s", BLOCK_FUNCTION (b)->print_name ());
 
   gdbscm_printf (port, " %s-%s",
                 hex_string (BLOCK_START (b)), hex_string (BLOCK_END (b)));