diff options
Diffstat (limited to 'gdb/interps.c')
-rw-r--r-- | gdb/interps.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/gdb/interps.c b/gdb/interps.c index a8bd672..56d4790 100644 --- a/gdb/interps.c +++ b/gdb/interps.c @@ -170,11 +170,16 @@ interp_set (struct interp *interp, bool top_level) if (interpreter_p != interp->name ()) interpreter_p = interp->name (); + bool warn_about_mi1 = false; + /* Run the init proc. */ if (!interp->inited) { interp->init (top_level); interp->inited = true; + + if (streq (interp->name (), "mi1")) + warn_about_mi1 = true; } /* Do this only after the interpreter is initialized. */ @@ -184,6 +189,11 @@ interp_set (struct interp *interp, bool top_level) clear_interpreter_hooks (); interp->resume (); + + if (warn_about_mi1) + warning (_("MI version 1 is deprecated in GDB 13 and " + "will be removed in GDB 14. Please upgrade " + "to a newer version of MI.")); } /* Look up the interpreter for NAME. If no such interpreter exists, |