[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Comment Out Region breaks at the end of the buffer
(2 0 (NIL 0) (NIL :BOLD NIL) "CPTFONTCB")
Fonts: CPTFONT, CPTFONTI, CPTFONTCB
In Symbolics 3650 Zwei in Genera 7.1, Hacks 3.0, IP-TCP 52.16,
ILA-NFS 4.4, 7-1-Patches 1.20, MAC 12.1, Conversion Tools 12.4,
Pascal 25.10, Experimental X-Window-System 17.4,
Experimental Illustrate 11.1, TeX 1.0, LaTeX 1.0, SliTeX 1.0, YTeX 1.0,
Macsyma 412.45, Experimental New DSP system 2, microcode 3650-MIC 396,
FEP 206, FEP0:>g206-lisp.flod(14), FEP0:>g206-loaders.flod(14),
FEP0:>g206-debug.flod(4), FEP0:>g206-info.flod(14),
Machine serial number 30086,
Patches for conversion tool. (from SYS:CONVERSION-TOOLS;PATCHES.LISP.29),
LCMW-RELEASE-4-0, CM-CONFIGURATION, UTILITIES-F0404, FINGER-F0403,
DEFS-F0403, STARLISP-COMMON-F0404, STARLISP-SIMULATOR-F10, on Lisp Machine Mr. Sluggo:
Executing Comment Out Region when the region goes to the end of the
buffer, and the last line of the buffer is non-empty gives the following
error.
By the way, in the menu of windows given by the [Select] option of the
system menu, this bug report window appears as 1Zwei Window Pane 10 -- not
very mnemonic.
2Trap: The first argument given to the ARRAY-LEADER instruction, NIL, was not an array.
0While in the function ZWEI:FORWARD-LINE (:INTERNAL ZWEI:COM-COMMENT-OUT-REGION 0 ZWEI:REGION-CONTINUATION) (FLAVOR:METHOD ZWEI:MAP-OVER-SECTIONS-IN-INTERVAL ZWEI:NODE)
The condition signalled was DBG:WRONG-TYPE-ARGUMENT-TRAP
2ZWEI:FORWARD-LINE0: (P.C. = 36)
Arg 0 (ZWEI:BP): NIL
Arg 1 (ZL:TIMES): 1
Arg 2 (ZWEI:FIXUP-P): T
1 --Defaulted args:--
0 Arg 3 (ZWEI:BOUNDING-INTERVAL): #<FILE-BUFFER "arithops.lisp >pao>dsp B:" 7702450>
Local 4 (ZWEI:LAST-LINE): "1;0"
Local 5 (ZWEI:LINE): NIL
Local 6 (ZWEI:I): 0
2(:INTERNAL ZWEI:COM-COMMENT-OUT-REGION 0 ZWEI:REGION-CONTINUATION)0: (P.C. = 114)
Arg 0 (ZWEI:START): (";(defun" 0 :NORMAL #<FILE-BUFFER "arithops.lisp >pao>dsp B:" 7702450>)
Local 0 (ZWEI:START): NIL
Arg 1 (ZWEI:END): ("1;0" 1 :NORMAL #<FILE-BUFFER "arithops.lisp >pao>dsp B:" 7702450>)
2(FLAVOR:METHOD ZWEI:MAP-OVER-SECTIONS-IN-INTERVAL ZWEI:NODE)0: (P.C. = 14)
Arg 0 (SELF): #<FILE-BUFFER "arithops.lisp >pao>dsp B:" 7702450>
Arg 1 (SYS:SELF-MAPPING-TABLE): ZWEI:NODE
Arg 2 (FLAVOR::.GENERIC.): #<GENERIC-FUNCTION ZWEI:MAP-OVER-SECTIONS-IN-INTERVAL 6765065>
Arg 3 (ZWEI:START-BP): (";(defun" 0 :NORMAL #<FILE-BUFFER "arithops.lisp >pao>dsp B:" 7702450>)
Arg 4 (ZWEI:END-BP): ("1;0" 1 :NORMAL #<FILE-BUFFER "arithops.lisp >pao>dsp B:" 7702450>)
Arg 5 (ZWEI:CONTINUATION): #<DTP-COMPILED-FUNCTION (:INTERNAL ZWEI:COM-COMMENT-OUT-REGION 0 ZWEI:REGION-CONTINUATION) 147764021>
Rest arg: (:SELECTOR :TEXT)
2ZWEI:COM-COMMENT-OUT-REGION0: (P.C. = 30)
2(FLAVOR:METHOD SI:WITH-PROCESS-NON-INTERACTIVE-PRIORITY-INTERNAL SI:PROCESS)0: (P.C. = 16)
Arg 0 (SELF): #<COROUTINING-PROCESS ZMACS-WINDOWS 15056313>
Arg 1 (SYS:SELF-MAPPING-TABLE): SI:PROCESS
Arg 2 (FLAVOR::.GENERIC.): #<GENERIC-FUNCTION SI:WITH-PROCESS-NON-INTERACTIVE-PRIORITY-INTERNAL 6704641>
Arg 3 (SI:CONTINUATION): #<LEXICAL-CLOSURE (:INTERNAL ZWEI:COMMAND-EXECUTE 0 SI:WITH-PROCESS-NON-INTERACTIVE-PRIORITY-BODY) 52700407>
Rest arg: NIL
2ZWEI:COMMAND-EXECUTE0: (P.C. = 57)
Arg 0 (ZWEI:COMMAND): ZWEI:COM-COMMENT-OUT-REGION
Arg 1 (ZWEI:CHAR): #\c-\;
Arg 2 (ZWEI:PREFIX-CHAR): #\c-X
1 --Defaulted args:--
0 Arg 3 (ZWEI:HOOK-LIST): NIL
2ZWEI:MAKE-EXTENDED-COMMAND-INTERNAL0: (P.C. = 74)
Closure of 2ZWEI:MAKE-EXTENDED-COMMAND-INTERNAL0:
2(FLAVOR:METHOD SI:WITH-PROCESS-NON-INTERACTIVE-PRIORITY-INTERNAL SI:PROCESS)0: (P.C. = 43)
Arg 0 (SELF): #<COROUTINING-PROCESS ZMACS-WINDOWS 15056313>
Arg 1 (SYS:SELF-MAPPING-TABLE): SI:PROCESS
Arg 2 (FLAVOR::.GENERIC.): #<GENERIC-FUNCTION SI:WITH-PROCESS-NON-INTERACTIVE-PRIORITY-INTERNAL 6704641>
Arg 3 (SI:CONTINUATION): #<LEXICAL-CLOSURE (:INTERNAL ZWEI:COMMAND-EXECUTE 0 SI:WITH-PROCESS-NON-INTERACTIVE-PRIORITY-BODY) 52700306>
Rest arg: NIL
2ZWEI:COMMAND-EXECUTE0: (P.C. = 57)
Arg 0 (ZWEI:COMMAND): #<DTP-CLOSURE 155632172>
Arg 1 (ZWEI:CHAR): #\c-X
Arg 2 (ZWEI:PREFIX-CHAR): NIL
Arg 3 (ZWEI:HOOK-LIST): (PAO:FANCY-FONT-LOCK-HOOK)
2ZWEI:PROCESS-COMMAND-CHAR0: (P.C. = 14)
Arg 0 (ZWEI:CH): #\c-X
2(FLAVOR:METHOD :EDIT ZWEI:EDITOR)0: (P.C. = 316)
Arg 0 (SELF): #<ZMACS-TOP-LEVEL-EDITOR 122146505>
Arg 1 (SYS:SELF-MAPPING-TABLE): #<Map to flavor ZWEI:EDITOR 250045243>
Arg 2 (FLAVOR::.GENERIC.): :EDIT
1 --Defaulted args:--
0 Arg 3 (ZWEI:TOP-LEVEL-P): T
Arg 4 (ZWEI:DESCRIPTION): NIL
2(:INTERNAL (FLAVOR:COMBINED :EDIT ZWEI:ZMACS-TOP-LEVEL-EDITOR) 1)0: (P.C. = 20)
Arg 0 (SELF): #<ZMACS-TOP-LEVEL-EDITOR 122146505>
Arg 1 (SYS:SELF-MAPPING-TABLE): #<Map to flavor ZWEI:ZMACS-TOP-LEVEL-EDITOR 250045054>
Arg 2 (FLAVOR::.GENERIC.): :EDIT
Rest arg (FLAVOR::.DAEMON-CALLER-ARGS.): NIL
2(FLAVOR:METHOD SI:WITH-PROCESS-INTERACTIVE-PRIORITY-INTERNAL SI:PROCESS)0: (P.C. = 40)
Arg 0 (SELF): #<COROUTINING-PROCESS ZMACS-WINDOWS 15056313>
Arg 1 (SYS:SELF-MAPPING-TABLE): SI:PROCESS
Arg 2 (FLAVOR::.GENERIC.): #<GENERIC-FUNCTION SI:WITH-PROCESS-INTERACTIVE-PRIORITY-INTERNAL 6704631>
Arg 3 (SI:CONTINUATION): #<LEXICAL-CLOSURE (:INTERNAL # 0 SI:WITH-PROCESS-INTERACTIVE-PRIORITY-BODY) 52700110>
Rest arg: NIL
2(FLAVOR:WHOPPER :EDIT ZWEI:EDITOR)0: (P.C. = 20)
Arg 0 (SELF): #<ZMACS-TOP-LEVEL-EDITOR 122146505>
Arg 1 (SYS:SELF-MAPPING-TABLE): #<Map to flavor ZWEI:EDITOR 250045243>
Arg 2 (FLAVOR::.WHOPPER-CONTINUATION.): #<DTP-COMPILED-FUNCTION (:INTERNAL (FLAVOR:COMBINED :EDIT ZWEI:ZMACS-TOP-LEVEL-EDITOR) 1) 150176730>
Arg 3 (FLAVOR::.OLD-SELF-MAPPING-TABLE.): #<Map to flavor ZWEI:ZMACS-TOP-LEVEL-EDITOR 250045054>
Arg 4 (FLAVOR::.GENERIC.): :EDIT
Rest arg (ZWEI:ARGUMENTS): NIL
2(FLAVOR:COMBINED :EDIT ZWEI:ZMACS-TOP-LEVEL-EDITOR)0: (P.C. = 317)
Arg 0 (SELF): #<ZMACS-TOP-LEVEL-EDITOR 122146505>
Arg 1 (SYS:SELF-MAPPING-TABLE): #<Map to flavor ZWEI:ZMACS-TOP-LEVEL-EDITOR 250045054>
Arg 2 (FLAVOR::.GENERIC.): :EDIT
Rest arg (FLAVOR::.DAEMON-CALLER-ARGS.): NIL
Special ZWEI:*INTERVAL*: #<FILE-BUFFER "arithops.lisp >pao>dsp B:" 7702450>
2ZWEI:ZMACS-WINDOW-TOP-LEVEL0: (P.C. = 55) 1(from SYS:PATCH;SYSTEM-349-88)
2SI:PROCESS-TOP-LEVEL0: (P.C. = 45)
1 --Defaulted args:--
0 Arg 0 (IGNORE): NIL