* core.c (core_file_info), exec.c (exec_file_info): Print file

type.  Use printf_filtered.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index f999d4e221497227c3e7f5c0520f1157eb4e91fe..b56eae39ba0eb13d2261efc8739efbeec13e934a 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,8 @@
 Fri Oct 25 02:02:13 1991  John Gilmore  (gnu at cygnus.com)
 
+       * core.c (core_file_info), exec.c (exec_file_info):  Print file
+       type.  Use printf_filtered.
+
        * valops.c (value_fetch_lazy):  Avoid 0-length fetches.
 
 Thu Oct 24 23:06:40 1991  Fred Fish  (fnf at cygnus.com)

diff --git a/gdb/core.c b/gdb/core.c
index 2ec4244ab363a8f903b5cc5c6c1caff3166f990a..ba1299268dfc422a4e6692d34bacbbbe6debb4d6 100644 (file)
--- a/gdb/core.c
+++ b/gdb/core.c
@@ -279,16 +279,19 @@ core_files_info (t)
 {
   struct section_table *p;
 
-  printf ("\tCore file `%s'.\n", bfd_get_filename(core_bfd));
+  printf_filtered ("\t`%s', ", bfd_get_filename(core_bfd));
+  wrap_here ("        ");
+  printf_filtered ("file type %s.\n", bfd_get_target(core_bfd));
 
   for (p = t->sections; p < t->sections_end; p++) {
-    printf("\t%s", local_hex_string_custom (p->addr, "08"));
-    printf(" - %s is %s", local_hex_string_custom (p->endaddr, "08"),
-          bfd_section_name (p->bfd, p->sec_ptr));
+    printf_filtered ("\t%s", local_hex_string_custom (p->addr, "08"));
+    printf_filtered (" - %s is %s",
+       local_hex_string_custom (p->endaddr, "08"),
+       bfd_section_name (p->bfd, p->sec_ptr));
     if (p->bfd != core_bfd) {
-      printf(" in %s", bfd_get_filename (p->bfd));
+      printf_filtered (" in %s", bfd_get_filename (p->bfd));
     }
-    printf ("\n");
+    printf_filtered ("\n");
   }
 }
 \f