The point is knocking on the window and wants to come inside...

[Randy Parker <PARKER@MIT-REAGAN>]

In Symbolics 3600 Release 6.0, IP-TCP 29.0, AISite 9.7,
microcode TMC5-MIC 319, FEP 18, Rodent Free Namespace Editor,
Logical Pathname Completion patch, on PA Lisp Machine Merlin:

I had been moving the point some manually (testing some zwei fns).
However, I don't think that caused this, as things worked fine for a bit
and then weird localized cursor movements started (i.e. rubout erases
character, but moves cursor forward).  Then this happened, which left
the editor I was in useless.  Even if I somehow broke zwei, there should
be some available restart.  The <resume> option given here puts you back
in the buffer in a new location, and so presumably could fix the
brokenness for you.

Note this is NOT the problem where the point ends up in a different
buffer than the one being displayed. (That is still broken I believe.)
Now, this problem is that the buffer is right, but the windowing is
wrong.  It's worse because it's a ZMACS-wide problem now.  Does anyone
have a recovery from this (i.e. how to restore things--I can get back it
the buffer with a quick m-< but things eventually lose when I do a
rubout)?


>>Error: Recenter type :POINT left point outside the window
While in the function ZWEI:REDISPLAY  ZWEI:REDISPLAY-ALL-WINDOWS  (:METHOD ZWEI:EDITOR :EDIT)

ZWEI:REDISPLAY:  (P.C. = 1554)
   Arg 0 (WINDOW): #<WINDOW 121162025>
   --Defaulted args:--
   Arg 1 (RECENTER-TYPE): :POINT
   Arg 2 (RC1): NIL
   Arg 3 (RC2): NIL
   Arg 4 (FORCE-TO-COMPLETION-P): NIL
   Local 5 (N-PLINES): 48
   Local 6 (POINT): ("(defconst *inside-stepper-help" 31)
   Local 7 (SHEET): #<ZMACS-WINDOW-PANE Zmacs Window Pane 1 43240666 exposed>
   Local 8 (DEGREE): 3
   Local 9 (POINT-BLINKER): #<RECTANGULAR-BLINKER 56242334>
   Local 10 (INTERVAL): #<FILE-BUFFER "WRAPPER.LISP OZ:<PARKER.STEP> OZ:" 76100115>
   Local 11 (START-BP): ("  (display-form funcspec path t))" 0 :NORMAL)
   Local 12 (NOW): 57515
   Local 13 (POINT-PLINE): NIL
   Local 14 (LH): 14
   Local 15 (POINT-LINE): "(defconst *inside-stepper-help"
   Local 16 (POINT-INDEX): 31
   Local 17 (TOP-LINE): "  (display-form funcspec path t))"
   Local 18 (TOP-INDEX): 0
   Local 19 (LAST-BP): (";    eval and substitute form for value command." 48 :MOVES)
   Local 20 (INITIAL-DEGREE): 3
   Local 21: #<FILE-BUFFER "WRAPPER.LISP OZ:<PARKER.STEP> OZ:" 76100115>

ZWEI:REDISPLAY-ALL-WINDOWS:  (P.C. = 34)
   --Defaulted args:--
   Arg 0 (FORCE-TO-COMPLETION-P): NIL
   Arg 1 (SELECT-P): T

(:METHOD ZWEI:EDITOR :EDIT):  (P.C. = 160)
   Arg 0 (SELF): #<ZMACS-TOP-LEVEL-EDITOR 121171573>
   Arg 1 (SELF-MAPPING-TABLE): #<Map to flavor ZWEI:EDITOR -- 12. IV's, 0. FL's 142346020>
   Arg 2 (OPERATION): :EDIT
   --Defaulted args:--
   Arg 3 (TOP-LEVEL-P): T
   Arg 4 (DESCRIPTION): NIL

(:METHOD ZWEI:TOP-LEVEL-EDITOR :COMBINED :EDIT):  (P.C. = 60)
   Arg 0 (SELF): #<ZMACS-TOP-LEVEL-EDITOR 121171573>
   Arg 1 (SELF-MAPPING-TABLE): #<Map to flavor ZWEI:TOP-LEVEL-EDITOR -- 13. IV's, 1. FL's 142345776>
   Arg 2 (.OPERATION.): :EDIT
   Rest arg (.DAEMON-CALLER-ARGS.): NIL

ZWEI:ZMACS-WINDOW-TOP-LEVEL:  (P.C. = 51)

SI:PROCESS-TOP-LEVEL:  (P.C. = 54)
   Arg 0 (IGNORE): NIL