Remove more non-essential code

bestline.c

@@ -51,7 +51,6 @@
 │                                                                              │
 │ SHORTCUTS                                                                    │
 │                                                                              │
-│                                                                              │
 │   CTRL-E         END                                                         │
 │   CTRL-A         START                                                       │
 │   CTRL-B         BACK                                                        │
@@ -78,6 +77,7 @@
 │   ALT-D          KILL WORD FORWARDS                                          │
 │   CTRL-Y         YANK                                                        │
 │   ALT-Y          ROTATE KILL RING AND YANK AGAIN                             │
+│   ALT-\          SQUEEZE ADJACENT WHITESPACE                                 │
 │   CTRL-T         TRANSPOSE                                                   │
 │   ALT-T          TRANSPOSE WORD                                              │
 │   ALT-U          UPPERCASE WORD                                              │
@@ -1762,8 +1762,6 @@ static size_t GetMonospaceWidth(const char *p, size_t n, char *out_haswides) {
                 case '_':
                     t = kStr;
                     break;
-                case '\\':
-                    goto Whoopsie;
                 default:
                     t = kAscii;
                     break;

lisp.c

@@ -404,8 +404,6 @@ static int Evaluate(int e, int a) {
       return Cadr(e);
     if (ax == ATOM_COND)
       return Evcon(Cdr(e), a);
-    if (ax == ATOM_LAMBDA)
-      return e;
   }
   return Apply(ax, Evlis(Cdr(e), a), a);
 }

lisp.lisp

@@ -74,6 +74,7 @@ NIL
 ;; REQUIRES CONS CAR CDR QUOTE ATOM EQ LAMBDA COND
 ;; SIMPLIFIED BUG FIXED VERSION OF JOHN MCCARTHY PAPER
 ;; NOTE: ((EQ (CAR E) NIL) (QUOTE *UNDEFINED)) CAN HELP
+;; NOTE: ((EQ (CAR E) (QUOTE LAMBDA)) E) IS NICE
 ((LAMBDA (ASSOC EVCON BIND APPEND EVAL)
    (EVAL (QUOTE ((LAMBDA (FF X) (FF X))
                  (QUOTE (LAMBDA (X)
@@ -109,7 +110,6 @@ NIL
                ((EQ (CAR E) (QUOTE CONS)) (CONS (EVAL (CAR (CDR E)) A)
                                                 (EVAL (CAR (CDR (CDR E))) A)))
                ((EQ (CAR E) (QUOTE COND)) (EVCON (CDR E) A))
-               ((EQ (CAR E) (QUOTE LAMBDA)) E)
                ((QUOTE T) (EVAL (CONS (EVAL (CAR E) A) (CDR E)) A))))
             ((EQ (CAR (CAR E)) (QUOTE LAMBDA))
              (EVAL (CAR (CDR (CDR (CAR E))))