* c-valprint.c (c_val_print): Handle TYPE_CODE_BOOLEAN.

	* stabsread.c: Type -16 is 4 bytes.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 0cd12a09488251b16b487c0ed0ea4409607b2e3c..c9a553b901592997c8e6f290a316422002f98f2d 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,8 @@
 Fri Jun 25 11:22:28 1993  Jim Kingdon  (kingdon@lioth.cygnus.com)
 
+       * c-valprint.c (c_val_print): Handle TYPE_CODE_BOOLEAN.
+       * stabsread.c: Type -16 is 4 bytes.
+
        * remote-udi.c: Improve docstring.
 
 Fri Jun 25 11:16:31 1993  Fred Fish  (fnf@cygnus.com)

diff --git a/gdb/c-valprint.c b/gdb/c-valprint.c
index 2344ec7dde04a5e85e98e14fc08b4c0855a55302..dca35f3dd1dcef32dc1ce24058e097f41b8a58fc 100644 (file)
--- a/gdb/c-valprint.c
+++ b/gdb/c-valprint.c
@@ -319,6 +319,10 @@ c_val_print (type, valaddr, address, stream, format, deref_ref, recurse,
       print_address_demangle (address, stream, demangle);
       break;
 
+    case TYPE_CODE_BOOL:
+      /* Do something at least vaguely reasonable, for example if the
+        language is set wrong.  */
+
     case TYPE_CODE_INT:
       format = format ? format : output_format;
       if (format)

diff --git a/gdb/stabsread.c b/gdb/stabsread.c
index c09525ac64fdea0cf14c963441dc8ba8a1164500..4f862156d13bffa395682e8a91b6566fcd278055 100644 (file)
--- a/gdb/stabsread.c
+++ b/gdb/stabsread.c
@@ -1687,8 +1687,7 @@ rs6000_builtin_type (typenum)
       rettype = init_type (TYPE_CODE_INT, 4, 0, "integer", NULL);
       break;
     case 16:
-      /* What is the proper size of this type?  */
-      rettype = init_type (TYPE_CODE_BOOL, 1, 0, "boolean", NULL);
+      rettype = init_type (TYPE_CODE_BOOL, 4, 0, "boolean", NULL);
       break;
     case 17:
       rettype = init_type (TYPE_CODE_FLT, 4, 0, "short real", NULL);