From 9f1ffa97e84719a0cecc724c7c65c228916b54bb Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Tue, 20 Nov 1990 22:17:34 +0000 Subject: [PATCH] Change interactive keyboard interrupt's help message to advertise option characters that are consistent with GNU Emacs interface. --- v7/src/microcode/uxsig.c | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/v7/src/microcode/uxsig.c b/v7/src/microcode/uxsig.c index 42b31d54f..1b170b44b 100644 --- a/v7/src/microcode/uxsig.c +++ b/v7/src/microcode/uxsig.c @@ -1,6 +1,6 @@ /* -*-C-*- -$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/uxsig.c,v 1.5 1990/11/15 08:43:06 cph Exp $ +$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/uxsig.c,v 1.6 1990/11/20 22:17:34 cph Rel $ Copyright (c) 1990 Massachusetts Institute of Technology @@ -935,20 +935,20 @@ static void DEFUN_VOID (print_interactive_help) { fputs ("\n\n", stdout); - fputs ("B: Enter a breakpoint loop.\n", stdout); + fputs ("^B: Enter a breakpoint loop.\n", stdout); + fputs ("^C: Goto to top level read-eval-print (REP) loop.\n", stdout); + fputs ("^L: Clear the screen.\n", stdout); + fputs ("^U: Up to previous (lower numbered) REP loop.\n", stdout); + fputs ("^X: Abort to current REP loop.\n", stdout); fputs ("D: Debugging: change interpreter flags.\n", stdout); fputs ("E: Examine memory location.\n", stdout); - fputs ("G: Goto to top level read-eval-print (REP) loop.\n", stdout); fputs ("H: Print simple information on interrupts.\n", stdout); fputs ("I: Ignore interrupt request.\n", stdout); fputs ("Q: Quit instantly, killing Scheme.\n", stdout); fputs ("R: Hard reset, possibly killing Scheme in the process.\n", stdout); fputs ("T: Stack trace.\n", stdout); - fputs ("U: Up to previous (lower numbered) REP loop.\n", stdout); - fputs ("X: Abort to current REP loop.\n", stdout); if (UX_SC_JOB_CONTROL ()) fputs ("Z: Quit instantly, suspending Scheme.\n", stdout); - fputs ("^L: Clear the screen.\n", stdout); fputs ("\n", stdout); } -- 2.25.1