(PROGN (PRIN1 "Use LOADDB to load database files!
" T) (ERROR!))
(" 9-Oct-86 13:44:46" . {ERIS}<TEDIT>TEDITSELECTION.;20)
FNS (TEDIT.SEL.AS.STRING TEDIT.SELECTED.PIECES \TEDIT.FIND.FIRST.LINE \TEDIT.FIND.LAST.LINE 
\TEDIT.FIND.OVERLAPPING.LINE \TEDIT.FIND.PROTECTED.END \TEDIT.FIND.PROTECTED.START \TEDIT.WORD.BOUND 
TEDIT.EXTEND.SEL TEDIT.SELECT TEDIT.SCAN.LINE TEDIT.SELECT.LINE.SCANNER \TEDIT.SELECT.CHARACTER 
\FIXSEL \TEDIT.FIXDELSEL \TEDIT.FIXINSSEL \TEDIT.FIXSELS TEDIT.RESET.EXTEND.PENDING.DELETE 
\TEDIT.SET.SEL.LOOKS \SHOWSEL \SHOWSEL.HILIGHT \TEDIT.UPDATE.SHOWSEL \TEDIT.SHOWSELS 
\TEDIT.REFRESH.SHOWSEL \COPYSEL \TEDIT.SEL.CHANGED? TEDIT.GETPOINT TEDIT.GETSEL TEDIT.MAKESEL 
TEDIT.SCANSEL TEDIT.SET.SEL.LOOKS TEDIT.SETSEL TEDIT.SHOWSEL)
(READATABASE)
(
CALL TEDIT.SEL.AS.STRING (TEXTSTREAM fetch FETCHFIELD ALLOCSTRING \GETCH \BIN PLUS) 
TEDIT.SELECTED.PIECES (fetch FETCHFIELD TCONC IDIFFERENCE \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 
\ADDBASE ADD1 IPLUS \SPLITPIECE PLUS APPLY*) \TEDIT.FIND.FIRST.LINE (WINDOWPROP fetch FETCHFIELD 
REPLACEFIELD \TEDIT.PARABOUNDS SUB1 \BACKBIN PLUS ADD1 IMIN \FORMATLINE) \TEDIT.FIND.LAST.LINE (fetch 
FETCHFIELD bind) \TEDIT.FIND.OVERLAPPING.LINE (FETCHFIELD) \TEDIT.FIND.PROTECTED.END (bind \EDITELT 
GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE fetch FETCHFIELD ADD1 \CHTOPCNO IMIN SUB1 PLUS) 
\TEDIT.FIND.PROTECTED.START (bind ADD1 \CHTOPCNO IMAX IMIN fetch FETCHFIELD \EDITELT GETBASEPTR 
\GETBASEPTR \ADDBASE2 \ADDBASE SUB1 PLUS IMINUS) \TEDIT.WORD.BOUND (fetch FETCHFIELD \SYNCODE type? 
TYPENAMEP RAID GETHASH \GETBASEBYTE) TEDIT.EXTEND.SEL (TEDIT.SELECT SELECTQ fetch FETCHFIELD IABS 
IMINUS IDIFFERENCE REPLACEFIELD IMAX IPLUS SHOULDNT COPY \TEDIT.FIND.PROTECTED.START SUB1 IMIN ADD1 
\TEDIT.FIND.PROTECTED.END) TEDIT.SELECT (fetch FETCHFIELD TEDIT.SELECT.LINE.SCANNER \TEDIT.LINE.LIST 
TYPENAMEP REPLACEFIELD FIXR FQUOTIENT IDIFFERENCE IMAX ADD1 IMIN) TEDIT.SCAN.LINE (fetch FETCHFIELD 
FIXR FTIMES IMAX SUB1 \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE IGEQ HELP PLUS REPLACEFIELD 
IDIFFERENCE ADD1 LRSH IPLUS \WORDELT IMIN) TEDIT.SELECT.LINE.SCANNER (fetch FETCHFIELD 
DSPCLIPPINGREGION TEDIT.SCAN.LINE REPLACEFIELD \TEDIT.PARABOUNDS \TEDIT.FIND.PROTECTED.START 
\TEDIT.FIND.PROTECTED.END \FORMATLINE ADD1 IPLUS IDIFFERENCE replace) \TEDIT.SELECT.CHARACTER (replace
 REPLACEFIELD fetch FETCHFIELD IMAGEOBJPROP IMAGEBOX WINDOWPROP RESETSAVE DSPXOFFSET IDIFFERENCE IPLUS
 LIST FUNCTION DSPYOFFSET DSPCLIPPINGREGION create CONS IMIN ERSETQ APPLY*) \FIXSEL (PROG* fetch 
FETCHFIELD \TEDIT.MAINW DSPCLIPPINGREGION REPLACEFIELD IPLUS \WORDELT \EDITELT GETBASEPTR \GETBASEPTR 
\ADDBASE2 \ADDBASE PLUS SUB1 ADD1 IMIN FIXR FQUOTIENT IDIFFERENCE) \TEDIT.FIXDELSEL (FETCHFIELD 
IDIFFERENCE REPLACEFIELD IMAX) \TEDIT.FIXINSSEL (FETCHFIELD FFETCHFIELD IPLUS) \TEDIT.FIXSELS (for 
LIST fetch FETCHFIELD) TEDIT.RESET.EXTEND.PENDING.DELETE (FETCHFIELD replace REPLACEFIELD fetch) 
\TEDIT.SET.SEL.LOOKS (SELECTQ REPLACEFIELD) \SHOWSEL (fetch FETCHFIELD REPLACEFIELD) \SHOWSEL.HILIGHT 
(fetch FETCHFIELD IDIFFERENCE IMIN FIXR FQUOTIENT \MICASTOPTS) \TEDIT.UPDATE.SHOWSEL (fetch FETCHFIELD
 REPLACEFIELD) \TEDIT.SHOWSELS (for MAPC LIST fetch FETCHFIELD \SHOWSEL) \TEDIT.REFRESH.SHOWSEL (
REPLACEFIELD fetch FETCHFIELD) \COPYSEL (FETCHFIELD COPY REPLACEFIELD) \TEDIT.SEL.CHANGED? (FETCHFIELD
) TEDIT.GETPOINT (fetch FETCHFIELD TEXTOBJ IMAX SELECTQ SHOULDNT) TEDIT.GETSEL (create NCREATE fetch 
FETCHFIELD) TEDIT.MAKESEL (fetch FETCHFIELD REPLACEFIELD IMAX IPLUS) TEDIT.SCANSEL (fetch FETCHFIELD) 
TEDIT.SET.SEL.LOOKS (FETCHFIELD) TEDIT.SETSEL (TEXTOBJ fetch FETCHFIELD TYPENAMEP REPLACEFIELD IMIN 
IMAX ADD1 IPLUS IDIFFERENCE \CHTOPC \TEDIT.GET.INSERT.CHARLOOKS) TEDIT.SHOWSEL (fetch FETCHFIELD 
REPLACEFIELD) NIL
BIND TEDIT.SEL.AS.STRING (OFFST BASE) TEDIT.SELECTED.PIECES (CROSSCOPY LEN INSPC INSPC# OPLEN EVENT 
REPLACING INSERTCH# OBJ COPYFN UNDOCHAIN) \TEDIT.FIND.FIRST.LINE (WWIDTH) \TEDIT.FIND.LAST.LINE (CURY)
 \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL \TEDIT.FIND.PROTECTED.START NIL 
\TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT (L1 LN) TEDIT.SCAN.LINE (YBOT YBASE) 
TEDIT.SELECT.LINE.SCANNER (WWIDTH) \TEDIT.SELECT.CHARACTER NIL \FIXSEL (ENDFOUND) \TEDIT.FIXDELSEL NIL
 \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL \TEDIT.SET.SEL.LOOKS 
NIL \SHOWSEL (HOW LL SHOWFN) \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL (TSTFLG LL) \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
NLAMBDA TEDIT.SEL.AS.STRING (CHARCODE) TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE (CHARCODE) 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE (CHARCODE) TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
NOBIND TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
RECORD TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL (SELECTION) \TEDIT.SEL.CHANGED? (SELECTION) TEDIT.GETPOINT NIL
 TEDIT.GETSEL NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL 
TEDIT.SHOWSEL NIL NIL
CREATE TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
FETCH TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE (YBOT NEXTLINE) \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL (SET \TEXTOBJ CH# CHLIM) \TEDIT.FIXINSSEL (SET \TEXTOBJ CH# CHLIM) \TEDIT.FIXSELS NIL
 TEDIT.RESET.EXTEND.PENDING.DELETE NIL \TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL 
\TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL (Y0 X0 DX CH# XLIM 
CHLIM DCH L1 LN YLIM POINT SET \TEXTOBJ SELKIND HOW HOWHEIGHT HASCARET SELOBJ ONFLG) 
\TEDIT.SEL.CHANGED? (SET CH# CHLIM \TEXTOBJ DX POINT HOW HOWHEIGHT) TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS (ONFLG) TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL
 NIL
REPLACE TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL (CH# CHLIM DCH) \TEDIT.FIXINSSEL (CH# CHLIM) \TEDIT.FIXSELS NIL 
TEDIT.RESET.EXTEND.PENDING.DELETE NIL \TEDIT.SET.SEL.LOOKS (HOW HOWHEIGHT HASCARET) \SHOWSEL NIL 
\SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL
 (Y0 X0 DX CH# XLIM CHLIM DCH L1 LN YLIM POINT SET \TEXTOBJ SELKIND HOW HOWHEIGHT HASCARET SELOBJ 
ONFLG) \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL
 TEDIT.SET.SEL.LOOKS (HOW HOWHEIGHT HASCARET) TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
REFFREE TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES (\EltsPerPiece \FirstPieceOffset) 
\TEDIT.FIND.FIRST.LINE NIL \TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL 
\TEDIT.FIND.PROTECTED.END (\EltsPerPiece) \TEDIT.FIND.PROTECTED.START (\FirstPieceOffset \EltsPerPiece
) \TEDIT.WORD.BOUND (TEDIT.WORDBOUND.READTABLE \MAXTHINCHAR) TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE (LMInvisibleRun LMLooksChange) TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER 
NIL \FIXSEL (LMInvisibleRun LMLooksChange) \TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS 
NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL \TEDIT.SET.SEL.LOOKS (BLACKSHADE COPYSELSHADE 
COPYLOOKSSELSHADE EDITMOVESHADE) \SHOWSEL (BLACKSHADE) \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL (
BLACKSHADE) \TEDIT.SHOWSELS NIL \TEDIT.REFRESH.SHOWSEL (TEDIT.SELECTION TEDIT.SHIFTEDSELECTION 
TEDIT.MOVESELECTION TEDIT.DELETESELECTION TEDIT.COPYLOOKSSELECTION) \COPYSEL NIL \TEDIT.SEL.CHANGED? 
NIL TEDIT.GETPOINT NIL TEDIT.GETSEL NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS (
BLACKSHADE COPYSELSHADE COPYLOOKSSELSHADE EDITMOVESHADE) TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
REF TEDIT.SEL.AS.STRING (SEL TEXTOBJ) TEDIT.SELECTED.PIECES (SEL TEXTOBJ BASEA0539 BASEA0540 BASEA0541
 BASEA0542 BASEA0543 NO ARR BASEA0544 CH1 CHLIM FNARG1 FNARG2) \TEDIT.FIND.FIRST.LINE (TEXTOBJ 
TEXTSTREAM WHEIGHT) \TEDIT.FIND.LAST.LINE (TEXTOBJ) \TEDIT.FIND.OVERLAPPING.LINE (Y) 
\TEDIT.FIND.PROTECTED.END (BASEA0546 ARRA0545 TEXTOBJ CH# LIMITCH# BASEA0548 ARRA0547 BASEA0550 
ARRA0549 BASEA0551 NO ARR PCTB OURLIMIT BASEA0552 BASEA0553) \TEDIT.FIND.PROTECTED.START (CH# TEXTOBJ 
LIMITCH# BASEA0554 NO ARR PCTB OURLIMIT BASEA0555 BASEA0556) \TEDIT.WORD.BOUND (TEXTOBJ PREVCH CH 
READSA) TEDIT.EXTEND.SEL (NEWSEL X Y TEXTOBJ OSEL SELOPERATION SELWINDOW TEXTLEN A) TEDIT.SELECT (
TEXTOBJ X Y WINDOW REGION WORDSELFLG SELOPERATION TEXTLEN) TEDIT.SCAN.LINE (THISLINE TEXTOBJ LINE 
BASEA0557 LLIST BASEA0558 CHLIST BASEA0559 BASEA0560 BASEA0561 BASEA0562 SELOPERATION Y WINDOW WLIST 
TEXTLEN) TEDIT.SELECT.LINE.SCANNER (TEXTOBJ WINDOW LINE.LIST WREG Y REGION THISLINE X SELOPERATION 
TEXTLEN) \TEDIT.SELECT.CHARACTER (PREVCH SEL TXB LINE SELWINDOW DS OBJBOX TEXTOBJ X Y) \FIXSEL (SEL 
TEXTOBJ WREG WINDOW THISLINE CH# BASEA0563 BASEA0564 BASEA0565 CHLIM BASEA0566 BASEA0567 BASEA0568) 
\TEDIT.FIXDELSEL (TEXTOBJ CH#LIM DCH CH#1) \TEDIT.FIXINSSEL (TEXTOBJ CH#1 DCH) \TEDIT.FIXSELS (TEXTOBJ
 EXCEPT) TEDIT.RESET.EXTEND.PENDING.DELETE NIL \TEDIT.SET.SEL.LOOKS (OPERATION) \SHOWSEL (SEL TEXTOBJ 
SHADEHEIGHT SHADE) \SHOWSEL.HILIGHT (DS X0 SEL XLIM SHADEHEIGHT SHADE LINES TEXTOBJ) 
\TEDIT.UPDATE.SHOWSEL (TEXTOBJ SHADEHEIGHT SHADE) \TEDIT.SHOWSELS (TEXTOBJ SELN HOW ON) 
\TEDIT.REFRESH.SHOWSEL (OLDOP NEWOP NEWSEL TEXTOBJ) \COPYSEL (FROM) \TEDIT.SEL.CHANGED? (OLDSEL 
OLDSELOP NEWSELOP) TEDIT.GETPOINT (SEL STREAM TSEL) TEDIT.GETSEL (STREAM) TEDIT.MAKESEL (STREAM SEL 
CH# LEN POINT TEXTOBJ) TEDIT.SCANSEL (STREAM TEXTOBJ) TEDIT.SET.SEL.LOOKS (OPERATION WASON) 
TEDIT.SETSEL (STREAM TEXTOBJ CH# LEN POINT OPERATION) TEDIT.SHOWSEL (STREAM TEXTOBJ ONFLG) NIL
SETFREE TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER (WORDSELFLG) \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE (
TEDIT.PENDINGDEL) \TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL
 \TEDIT.SHOWSELS NIL \TEDIT.REFRESH.SHOWSEL (GLOBALSEL) \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL 
TEDIT.GETPOINT NIL TEDIT.GETSEL NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL 
TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
SET TEDIT.SEL.AS.STRING (STREAM TSEL LEN RESULT I) TEDIT.SELECTED.PIECES (PCLST PCCH PC NPCCH I PCTB 
NPC) \TEDIT.FIND.FIRST.LINE (CHNO CH CH# LINE LINES) \TEDIT.FIND.LAST.LINE (LINES OLINE LINE) 
\TEDIT.FIND.OVERLAPPING.LINE (LINES) \TEDIT.FIND.PROTECTED.END (I) \TEDIT.FIND.PROTECTED.START (I) 
\TEDIT.WORD.BOUND (SYN1 SYN2) TEDIT.EXTEND.SEL (NPOINT SETOSELFLG FIXUPNEEDED) TEDIT.SELECT (SEL 
PREVLINE) TEDIT.SCAN.LINE (X OTX TXB TX CHB CLOOKS PREVCH PCLOOKS CH CHNO LOOKNO I L L1 LN WW CHOBJB 
DX) TEDIT.SELECT.LINE.SCANNER (L TL1 TLN WW L1 LN PARABOUNDS PARASTART PARAEND LL PREVLINE LINE) 
\TEDIT.SELECT.CHARACTER (SELRES) \FIXSEL (L1 LN WW LINES WLIST CHLIST LOOKS STARTFOUND L1HCPY TX DX 
LOOKNO CHNO I LNHCPY PREVLINE LINE) \TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL (CH# CHLIM) \TEDIT.FIXSELS (
SELN) TEDIT.RESET.EXTEND.PENDING.DELETE NIL \TEDIT.SET.SEL.LOOKS NIL \SHOWSEL (L1 LN DS LINES CARET) 
\SHOWSEL.HILIGHT (RIGHT LL LEFT) \TEDIT.UPDATE.SHOWSEL (CARET OSEL NSEL EXCHFLG NEWL1 OLDL1 LINES DS 
OLDLN NEWLN TSEL L1 LN) \TEDIT.SHOWSELS NIL \TEDIT.REFRESH.SHOWSEL (NOSEL OLDSEL) \COPYSEL NIL 
\TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL (SEL) 
TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL (SEL TEXTLEN) TEDIT.SHOWSEL NIL NIL
SMASHFREE TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
SMASH TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES (PCLST) \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE (L1 LN) TEDIT.SELECT.LINE.SCANNER (L1 LN) \TEDIT.SELECT.CHARACTER NIL \FIXSEL (L1 LN) 
\TEDIT.FIXDELSEL (SELTOFIX) \TEDIT.FIXINSSEL (SELTOFIX) \TEDIT.FIXSELS NIL 
TEDIT.RESET.EXTEND.PENDING.DELETE NIL \TEDIT.SET.SEL.LOOKS (SEL) \SHOWSEL NIL \SHOWSEL.HILIGHT NIL 
\TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL (TO) 
\TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL 
TEDIT.SET.SEL.LOOKS (SEL) TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
PROP TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE (LINES) 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER (DSP) \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
TEST TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES (PIECEMAPFN) \TEDIT.FIND.FIRST.LINE (WINDOW) 
\TEDIT.FIND.LAST.LINE (LINE) \TEDIT.FIND.OVERLAPPING.LINE (LINES) \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL (NSEL FIXUPNEEDED SETOSELFLG) 
TEDIT.SELECT NIL TEDIT.SCAN.LINE (WORDSELFLG L) TEDIT.SELECT.LINE.SCANNER (LINE WORDSELFLG) 
\TEDIT.SELECT.CHARACTER (SELRES) \FIXSEL (THISW AVOIDINGTHISW THISWINDOW LINE STARTFOUND L1HCPY LNHCPY
) \TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE (SEL)
 \TEDIT.SET.SEL.LOOKS NIL \SHOWSEL (ON L1 LN) \SHOWSEL.HILIGHT (L1 LN LL) \TEDIT.UPDATE.SHOWSEL (
EXCHFLG L1 LN) \TEDIT.SHOWSELS NIL \TEDIT.REFRESH.SHOWSEL (EXTENDING) \COPYSEL NIL \TEDIT.SEL.CHANGED?
 (NEWSEL) TEDIT.GETPOINT NIL TEDIT.GETSEL NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS 
NIL TEDIT.SETSEL (PENDINGDELFLG LEAVECARETLOOKS) TEDIT.SHOWSEL (SEL) NIL
TESTFREE TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER (WORDSELFLG) \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
PREDICATE TEDIT.SEL.AS.STRING (ZEROP GREATERP) TEDIT.SELECTED.PIECES (ZEROP MINUSP LESSP GREATERP ILEQ
 IGEQ ILESSP) \TEDIT.FIND.FIRST.LINE (ZEROP IGREATERP LESSP ILEQ IEQP) \TEDIT.FIND.LAST.LINE (ILESSP) 
\TEDIT.FIND.OVERLAPPING.LINE (ILEQ) \TEDIT.FIND.PROTECTED.END (ZEROP MINUSP LESSP GREATERP IGREATERP) 
\TEDIT.FIND.PROTECTED.START (ZEROP MINUSP LESSP GREATERP ILEQ) \TEDIT.WORD.BOUND (FIXP IGREATERP) 
TEDIT.EXTEND.SEL (ZEROP IGEQ ILEQ IGREATERP) TEDIT.SELECT (type? IGREATERP) TEDIT.SCAN.LINE (GREATERP 
ILESSP SMALLP \TEDIT.WORD.BOUND ZEROP) TEDIT.SELECT.LINE.SCANNER (ILESSP ILEQ IGEQ IGREATERP IEQP 
ZEROP) \TEDIT.SELECT.CHARACTER (SMALLP FMEMB) \FIXSEL (IGEQ ILEQ IGREATERP GREATERP IEQP ILESSP) 
\TEDIT.FIXDELSEL (IGEQ IGREATERP IEQP) \TEDIT.FIXINSSEL (IGEQ IGREATERP) \TEDIT.FIXSELS NIL 
TEDIT.RESET.EXTEND.PENDING.DELETE NIL \TEDIT.SET.SEL.LOOKS NIL \SHOWSEL (IGEQ) \SHOWSEL.HILIGHT (IGEQ 
ILESSP) \TEDIT.UPDATE.SHOWSEL (ILESSP) \TEDIT.SHOWSELS NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL 
\TEDIT.SEL.CHANGED? (EQUAL IEQP) TEDIT.GETPOINT NIL TEDIT.GETSEL NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL 
NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL (type? IGREATERP) TEDIT.SHOWSEL NIL NIL
EFFECT TEDIT.SEL.AS.STRING (\SETUPGETCH for RPLCHARCODE) TEDIT.SELECTED.PIECES (for DECLARE add) 
\TEDIT.FIND.FIRST.LINE (replace \SETUPGETCH for repeatwhile) \TEDIT.FIND.LAST.LINE NIL 
\TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END (DECLARE) \TEDIT.FIND.PROTECTED.START (
DECLARE) \TEDIT.WORD.BOUND (CHECK) TEDIT.EXTEND.SEL (\TEDIT.SET.SEL.LOOKS DECLARE replace \FIXSEL 
\COPYSEL) TEDIT.SELECT (\TEDIT.SET.SEL.LOOKS replace \FIXSEL) TEDIT.SCAN.LINE (\FORMATLINE DECLARE 
\TEDIT.CHECK for add replace \TEDIT.SELECT.CHARACTER RPLACA) TEDIT.SELECT.LINE.SCANNER (bind SELECTQ 
for RPLACA \BACKFORMAT \FIXSEL SHOULDNT) \TEDIT.SELECT.CHARACTER (DECLARE RESETLST 
TEDIT.OBJECT.CHANGED) \FIXSEL (replace for RPLACA bind \FORMATLINE DECLARE add) \TEDIT.FIXDELSEL NIL 
\TEDIT.FIXINSSEL (FREPLACEFIELD) \TEDIT.FIXSELS (\FIXSEL) TEDIT.RESET.EXTEND.PENDING.DELETE (
\TEDIT.SET.SEL.LOOKS) \TEDIT.SET.SEL.LOOKS NIL \SHOWSEL (for \TEDIT.OBJECT.SHOWSEL \SHOWSEL.HILIGHT 
\SETCARET MOVETO \EDIT.UPCARET replace) \SHOWSEL.HILIGHT (BITBLT while) \TEDIT.UPDATE.SHOWSEL (replace
 for \EDIT.UPCARET swap \SHOWSEL.HILIGHT \SETCARET) \TEDIT.SHOWSELS NIL \TEDIT.REFRESH.SHOWSEL (
DECLARE \TEDIT.UPDATE.SHOWSEL \COPYSEL replace \SHOWSEL SELECTQ \TEDIT.SET.SEL.LOOKS) \COPYSEL NIL 
\TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL NIL TEDIT.MAKESEL (\SHOWSEL replace \FIXSEL) 
TEDIT.SCANSEL (\SETUPGETCH) TEDIT.SET.SEL.LOOKS (\SHOWSEL SELECTQ REPLACEFIELD) TEDIT.SETSEL (\SHOWSEL
 \COPYSEL replace \TEDIT.SET.SEL.LOOKS TEDIT.RESET.EXTEND.PENDING.DELETE \FIXSEL) TEDIT.SHOWSEL (
replace \FIXSEL \SHOWSEL) NIL
CLISP TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE (while do) \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
SPECVARS TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
LOCALVARS TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES (BASEA0539 BASEA0540 BASEA0541 BASEA0542 ARR 
NO BASEA0543 BASEA0544) \TEDIT.FIND.FIRST.LINE NIL \TEDIT.FIND.LAST.LINE NIL 
\TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END (ARRA0545 BASEA0546 ARRA0547 BASEA0548 
ARRA0549 BASEA0550 ARR NO BASEA0551 BASEA0552 BASEA0553) \TEDIT.FIND.PROTECTED.START (ARR NO BASEA0554
 BASEA0555 BASEA0556) \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL (A) TEDIT.SELECT NIL TEDIT.SCAN.LINE (
BASEA0557 BASEA0558 BASEA0559 BASEA0560 BASEA0561 BASEA0562) TEDIT.SELECT.LINE.SCANNER NIL 
\TEDIT.SELECT.CHARACTER NIL \FIXSEL (BASEA0563 BASEA0564 BASEA0565 BASEA0566 BASEA0567 BASEA0568) 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
APPLY TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER (DSPXOFFSET DSPYOFFSET 
DSPCLIPPINGREGION) \FIXSEL NIL \TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL 
TEDIT.RESET.EXTEND.PENDING.DELETE NIL \TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL 
\TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL 
\TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL 
TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
ERROR TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES (apply) \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER (apply) \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
LOCALFREEVARS TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
ARGS TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL 
\TEDIT.FIND.LAST.LINE NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL 
\TEDIT.FIND.PROTECTED.START NIL \TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL 
TEDIT.SCAN.LINE NIL TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL 
\TEDIT.FIXDELSEL NIL \TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL 
\TEDIT.SET.SEL.LOOKS NIL \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS 
NIL \TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL 
NIL TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL
USERTEMPLATES REF (CALL EVAL (IF (AND (CONSP EXPR) (EQ (CAR EXPR) (QUOTE QUOTE))) (NIL FETCH) EVAL)) 
SHAZAM (CALL .. NIL) UNINTERRUPTABLY (CALL .. EVAL) WINDOWPROP (CALL EVAL PROP EVAL . PPE) PERFORM (
MACRO ARGS (PERFORMTRAN ARGS T)) \DoveIO.LockMem (CALL .. EVAL) RUN-SUPER (CALL .. EVAL) SPREADAPPLY (
CALL FUNCTIONAL EVAL . PPE) perform (MACRO ARGS (PERFORMTRAN ARGS T)) WINDOWDELPROP (CALL EVAL PROP 
EVAL . PPE) SPREADAPPLY* (CALL FUNCTIONAL .. EVAL) WINDOWADDPROP (CALL EVAL PROP EVAL EVAL . PPE) OP# 
(CALL) SETQ.NOREF (CALL SET EVAL . PPE) CATCH (CALL CALL CALL .. EVAL) NIL
0 TEDIT.SEL.AS.STRING NIL TEDIT.SELECTED.PIECES NIL \TEDIT.FIND.FIRST.LINE NIL \TEDIT.FIND.LAST.LINE 
NIL \TEDIT.FIND.OVERLAPPING.LINE NIL \TEDIT.FIND.PROTECTED.END NIL \TEDIT.FIND.PROTECTED.START NIL 
\TEDIT.WORD.BOUND NIL TEDIT.EXTEND.SEL NIL TEDIT.SELECT NIL TEDIT.SCAN.LINE NIL 
TEDIT.SELECT.LINE.SCANNER NIL \TEDIT.SELECT.CHARACTER NIL \FIXSEL NIL \TEDIT.FIXDELSEL NIL 
\TEDIT.FIXINSSEL NIL \TEDIT.FIXSELS NIL TEDIT.RESET.EXTEND.PENDING.DELETE NIL \TEDIT.SET.SEL.LOOKS NIL
 \SHOWSEL NIL \SHOWSEL.HILIGHT NIL \TEDIT.UPDATE.SHOWSEL NIL \TEDIT.SHOWSELS NIL 
\TEDIT.REFRESH.SHOWSEL NIL \COPYSEL NIL \TEDIT.SEL.CHANGED? NIL TEDIT.GETPOINT NIL TEDIT.GETSEL NIL 
TEDIT.MAKESEL NIL TEDIT.SCANSEL NIL TEDIT.SET.SEL.LOOKS NIL TEDIT.SETSEL NIL TEDIT.SHOWSEL NIL NIL

)