File [phylum]<LispARs>00881.AR!2

Number: 881

Date:  1-May-84 11':32':04

Submitter: Sybalsky

Source: vanMelle.pa

Subject: NON-NUMERIC ARG NIL in \INSERTCH

Assigned To: 

Attn: 

Status: Obsolete

In/By: 

Problem Type: Bug

Impact: Moderate

Difficulty: Easy

Frequency: Once

Priority: 

System: Text

Subsystem: TEdit

Machine: 

Disk: 

Lisp Version: 

Source Files: 

Microcode Version: 

Memory Size: 

File Server: 

Server Software Version: 

Disposition: 

Description: '
'
Date': 27 Apr 84 16':13 PST'
From': vanMelle.pa'
Subject': TEdit': NON-NUMERIC ARG NIL in \INSERTCH'
To': TEditSupport.pa'
'
TEdit System Date': 13-Apr-84 11':44':53'
Lisp System Date': 26-Apr-84 11':50':17'
Machine': Dorado (Archimedes)'
Microcode version': 24,4'
Memory size': 10000'
Frequency': Once'
Impact': Moderate'
'
I had deleted all the text at the end of a message and typed cr.  Error was in (IPLUS NIL 1) at PC 715 of \INSERTCH':'
'
   CH 13'
   CH# 111'
   TEXTOBJ {TEXTOBJ}#4,41132'
   INSERTMARK NIL'
   LEN 1'
   \INEXTCH 111'
   \INLEN 13'
   \INLEFT 372'
   \INSTRING '
", Martin.pasa'
"'
   \INPC {PIECE}#10,40334'
   \INFIRSTCH 98'
   PCTB {ARRAYP}#1,2724'
   TEXTLEN 110'
   IMARKPC NIL'
   IMARKCH NIL'
   PC NIL'
   PCNO 8'
   CHNO NIL'
   NEWPC NIL'
   PREVPC NIL'
   EVENT NIL'
   REPLACING NIL'
   NEWFLAG NIL'
   *local* 14'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
\INSERTCH'
'
   CH 13'
   CH# 111'
   TEXTOBJ {TEXTOBJ}#4,41132'
   INPC NIL'
\INSERTCR'
'
   *local* 13'
   *local* {SELECTION}#6,103360'
   *local* {TEXTOBJ}#4,41132'
   *local* NIL'
   *local* T'
   *local* NIL'
   *local* {TEXTOBJ}#4,41132'
   *local* NIL'
   *local* 111'
   *local* 111'
   *local* {LINEDESCRIPTOR}#6,160620'
   *local* 140'
   *local* 110'
   *local* {STREAM}#6,123300'
   *local* 1'
TEDIT.\INSERT'
'
<two errorsets>'
'
   *local* (DUMMY.FOR.ERRORSET)'
   *local* INTERNAL'
   *local* NIL'
   READSA {CHARTABLE}#1,115400'
   TERMSA {CHARTABLE}#1,116600'
   TEDITSA {CHARTABLE}#4,34600'
   TEDITFNHASH ({HARRAYP}#1,11020)'
   LOOPFN NIL'
   CHARFN NIL'
   CH 13'
   FN NIL'
   TCH NIL'
   DIRTY NIL'
   BLANKSEEN NIL'
   INSCH# NIL'
   CRSEEN NIL'
   TLEN NIL'
   CHNO NIL'
   COMMANDFN NIL'
ERRORSET'
'
   STREAM {TEXTOBJ}#4,41132'
   RTBL {READTABLEP}#1,77730'
   TEXTOBJ {TEXTOBJ}#4,41132'
   ISCRSTRING '
"a                                                               "'
   SEL {SELECTION}#6,103360'
   WINDOW {WINDOW}#7,126536'
   LINES {LINEDESCRIPTOR}#6,165062'
   IPASSSTRING "a"'
   LISPXHIST NIL'
   RESETY NIL'
   RESETZ NIL'
\TEDIT.COMMAND.LOOP'


Workaround: 

Test Case: 

Edit-By: Sybalsky

Edit-Date: 19-Jun-84 12':48':54