* c-typeprint.c (c_typedef_print): Add missing Chill support.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index bff08cbd713aeb7848f3cb424ef835eb2f1b8356..a37e1b142ca1467bb643c754144c355d69b35a38 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,7 @@
+Thu Sep  1 17:32:54 1994  Per Bothner  (bothner@kalessin.cygnus.com)
+
+       * c-typeprint.c (c_typedef_print):  Add missing Chill support.
+
 Thu Sep  1 15:41:21 1994  Stu Grossman  (grossman@cygnus.com)
 
        * rs6000-pinsn.c (print_insn):  Use powerpc disassembler when

diff --git a/gdb/c-typeprint.c b/gdb/c-typeprint.c
index 0483b76650d2926b25f37e4f0eb334c33fe6bb44..60268b2a0121f42daaeb5ee27f32332d0b473124 100644 (file)
--- a/gdb/c-typeprint.c
+++ b/gdb/c-typeprint.c
@@ -87,7 +87,14 @@ c_typedef_print (type, new, stream)
 #endif
 #ifdef _LANG_chill
    case language_chill:
-      error ("Missing Chill support in function c_typedef_print."); /*FIXME*/
+      fprintf_filtered(stream, "SYNMODE ");
+      if(!TYPE_NAME(SYMBOL_TYPE(new)) ||
+        !STREQ (TYPE_NAME(SYMBOL_TYPE(new)), SYMBOL_NAME(new)))
+       fprintf_filtered(stream, "%s = ", SYMBOL_SOURCE_NAME(new));
+      else
+        fprintf_filtered(stream, "<builtin> = ");
+      type_print(type,"",stream,0);
+      break;
 #endif
    default:
       error("Language not supported.");