Procházet zdrojové kódy

Editor: Ctrl-K-D / Ctrl-K-X quit to menu reliably (held-Ctrl chord tolerated). Rebuilt tpshell to include the chord; two-phase ISO link clean (tpshell 120528B).

Eric Streit před 2 týdny
rodič
revize
aeb34403fd
3 změnil soubory, kde provedl 7 přidání a 2 odebrání
  1. 5 0
      shell/Editor.mod
  2. 2 2
      shell/Makefile
  3. 0 0
      shell/build_tpshell.sh

+ 5 - 0
shell/Editor.mod

@@ -1415,6 +1415,11 @@ BEGIN
    GetCh (ch) ;
    IF ch = Esc THEN RETURN END ;
    ch := Up (ch) ;
+   IF ch = C_D THEN
+      ch := "D"          (* tolerate the held-Ctrl chord Ctrl-K-Ctrl-D *)
+   ELSIF ch = C_X THEN
+      ch := "X"          (* tolerate Ctrl-K-Ctrl-X as well *)
+   END ;
    IF ch = "B" THEN
       MarkBlockB
    ELSIF ch = "K" THEN

+ 2 - 2
shell/Makefile

@@ -4,8 +4,8 @@ FLAGS = -fiso
 
 all: tpshell
 
-tpshell: Editor.mod Shell.mod Shell.o Term.o Posix.o TextBuf.o Editor.o Compiler.o tpshell.lst
-	$(GM2) $(FLAGS) -fgen-module-list=tpshell.lst -o $@ Shell.mod Term.o Posix.o TextBuf.o Editor.o Compiler.o
+tpshell: Editor.mod Shell.mod Shell.o Term.o Posix.o TextBuf.o Editor.o Compiler.o
+	$(GM2) $(FLAGS) -fgen-module-list=tpshell.lst -o /dev/null Shell.mod Term.o Posix.o TextBuf.o Editor.o Compiler.o || true
 	$(GM2) $(FLAGS) -fuse-list=tpshell.lst -o $@ Shell.mod Term.o Posix.o TextBuf.o Editor.o Compiler.o
 
 Shell.o: Shell.mod Term.def Posix.def Editor.def TextBuf.def

+ 0 - 0
shell/build_tpshell.sh