aboutsummaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
authorJim Kingdon <jkingdon@engr.sgi.com>1994-04-28 15:48:15 +0000
committerJim Kingdon <jkingdon@engr.sgi.com>1994-04-28 15:48:15 +0000
commitd8742f467314826d448bfed5a1788655d8019bcd (patch)
treefc396c82fdd0b3251eaf5f81b20fabe1dc012e72 /gdb
parent9b58556978ab82ad954713a4c92178c11e6887c5 (diff)
downloadgdb-d8742f467314826d448bfed5a1788655d8019bcd.zip
gdb-d8742f467314826d448bfed5a1788655d8019bcd.tar.gz
gdb-d8742f467314826d448bfed5a1788655d8019bcd.tar.bz2
* utils.c (query): Change syntax of query annotations to be
consistent with other input annotations.
Diffstat (limited to 'gdb')
-rw-r--r--gdb/ChangeLog5
-rw-r--r--gdb/utils.c42
2 files changed, 42 insertions, 5 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 8314087..f06868c 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+Thu Apr 28 08:40:56 1994 Jim Kingdon (kingdon@lioth.cygnus.com)
+
+ * utils.c (query): Change syntax of query annotations to be
+ consistent with other input annotations.
+
Thu Apr 28 01:20:39 1994 Peter Schauer (pes@regent.e-technik.tu-muenchen.de)
* mdebugread.c (psymtab_to_symtab_1): Do not call sort_blocks
diff --git a/gdb/utils.c b/gdb/utils.c
index d7edda3..9147055 100644
--- a/gdb/utils.c
+++ b/gdb/utils.c
@@ -37,6 +37,11 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
#include "expression.h"
#include "language.h"
+#include "readline.h"
+
+/* readline defines this. */
+#undef savestring
+
/* Prototypes for local functions */
#if defined (NO_MMALLOC) || defined (NO_MMALLOC_CHECK)
@@ -793,6 +798,7 @@ query (va_alist)
char *ctlstr;
register int answer;
register int ans2;
+ int retval;
/* Automatically answer "yes" if input is not from a terminal. */
if (!input_from_terminal_p ())
@@ -802,16 +808,27 @@ query (va_alist)
{
wrap_here (""); /* Flush any buffered output */
gdb_flush (gdb_stdout);
+
+ if (annotation_level > 1)
+ printf_filtered ("\n\032\032pre-query\n");
+
va_start (args);
ctlstr = va_arg (args, char *);
vfprintf_filtered (gdb_stdout, ctlstr, args);
va_end (args);
printf_filtered ("(y or n) ");
+
+ if (annotation_level > 1)
+ printf_filtered ("\n\032\032query\n");
+
gdb_flush (gdb_stdout);
answer = fgetc (stdin);
clearerr (stdin); /* in case of C-d */
if (answer == EOF) /* C-d */
- return 1;
+ {
+ retval = 1;
+ break;
+ }
if (answer != '\n') /* Eat rest of input line, to EOF or newline */
do
{
@@ -822,11 +839,21 @@ query (va_alist)
if (answer >= 'a')
answer -= 040;
if (answer == 'Y')
- return 1;
+ {
+ retval = 1;
+ break;
+ }
if (answer == 'N')
- return 0;
+ {
+ retval = 0;
+ break;
+ }
printf_filtered ("Please answer y or n.\n");
}
+
+ if (annotation_level > 1)
+ printf_filtered ("\n\032\032post-query\n");
+ return retval;
}
@@ -1018,6 +1045,12 @@ static void
prompt_for_continue ()
{
char *ignore;
+ char cont_prompt[120];
+
+ strcpy (cont_prompt,
+ "---Type <return> to continue, or q <return> to quit---");
+ if (annotation_level > 1)
+ strcat (cont_prompt, "\n\032\032prompt-for-continue\n");
/* We must do this *before* we call gdb_readline, else it will eventually
call us -- thinking that we're trying to print beyond the end of the
@@ -1035,8 +1068,7 @@ prompt_for_continue ()
/* Call readline, not gdb_readline, because GO32 readline handles control-C
whereas control-C to gdb_readline will cause the user to get dumped
out to DOS. */
- ignore =
- readline ("---Type <return> to continue, or q <return> to quit---");
+ ignore = readline (cont_prompt);
if (ignore)
{
char *p = ignore;