From 6c61ceccf296f891f1ab26ce5b1becd98887fc5b Mon Sep 17 00:00:00 2001 From: Ivan Maidanski Date: Wed, 16 Mar 2022 08:00:13 +0300 Subject: Print value of links in GC_dump_finalization_links Also, unify printing of section titles between GC_dump_finalization and GC_dump. * finalize.c [!NO_DEBUGGING] (GC_dump_finalization_links): Also print value pointed by real_link. * finalize.c [!NO_DEBUGGING] (GC_dump_finalization): Start printing each section with a new line and "***" (to match that in GC_dump_named). --- finalize.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'finalize.c') diff --git a/finalize.c b/finalize.c index 9308959c..db46ff1f 100644 --- a/finalize.c +++ b/finalize.c @@ -854,8 +854,8 @@ GC_API void GC_CALL GC_register_finalizer_unreachable(void * obj, ptr_t real_ptr = (ptr_t)GC_REVEAL_POINTER(curr_dl->dl_hidden_obj); ptr_t real_link = (ptr_t)GC_REVEAL_POINTER(curr_dl->dl_hidden_link); - GC_printf("Object: %p, link: %p\n", - (void *)real_ptr, (void *)real_link); + GC_printf("Object: %p, link value: %p, link addr: %p\n", + (void *)real_ptr, *(void **)real_link, (void *)real_link); } } } @@ -867,13 +867,13 @@ GC_API void GC_CALL GC_register_finalizer_unreachable(void * obj, size_t fo_size = GC_fnlz_roots.fo_head == NULL ? 0 : (size_t)1 << GC_log_fo_table_size; - GC_printf("Disappearing (short) links:\n"); + GC_printf("\n***Disappearing (short) links:\n"); GC_dump_finalization_links(&GC_dl_hashtbl); # ifndef GC_LONG_REFS_NOT_NEEDED - GC_printf("Disappearing long links:\n"); + GC_printf("\n***Disappearing long links:\n"); GC_dump_finalization_links(&GC_ll_hashtbl); # endif - GC_printf("Finalizers:\n"); + GC_printf("\n***Finalizers:\n"); for (i = 0; i < fo_size; i++) { for (curr_fo = GC_fnlz_roots.fo_head[i]; curr_fo != NULL; curr_fo = fo_next(curr_fo)) { -- cgit v1.2.1