* top.c (execute_control_command, case while_control): Allow

        a while command to be interrupted.
Fixes net bug.

2 files changed, 7 insertions, 0 deletions

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 4c18803..cba7fb3 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+Mon May 13 17:40:58 1996  Jeffrey A Law  (law@cygnus.com)
+
+	* top.c (execute_control_command, case while_control): Allow
+	a while command to be interrupted.
+
 Mon May 13 16:17:36 1996  Stu Grossman  (grossman@critters.cygnus.com)
 
 	* sol-thread.c:  More cleanup, add comments.
diff --git a/gdb/top.c b/gdb/top.c
index 088bcd9..40a4b34 100644
--- a/gdb/top.c
+++ b/gdb/top.c
@@ -823,6 +823,8 @@ execute_control_command (cmd)
 	/* Keep iterating so long as the expression is true.  */
 	while (loop == 1)
 	  {
+	    QUIT;
+
 	    /* Evaluate the expression.  */
 	    val = evaluate_expression (expr);