summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKeith Seitz <keiths@redhat.com>2002-08-28 18:13:42 +0000
committerKeith Seitz <keiths@redhat.com>2002-08-28 18:13:42 +0000
commita981567fc5c47fa7bf4a6ecc1fcc5ba6cf3e41bb (patch)
tree28df70e4e68a26d3caf28d1d2c179c789fe08187
parent2e92bc125ec7047c60e0264775f17685843b96c6 (diff)
downloadgdb-a981567fc5c47fa7bf4a6ecc1fcc5ba6cf3e41bb.tar.gz
* interps.c (interpreter_exec_cmd): Temporarily set
current interpreter to quiet, too, so that we don't get too many prompts when switching interpreters.
-rw-r--r--gdb/ChangeLog6
-rw-r--r--gdb/interps.c9
2 files changed, 12 insertions, 3 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 6d1f478a165..7c5a0c35999 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,11 @@
2002-08-28 Keith Seitz <keiths@redhat.com>
+ * interps.c (interpreter_exec_cmd): Temporarily set
+ current interpreter to quiet, too, so that we don't get
+ too many prompts when switching interpreters.
+
+2002-08-28 Keith Seitz <keiths@redhat.com>
+
* thread.c (do_captured_thread_select): Add context-changed
notification.
* infrun.c (handle_inferior_event): Remove context-changed
diff --git a/gdb/interps.c b/gdb/interps.c
index 19b108ba3c5..cee469e07f0 100644
--- a/gdb/interps.c
+++ b/gdb/interps.c
@@ -537,7 +537,7 @@ interpreter_exec_cmd (char *args, int from_tty)
char **trule = NULL;
unsigned int nrules;
unsigned int i;
- int old_quiet;
+ int old_quiet, use_quiet;
prules = buildargv (args);
if (prules == NULL)
@@ -563,7 +563,9 @@ interpreter_exec_cmd (char *args, int from_tty)
if (interp_to_use == NULL)
error ("Could not find interpreter \"%s\".", prules[0]);
- old_quiet = gdb_interpreter_set_quiet (interp_to_use, 1);
+ /* Temporarily set interpreters quiet */
+ old_quiet = gdb_interpreter_set_quiet (old_interp, 1);
+ use_quiet = gdb_interpreter_set_quiet (interp_to_use, 1);
if (!gdb_set_interpreter (interp_to_use))
error ("Could not switch to interpreter \"%s\".", prules[0]);
@@ -582,7 +584,8 @@ interpreter_exec_cmd (char *args, int from_tty)
}
gdb_set_interpreter (old_interp);
- gdb_interpreter_set_quiet (interp_to_use, old_quiet);
+ gdb_interpreter_set_quiet (interp_to_use, use_quiet);
+ gdb_interpreter_set_quiet (old_interp, old_quiet);
}
/* List the possible interpreters which could complete the given text. */