Remove redundant GC_err_printf before abort

* dbg_mlc.c (GC_debug_realloc): Remove redundant GC_err_printf
invocation before abort; refine abort message.
* os_dep.c (GC_register_data_segments): Likewise.

diff --git a/dbg_mlc.c b/dbg_mlc.c
index 9422b71f2f32e8f1da19ff7ce7ff11610b4f031a..5287149fe1409a3dbd7af42b4d58b4f96329a7dd 100644 (file)
--- a/dbg_mlc.c
+++ b/dbg_mlc.c
@@ -881,8 +881,7 @@ GC_API void * GC_CALL GC_debug_realloc(void * p, size_t lb, GC_EXTRA_PARAMS)
 #    endif
       default:
         result = NULL; /* initialized to prevent warning. */
-        GC_err_printf("GC_debug_realloc: encountered bad kind\n");
-        ABORT_RET("Bad kind");
+        ABORT_RET("GC_debug_realloc: encountered bad kind");
     }
 
     if (result != NULL) {

diff --git a/os_dep.c b/os_dep.c
index 45d4a3102e851a9a9c2b7ebe4011b85922686bbf..fdde091a925b5660e524c30dede9b1a0b02b478a 100644 (file)
--- a/os_dep.c
+++ b/os_dep.c
@@ -1467,14 +1467,12 @@ void GC_register_data_segments(void)
     struct o32_obj seg; /* Currrent segment */
     int nsegs;
 
-
     if (DosGetInfoBlocks(&ptib, &ppib) != NO_ERROR) {
         ABORT("DosGetInfoBlocks failed");
     }
     module_handle = ppib -> pib_hmte;
     if (DosQueryModuleName(module_handle, PBUFSIZ, path) != NO_ERROR) {
-        GC_err_printf("DosQueryModuleName failed\n");
-        ABORT("DosGetInfoBlocks failed");
+        ABORT("DosQueryModuleName failed");
     }
     myexefile = fopen(path, "rb");
     if (myexefile == 0) {