Fix a new warning on Cygwin

[binutils-gdb.git] / gdb / ada-typeprint.c

diff --git a/gdb/ada-typeprint.c b/gdb/ada-typeprint.c
index 0eb95cb0a73bde840ff256850e24c01b95d930b1..05ffb8b833137e29528bdecac640bf75f5665bde 100644 (file)
--- a/gdb/ada-typeprint.c
+++ b/gdb/ada-typeprint.c
@@ -981,7 +981,7 @@ ada_print_type (struct type *type0, const char *varstring,
       {
       default:
        gdb_printf (stream, "<");
-       c_print_type (type, "", stream, show, level, flags);
+       c_print_type (type, "", stream, show, level, language_ada, flags);
        gdb_printf (stream, ">");
        break;
       case TYPE_CODE_PTR: