diff options
author | Jim Kingdon <jkingdon@engr.sgi.com> | 1994-04-28 15:48:15 +0000 |
---|---|---|
committer | Jim Kingdon <jkingdon@engr.sgi.com> | 1994-04-28 15:48:15 +0000 |
commit | d8742f467314826d448bfed5a1788655d8019bcd (patch) | |
tree | fc396c82fdd0b3251eaf5f81b20fabe1dc012e72 | |
parent | 9b58556978ab82ad954713a4c92178c11e6887c5 (diff) | |
download | gdb-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.
-rw-r--r-- | gdb/ChangeLog | 5 | ||||
-rw-r--r-- | gdb/utils.c | 42 |
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; |