diff options
| author | Per Bothner <per@bothner.com> | 1994-09-02 00:34:43 +0000 |
|---|---|---|
| committer | Per Bothner <per@bothner.com> | 1994-09-02 00:34:43 +0000 |
| commit | 6a2eecace5b987ede2ba126a1974aeafb9e71bd2 (patch) | |
| tree | ffb4270c842205f3c0e3d7251d7425735764bd22 /gdb/c-typeprint.c | |
| parent | 5b676c51ac7bd66d06d296674364033a1119320d (diff) | |
| download | fsf-binutils-gdb-6a2eecace5b987ede2ba126a1974aeafb9e71bd2.zip fsf-binutils-gdb-6a2eecace5b987ede2ba126a1974aeafb9e71bd2.tar.gz fsf-binutils-gdb-6a2eecace5b987ede2ba126a1974aeafb9e71bd2.tar.bz2 | |
* c-typeprint.c (c_typedef_print): Add missing Chill support.
Diffstat (limited to 'gdb/c-typeprint.c')
| -rw-r--r-- | gdb/c-typeprint.c | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/gdb/c-typeprint.c b/gdb/c-typeprint.c index 0483b76..60268b2 100644 --- 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."); |