(PROGN (PRIN1 "Use LOADDB to load database files!
" T) (ERROR!))
(" 6-Oct-86 12:59:18" . {ERIS}<TEDIT>TEDITFILE.;32)
FNS (TEDIT.BUILD.PCTB \TEDIT.CONVERT.FOREIGN.FORMAT TEDIT.FORMATTEDFILEP TEDIT.GET TEDIT.INCLUDE 
TEDIT.PARSE.PAGEFRAMES1 TEDIT.PUT TEDIT.PUT.PCTB \TEDIT.PUTRESET TEDIT.PUT.PIECE.DESCRIPTOR \ARBIN 
\ARBOUT \ATMIN \ATMOUT \DWIN \DWOUT \STRINGIN \STRINGOUT \TEDIT.FORMATTEDP1 \TEDIT.SET.WINDOW 
TEDIT.RAW.INCLUDE \TEDIT.GET.CHARLOOKS.LIST \TEDIT.GET.SINGLE.CHARLOOKS \TEDIT.PUT.PARALOOKS.LIST 
\TEDIT.PUT.SINGLE.CHARLOOKS \TEDIT.GET.PARALOOKS.LIST \TEDIT.GET.SINGLE.PARALOOKS 
\TEDIT.PUT.CHARLOOKS.LIST \TEDIT.PUT.SINGLE.PARALOOKS TEDIT.BUILD.PCTB2 \TEDIT.GET.CHARLOOKS.LIST2 
\TEDIT.GET.SINGLE.CHARLOOKS2 \TEDIT.PUT.SINGLE.PARALOOKS2 \TEDIT.PUT.SINGLE.CHARLOOKS2 
\TEDIT.GET.PARALOOKS.LIST2 \TEDIT.GET.SINGLE.PARALOOKS2 TEDIT.PUT.PCTB2 \TEDIT.PUT.CHARLOOKS.LIST2 
\TEDIT.PUT.PARALOOKS.LIST2 TEDIT.BUILD.PCTB1 TEDIT.GET.PAGEFRAMES1 \TEDIT.GET.CHARLOOKS1 
\TEDIT.GET.PARALOOKS1 TEDIT.GET.OBJECT1 TEDIT.BUILD.PCTB0 TEDIT.GET.CHARLOOKS0 TEDIT.GET.OBJECT0 
TEDIT.GET.PARALOOKS0)
(READATABASE)
(
CALL TEDIT.BUILD.PCTB (fetch FETCHFIELD create NCREATE REPLACEFIELD CHARLOOKS.FROM.FONT 
\CREATEPIECEORSTREAM TEXTPROP OPENSTREAM \TEDIT.FORMATTEDP1 TYPENAMEP \MAKEPCTB 
\TEDIT.UNIQUIFY.CHARLOOKS \TEDIT.UNIQUIFY.PARALOOKS FREPLACEFIELDVAL IDIFFERENCE GETEOFPTR for APPLY* 
\TEDIT.CONVERT.FOREIGN.FORMAT ELT ADD1 TEDIT.BUILD.PCTB0 TEDIT.BUILD.PCTB1 TEDIT.BUILD.PCTB2 \DWIN 
\SMALLPIN SUB1 LLSH TEDIT.GET.PAGEFRAMES PLUS IMINUS \TEDIT.GET.CHARLOOKS.LIST ARRAY FLENGTH 
\TEDIT.GET.PARALOOKS.LIST \TEDIT.GET.PARALOOKS \BIN \TEDIT.GET.SINGLE.CHARLOOKS IPLUS GETFILEPTR 
\RPLPTR \ADDBASE2 \ADDBASE) \TEDIT.CONVERT.FOREIGN.FORMAT (OPENTEXTSTREAM RESETSAVE \TEDIT.SET.WINDOW 
CONS TEXTOBJ APPLY* fetch FETCHFIELD REPLACEFIELD) TEDIT.FORMATTEDFILEP (TEXTOBJ fetch FETCHFIELD 
TEXTPROP \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE ADD1 IMAX SELECTQ) TEDIT.GET (TEXTOBJ 
TEXTPROP fetch FETCHFIELD FFETCHFIELD \TEDIT.MAKEFILENAME TEDIT.GETINPUT \TEXTSTREAM.FILENAME APPLY* 
FULLNAME RESETSAVE TTYDISPLAYSTREAM CURSOR \SHOWSEL \TEXTCLOSEF OPENP OPENSTREAM replace REPLACEFIELD 
TEDIT.BUILD.PCTB for MAPC EVAL \TEDIT.WINDOW.TITLE \TEDIT.ORIGINAL.WINDOW.TITLE ffetch freplace 
FREPLACEFIELD SUB1 \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE \TEDIT.GET.INSERT.CHARLOOKS 
\FIXSEL TEXTSTREAM.TITLE TEDITMENU.STREAM LITATOM PACKFILENAME MBUTTON.SET.FIELD 
\TEDIT.SET.WINDOW.EXTENT \TEDIT.PRIMARYW \TEDIT.HISTORYADD create CONS) TEDIT.INCLUDE (TEXTOBJ fetch 
FETCHFIELD \TEDIT.MAKEFILENAME TEDIT.GETINPUT STREAMP OPENSTREAM OPENFILE GETEOFPTR OPENTEXTSTREAM 
LIST \TEDIT.GET.INSERT.CHARLOOKS \CHTOPCNO \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE ADD1 
\SPLITPIECE PLUS SUB1 IDIFFERENCE IPLUS create CONS REPLACEFIELD replace \TEDIT.WINDOW.TITLE 
\TEDIT.ORIGINAL.WINDOW.TITLE ffetch FFETCHFIELD freplace FREPLACEFIELD) TEDIT.PARSE.PAGEFRAMES1 (
MAPCAR LIST \MICASTOPTS FREPLACEFIELDVAL NCREATE TEDIT.PARSE.PAGEFRAMES1) TEDIT.PUT (TEXTOBJ 
\TEDIT.MAKEFILENAME TEDIT.GETINPUT \TEXTSTREAM.FILENAME TEXTPROP APPLY* fetch FETCHFIELD FULLNAME 
RESETSAVE OPENSTREAM \TEDIT.PUTRESET CONS THIS.PROCESS replace REPLACEFIELD TEDIT.PROMPTPRINT CONCAT 
TEDIT.PUT.PCTB2 TEDIT.PUT.PCTB CLOSEF CLOSEF? \TEDIT.WINDOW.TITLE \TEDIT.ORIGINAL.WINDOW.TITLE ffetch 
FFETCHFIELD freplace FREPLACEFIELD REVERSE ELT ADD1 while pop TEXTSTREAM.TITLE TEDITMENU.STREAM 
LITATOM PACKFILENAME create) TEDIT.PUT.PCTB (fetch FETCHFIELD TEXTPROP TEDIT.FORMATTEDFILEP \EDITELT 
GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE ADD1 TYPENAMEP OPENFILE GETFILEPTR PLUS FLENGTH 
\TEDIT.PUT.PARALOOKS.LIST \TEDIT.PUT.CHARLOOKS.LIST TEDIT.PUT.OBJECT OPENP REPLACEFIELD OPENSTREAM 
IPLUS UNFOLD LLSH SUB1 ffetch FFETCHFIELD \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE \CHARSET LRSH
 \CHAR8CODE LOGAND CONS MAPC EVAL \BOUT GETEOFPTR \TEDIT.UNIQUIFY.CHARLOOKS \TEDIT.UNIQUIFY.PARALOOKS)
 \TEDIT.PUTRESET (CONS PROCESSPROP) TEDIT.PUT.PIECE.DESCRIPTOR (FETCHFIELD CONCAT KWOTE FONTPROP 
IDIFFERENCE LOGAND LRSH \BOUT NCHARS LOGOR) \ARBIN (\SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH 
IDIFFERENCE OPENSTRINGSTREAM \STRINGIN READ) \ARBOUT (MKSTRING LOGAND LRSH \BOUT NCHARS ZEROP PRIN3) 
\ATMIN (\SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH IDIFFERENCE PACK CHARACTER \BIN LIST PLUS) \ATMOUT (
LOGAND LRSH \BOUT NCHARS ZEROP FFETCHFIELD \PNAMECELL \ATOMCELL \PROPCELL ADD1 \GETBASEFAT \GETBASE 
\GETBASETHIN \GETBASEBYTE) \DWIN (IPLUS LLSH \BIN) \DWOUT (LOGAND LRSH \BOUT) \STRINGIN (\SMALLPIN 
SIGNED OPENLAMBDA N SUB1 LLSH IDIFFERENCE ALLOCSTRING ZEROP \BIN PLUS) \STRINGOUT (NCHARS LOGAND LRSH 
\BOUT ZEROP SUB1 FFETCHFIELD IPLUS SELECTC ADD1 \GETBASEFAT \GETBASE \GETBASETHIN \GETBASEBYTE PLUS) 
\TEDIT.FORMATTEDP1 (GETEOFPTR IDIFFERENCE \DWIN \SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH CONS) 
\TEDIT.SET.WINDOW (CONS fetch FETCHFIELD REPLACEFIELD) TEDIT.RAW.INCLUDE (TEXTOBJ fetch FETCHFIELD 
OPENSTREAM OPENFILE TEDIT.GETPOINT \CHTOPCNO \EDITELT GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE ADD1 
\SPLITPIECE PLUS create FREPLACEFIELDVAL NCREATE IDIFFERENCE GETEOFPTR \TEDIT.UNIQUIFY.CHARLOOKS 
CHARLOOKS.FROM.FONT REPLACEFIELD IPLUS replace \TEDIT.WINDOW.TITLE \TEDIT.ORIGINAL.WINDOW.TITLE ffetch
 FFETCHFIELD freplace FREPLACEFIELD CONS) \TEDIT.GET.CHARLOOKS.LIST (\SMALLPIN SIGNED OPENLAMBDA N 
SUB1 LLSH IDIFFERENCE \TEDIT.GET.SINGLE.CHARLOOKS LIST PLUS) \TEDIT.GET.SINGLE.CHARLOOKS (PROG* \ARBIN
 \SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH IDIFFERENCE LOGAND FONTCLASS FONTCREATE IPLUS GETFILEPTR 
FREPLACEFIELDVAL NCREATE) \TEDIT.PUT.PARALOOKS.LIST (HASHARRAY LOGAND LRSH \BOUT FLENGTH PLUS) 
\TEDIT.PUT.SINGLE.CHARLOOKS (GETFILEPTR FETCHFIELD LOGAND LRSH \BOUT FONTCLASSUNPARSE FONTPROP LOGOR 
IDIFFERENCE) \TEDIT.GET.PARALOOKS.LIST (\SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH IDIFFERENCE 
\TEDIT.GET.SINGLE.PARALOOKS LIST PLUS) \TEDIT.GET.SINGLE.PARALOOKS (FREPLACEFIELDVAL NCREATE CONS 
GETFILEPTR \SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH IDIFFERENCE \BIN SELECTC SHOULDNT LOGAND SELECTQ 
LIST PLUS ZEROP \ARBIN \ATMIN IPLUS) \TEDIT.PUT.CHARLOOKS.LIST (HASHARRAY LOGAND LRSH \BOUT FLENGTH 
PLUS) \TEDIT.PUT.SINGLE.PARALOOKS (GETFILEPTR LOGAND LRSH \BOUT FETCHFIELD SELECTQ SHOULDNT LENGTH 
IDIFFERENCE) TEDIT.BUILD.PCTB2 (fetch FETCHFIELD create NCREATE CHARLOOKS.FROM.FONT REPLACEFIELD 
\MAKEPCTB IDIFFERENCE GETEOFPTR \DWIN \SMALLPIN SUB1 LLSH TEDIT.GET.PAGEFRAMES PLUS IMINUS 
\TEDIT.GET.CHARLOOKS.LIST2 ARRAY FLENGTH \TEDIT.GET.PARALOOKS.LIST2 \TEDIT.GET.PARALOOKS 
FREPLACEFIELDVAL \BIN \TEDIT.GET.SINGLE.CHARLOOKS2 \RPLPTR \ADDBASE2 \ADDBASE ADD1) 
\TEDIT.GET.CHARLOOKS.LIST2 (\SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH IDIFFERENCE 
\TEDIT.GET.SINGLE.CHARLOOKS2 LIST PLUS) \TEDIT.GET.SINGLE.CHARLOOKS2 (PROG* \ARBIN \SMALLPIN SIGNED 
OPENLAMBDA N SUB1 LLSH IDIFFERENCE LOGAND FONTCLASS FONTCREATE FREPLACEFIELDVAL NCREATE) 
\TEDIT.PUT.SINGLE.PARALOOKS2 (LOGAND LRSH \BOUT FETCHFIELD SELECTQ SHOULDNT LENGTH) 
\TEDIT.PUT.SINGLE.CHARLOOKS2 (FETCHFIELD FONTCLASSUNPARSE FONTPROP LOGAND LRSH \BOUT LOGOR) 
\TEDIT.GET.PARALOOKS.LIST2 (\SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH IDIFFERENCE 
\TEDIT.GET.SINGLE.PARALOOKS2 LIST PLUS) \TEDIT.GET.SINGLE.PARALOOKS2 (FREPLACEFIELDVAL NCREATE CONS 
\SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH IDIFFERENCE \BIN SELECTC SHOULDNT LOGAND SELECTQ LIST PLUS 
ZEROP \ARBIN \ATMIN) TEDIT.PUT.PCTB2 (fetch FETCHFIELD TEXTPROP TEDIT.FORMATTEDFILEP \EDITELT 
GETBASEPTR \GETBASEPTR \ADDBASE2 \ADDBASE ADD1 TYPENAMEP OPENFILE GETFILEPTR PLUS FLENGTH 
\TEDIT.PUT.PARALOOKS.LIST2 \TEDIT.PUT.CHARLOOKS.LIST2 \TEDIT.PUT.CHARLOOKS.LIST TEDIT.PUT.OBJECT OPENP
 REPLACEFIELD OPENSTREAM IPLUS UNFOLD LLSH SUB1 ffetch FFETCHFIELD \GETBASEFAT \GETBASE \GETBASETHIN 
\GETBASEBYTE \CHARSET LRSH \CHAR8CODE LOGAND CONS MAPC EVAL GETEOFPTR \BOUT \TEDIT.UNIQUIFY.CHARLOOKS 
\TEDIT.UNIQUIFY.PARALOOKS) \TEDIT.PUT.CHARLOOKS.LIST2 (HASHARRAY LOGAND LRSH \BOUT FLENGTH PLUS) 
\TEDIT.PUT.PARALOOKS.LIST2 (HASHARRAY LOGAND LRSH \BOUT FLENGTH PLUS) TEDIT.BUILD.PCTB1 (fetch 
FETCHFIELD create NCREATE CHARLOOKS.FROM.FONT REPLACEFIELD \MAKEPCTB IDIFFERENCE GETEOFPTR \DWIN 
\SMALLPIN SUB1 LLSH TEDIT.GET.PAGEFRAMES1 PLUS IMINUS \TEDIT.GET.PARALOOKS1 FREPLACEFIELDVAL \BIN 
IPLUS for CONS \RPLPTR \ADDBASE2 \ADDBASE ADD1) TEDIT.GET.PAGEFRAMES1 (TEDIT.PARSE.PAGEFRAMES1 READ) 
\TEDIT.GET.CHARLOOKS1 (FREPLACEFIELDVAL NCREATE \ARBIN \SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH 
IDIFFERENCE ZEROP IMINUS \BIN LOGAND FONTCLASS FONTCREATE) \TEDIT.GET.PARALOOKS1 (FREPLACEFIELDVAL 
NCREATE CONS \SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH IDIFFERENCE \BIN SELECTC SHOULDNT LOGAND SELECTQ 
LIST PLUS ZEROP \ARBIN \ATMIN) TEDIT.GET.OBJECT1 (fetch FETCHFIELD \ATMIN GETFILEPTR READIMAGEOBJ 
REPLACEFIELD \TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT) TEDIT.BUILD.PCTB0 (fetch FETCHFIELD create
 NCREATE \MAKEPCTB IDIFFERENCE GETEOFPTR \DWIN FREPLACEFIELDVAL REPLACEFIELD \SMALLPIN SUB1 LLSH PLUS 
\RPLPTR \ADDBASE2 \ADDBASE ADD1) TEDIT.GET.CHARLOOKS0 (FREPLACEFIELDVAL NCREATE \SMALLPIN SIGNED 
OPENLAMBDA N SUB1 LLSH IDIFFERENCE PACK CHARACTER \BIN LIST PLUS ZEROP IMINUS \STRINGIN NCHARS READ 
LOGAND FONTCREATE) TEDIT.GET.OBJECT0 (fetch FETCHFIELD \ATMIN GETFILEPTR READIMAGEOBJ REPLACEFIELD 
\TEDIT.UNIQUIFY.CHARLOOKS CHARLOOKS.FROM.FONT) TEDIT.GET.PARALOOKS0 (FREPLACEFIELDVAL NCREATE CONS 
\SMALLPIN SIGNED OPENLAMBDA N SUB1 LLSH IDIFFERENCE \BIN SELECTC SHOULDNT SELECTQ LIST PLUS ZEROP) NIL
BIND TEDIT.BUILD.PCTB (SEL LINES CHLOOKSSEEN NEWPC PARALOOKSSEEN TTEXTOBJ USER.CMFILE TSTREAM 
EXISTINGCHARLOOKS EXLOOK EXISTINGFMTSPECS) \TEDIT.CONVERT.FOREIGN.FORMAT (DEFAULTLOOKS 
DEFAULTPARALOOKS TTEXTOBJ SEL) TEDIT.FORMATTEDFILEP NIL TEDIT.GET (OCURSOR USER.CMFILE RESP) 
TEDIT.INCLUDE (NPC) TEDIT.PARSE.PAGEFRAMES1 (PARENT) TEDIT.PUT (TEDIT.PUT.FINISHEDFORMS 
TEDIT.GET.FINISHEDFORMS OUTPUT.FILE.WRITTEN OCURSOR PROPS WINDOW) TEDIT.PUT.PCTB (OCURSOR POBJ 
OFILELEN OLDPARALOOKS CHARLOOKSLST PARALOOKSLST) \TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL 
\ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL \STRINGIN NIL \STRINGOUT NIL 
\TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE (NPC) \TEDIT.GET.CHARLOOKS.LIST NIL 
\TEDIT.GET.SINGLE.CHARLOOKS (FONT STR NAMELEN SUB STYLESTR USERSTR) \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS (STR) \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS (OUTPUTFORMAT) TEDIT.BUILD.PCTB2 (SEL LINES 
CHLOOKSSEEN NEWPC PARALOOKSSEEN CACHE CACHE? TTEXTOBJ USER.CMFILE TSTREAM USERFILEFORMAT USERTEMP 
EXISTINGCHARLOOKS EXLOOK EXISTINGFMTSPECS) \TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2
 (FONT STR NAMELEN SUB STYLESTR USERSTR) \TEDIT.PUT.SINGLE.PARALOOKS2 (OUTPUTFORMAT LEN) 
\TEDIT.PUT.SINGLE.CHARLOOKS2 (STR LEN) \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL
 TEDIT.PUT.PCTB2 (OCURSOR POBJ OFILELEN OLDPARALOOKS CHARLOOKSLST PARALOOKSLST) 
\TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 (SEL LINES CHLOOKSSEEN
 NEWPC PARALOOKSSEEN CACHE CACHE? TTEXTOBJ USER.CMFILE TSTREAM USERFILEFORMAT USERTEMP) 
TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 (FONT STR NAMELEN STYLESTR USERSTR) 
\TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 (NAMELEN) TEDIT.BUILD.PCTB0 (SEL LINES CHLOOKSSEEN NEWPC 
PARALOOKSSEEN CACHE TTEXTOBJ USER.CMFILE TSTREAM USERFILEFORMAT USERTEMP) TEDIT.GET.CHARLOOKS0 (FONT 
STR) TEDIT.GET.OBJECT0 (NAMELEN) TEDIT.GET.PARALOOKS0 NIL NIL
NLAMBDA TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL 
TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL 
\STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL \TEDIT.PUT.SINGLE.PARALOOKS2 NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL 
TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 
NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 
NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 NIL TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
NOBIND TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL 
TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL 
\STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL \TEDIT.PUT.SINGLE.PARALOOKS2 NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL 
TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 
NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 
NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 NIL TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
RECORD TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 (PAGEREGION) TEDIT.PUT NIL TEDIT.PUT.PCTB NIL 
\TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT (LITATOM)
 \DWIN NIL \DWOUT NIL \STRINGIN NIL \STRINGOUT (STRINGP) \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL 
TEDIT.RAW.INCLUDE NIL \TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS (CHARLOOKS) 
\TEDIT.PUT.PARALOOKS.LIST NIL \TEDIT.PUT.SINGLE.CHARLOOKS (FONTCLASS) \TEDIT.GET.PARALOOKS.LIST NIL 
\TEDIT.GET.SINGLE.PARALOOKS (FMTSPEC) \TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS (
FMTSPEC) TEDIT.BUILD.PCTB2 NIL \TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 (CHARLOOKS)
 \TEDIT.PUT.SINGLE.PARALOOKS2 NIL \TEDIT.PUT.SINGLE.CHARLOOKS2 (FONTCLASS) \TEDIT.GET.PARALOOKS.LIST2 
NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL 
\TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 (
CHARLOOKS) \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 
(CHARLOOKS) TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
CREATE TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 (PAGEREGION) TEDIT.PUT NIL TEDIT.PUT.PCTB NIL 
\TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN
 NIL \DWOUT NIL \STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL 
TEDIT.RAW.INCLUDE NIL \TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS (CHARLOOKS) 
\TEDIT.PUT.PARALOOKS.LIST NIL \TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL 
\TEDIT.GET.SINGLE.PARALOOKS (FMTSPEC TAB) \TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS 
NIL TEDIT.BUILD.PCTB2 NIL \TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 (CHARLOOKS) 
\TEDIT.PUT.SINGLE.PARALOOKS2 NIL \TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL 
\TEDIT.GET.SINGLE.PARALOOKS2 (FMTSPEC TAB) TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL 
\TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 (
CHARLOOKS) \TEDIT.GET.PARALOOKS1 (FMTSPEC TAB) TEDIT.GET.OBJECT1 NIL TEDIT.BUILD.PCTB0 NIL 
TEDIT.GET.CHARLOOKS0 (CHARLOOKS) TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 (FMTSPEC TAB) NIL
FETCH TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL 
TEDIT.PUT.PIECE.DESCRIPTOR (CLFONT CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY) \ARBIN NIL \ARBOUT NIL
 \ATMIN NIL \ATMOUT (PNAMEBASE PNAMELENGTH FATPNAMEP) \DWIN NIL \DWOUT NIL \STRINGIN NIL \STRINGOUT (
OFFST BASE XBASE LENGTH FATSTRINGP TYP) \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE
 NIL \TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS (CLBOLD CLITAL) 
\TEDIT.PUT.PARALOOKS.LIST NIL \TEDIT.PUT.SINGLE.CHARLOOKS (CLFONT CLOFFSET CLSTYLE CLUSERINFO CLLEADER
 CLINVERTED CLBOLD CLITAL CLULINE CLOLINE CLSTRIKE CLSMALLCAP CLPROTECTED CLINVISIBLE CLSELHERE 
CLCANCOPY) \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL \TEDIT.PUT.CHARLOOKS.LIST NIL
 \TEDIT.PUT.SINGLE.PARALOOKS (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD 
TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES 
FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTHEADINGKEEP FMTKEEP FMTBASETOBASE) TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 (CLBOLD CLITAL) 
\TEDIT.PUT.SINGLE.PARALOOKS2 (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD 
TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES 
FMTNEWPAGEBEFORE FMTNEWPAGEAFTER) \TEDIT.PUT.SINGLE.CHARLOOKS2 (CLFONT CLOFFSET CLSTYLE CLUSERINFO 
CLLEADER CLINVERTED CLBOLD CLITAL CLULINE CLOLINE CLSTRIKE CLSMALLCAP CLPROTECTED CLINVISIBLE 
CLSELHERE CLCANCOPY) \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL TEDIT.PUT.PCTB2 
NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 NIL 
TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 (CLBOLD CLITAL) \TEDIT.GET.PARALOOKS1 NIL 
TEDIT.GET.OBJECT1 NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 (CLBOLD CLITAL) TEDIT.GET.OBJECT0 NIL
 TEDIT.GET.PARALOOKS0 NIL NIL
REPLACE TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 (REGIONFILLMETHOD REGIONTYPE REGIONLOCALINFO REGIONSPEC 
REGIONSUBBOXES) TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL 
\ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL \STRINGIN NIL \STRINGOUT NIL 
\TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL \TEDIT.GET.CHARLOOKS.LIST NIL 
\TEDIT.GET.SINGLE.CHARLOOKS (CLSTYLE CLUSERINFO CLLEADER CLINVERTED CLBOLD CLITAL CLULINE CLOLINE 
CLSTRIKE CLSMALLCAP CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY CLSIZE CLOFFSET CLFONT) 
\TEDIT.PUT.PARALOOKS.LIST NIL \TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL 
\TEDIT.GET.SINGLE.PARALOOKS (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD 
TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES 
FMTNEWPAGEBEFORE FMTNEWPAGEAFTER FMTHEADINGKEEP FMTKEEP FMTBASETOBASE) \TEDIT.PUT.CHARLOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL \TEDIT.GET.CHARLOOKS.LIST2 NIL 
\TEDIT.GET.SINGLE.CHARLOOKS2 (CLSTYLE CLUSERINFO CLLEADER CLINVERTED CLBOLD CLITAL CLULINE CLOLINE 
CLSTRIKE CLSMALLCAP CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY CLSIZE CLOFFSET CLFONT) 
\TEDIT.PUT.SINGLE.PARALOOKS2 NIL \TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL 
\TEDIT.GET.SINGLE.PARALOOKS2 (1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD 
TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES 
FMTNEWPAGEBEFORE FMTNEWPAGEAFTER) TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL 
\TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 (
PLOOKS PNEW CLSTYLE CLUSERINFO CLBOLD CLITAL CLULINE CLOLINE CLSTRIKE CLSMALLCAP CLPROTECTED 
CLINVISIBLE CLSELHERE CLCANCOPY CLSIZE CLOFFSET CLFONT) \TEDIT.GET.PARALOOKS1 (1STLEFTMAR LEFTMAR 
RIGHTMAR LEADBEFORE LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND FMTSPECIALX FMTSPECIALY FMTUSERINFO 
FMTPARATYPE FMTPARASUBTYPE FMTSTYLE FMTCHARSTYLES FMTNEWPAGEBEFORE FMTNEWPAGEAFTER) TEDIT.GET.OBJECT1 
NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 (PLOOKS PNEW CLSTYLE CLUSERINFO CLBOLD CLITAL CLULINE 
CLOLINE CLSTRIKE CLSMALLCAP CLPROTECTED CLINVISIBLE CLSELHERE CLCANCOPY CLSIZE CLOFFSET CLFONT) 
TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 (PPARALOOKS 1STLEFTMAR LEFTMAR RIGHTMAR LEADBEFORE 
LEADAFTER LINELEAD TABSPEC QUAD TABX TABKIND) NIL
REFFREE TEDIT.BUILD.PCTB (TEDIT.DEFAULT.FMTSPEC DEFAULTFONT CR.EOLC TEDIT.INPUT.FORMATS 
\FirstPieceOffset \PieceDescriptorPAGEFRAME \EltsPerPiece \PieceDescriptorCHARLOOKSLIST 
\PieceDescriptorPARALOOKSLIST \PieceDescriptorPARA \PieceDescriptorLOOKS \PieceDescriptorOBJECT) 
\TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP (\FirstPieceOffset TEDIT.DEFAULT.CHARLOOKS) 
TEDIT.GET (PROMPTWINDOW WAITINGCURSOR TEDIT.SELECTION TEDIT.SHIFTEDSELECTION) TEDIT.INCLUDE (
\EltsPerPiece \FirstPieceOffset) TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT (\FirstPieceOffset) 
TEDIT.PUT.PCTB (\FirstPieceOffset TEDIT.DEFAULT.CHARLOOKS CR.EOLC TEDIT.DEFAULT.FMTSPEC) 
\TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN (WIDTH N) \ARBOUT NIL \ATMIN (WIDTH N) 
\ATMOUT (\PNAME.HI \PLIST.HI) \DWIN NIL \DWOUT NIL \STRINGIN (WIDTH N) \STRINGOUT (\ST.BYTE) 
\TEDIT.FORMATTEDP1 (WIDTH N) \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE (\EltsPerPiece DEFAULTFONT 
TEDIT.DEFAULT.FMTSPEC) \TEDIT.GET.CHARLOOKS.LIST (WIDTH N) \TEDIT.GET.SINGLE.CHARLOOKS (WIDTH N) 
\TEDIT.PUT.PARALOOKS.LIST NIL \TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST (WIDTH N) 
\TEDIT.GET.SINGLE.PARALOOKS (WIDTH N) \TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL 
TEDIT.BUILD.PCTB2 (TEDIT.DEFAULT.FMTSPEC DEFAULTFONT \FirstPieceOffset \PieceDescriptorPAGEFRAME 
\EltsPerPiece \PieceDescriptorCHARLOOKSLIST \PieceDescriptorPARALOOKSLIST \PieceDescriptorPARA 
\PieceDescriptorLOOKS \PieceDescriptorOBJECT) \TEDIT.GET.CHARLOOKS.LIST2 (WIDTH N) 
\TEDIT.GET.SINGLE.CHARLOOKS2 (WIDTH N) \TEDIT.PUT.SINGLE.PARALOOKS2 NIL \TEDIT.PUT.SINGLE.CHARLOOKS2 
NIL \TEDIT.GET.PARALOOKS.LIST2 (WIDTH N) \TEDIT.GET.SINGLE.PARALOOKS2 (WIDTH N) TEDIT.PUT.PCTB2 (
\FirstPieceOffset TEDIT.DEFAULT.CHARLOOKS CR.EOLC TEDIT.DEFAULT.FMTSPEC) \TEDIT.PUT.CHARLOOKS.LIST2 
NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 (TEDIT.DEFAULT.FMTSPEC DEFAULTFONT 
\FirstPieceOffset \PieceDescriptorPAGEFRAME \EltsPerPiece \PieceDescriptorPARA \PieceDescriptorLOOKS 
\PieceDescriptorOBJECT) TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 (WIDTH N) 
\TEDIT.GET.PARALOOKS1 (WIDTH N) TEDIT.GET.OBJECT1 (DEFAULTFONT) TEDIT.BUILD.PCTB0 (
TEDIT.DEFAULT.FMTSPEC \FirstPieceOffset \PieceDescriptorLOOKS \PieceDescriptorOBJECT 
\PieceDescriptorPARA \EltsPerPiece) TEDIT.GET.CHARLOOKS0 (WIDTH N) TEDIT.GET.OBJECT0 (DEFAULTFONT) 
TEDIT.GET.PARALOOKS0 (WIDTH N) NIL
REF TEDIT.BUILD.PCTB (N WIDTH TEXTSTREAM BASEA0571 BASEA0574 NA0572 ARRA0573 BASEA0575 BASEA0578 
NA0576 ARRA0577 BASEA0581 ARRA0580 VALA0579 BASEA0582 CHARLOOKSLIST PARALOOKSLIST) 
\TEDIT.CONVERT.FOREIGN.FORMAT (CONVERSIONFN FILE PREDICATERESULT) TEDIT.FORMATTEDFILEP (STREAM TEXTOBJ
 BASEA0583 NO ARR) TEDIT.GET (TEXTOBJ FILE UNFORMATTED? TEDIT.GET.FINISHEDFORMS FORM BASEA0584 NO ARR 
BASEA0585 SEL) TEDIT.INCLUDE (SEL FILE BASEA0586 BASEA0587 NO ARR BASEA0588 BASEA0589 BASEA0590 
BASEA0591 BASEA0592) TEDIT.PARSE.PAGEFRAMES1 (ALIST FRAMESPEC) TEDIT.PUT (STREAM TEXTOBJ X) 
TEDIT.PUT.PCTB (TEXTOBJ BASEA0594 NO ARR A0596 A0597 TEDIT.PUT.FINISHEDFORMS FORM) \TEDIT.PUTRESET (
PROC&VALUE) TEDIT.PUT.PIECE.DESCRIPTOR (LOOKS FONT FILE CHLIM CH1 STREAM W) \ARBIN (LEN STREAM) 
\ARBOUT (STREAM W) \ATMIN (LEN STREAM) \ATMOUT (STREAM W) \DWIN (FILE) \DWOUT (FILE NUMBER) \STRINGIN 
(SETLEN LEN STREAM) \STRINGOUT (STRING STREAM) \TEDIT.FORMATTEDP1 (FILE) \TEDIT.SET.WINDOW (TOWIND) 
TEDIT.RAW.INCLUDE (STREAM TEXTOBJ BASEA0598 BASEA0599 NO ARR BASEA0600) \TEDIT.GET.CHARLOOKS.LIST (
FILE) \TEDIT.GET.SINGLE.CHARLOOKS (FILE FILEPOS LOOKSLEN) \TEDIT.PUT.PARALOOKS.LIST (FILE STREAM W 
LOOKSLIST LOOKSHASH) \TEDIT.PUT.SINGLE.CHARLOOKS (FILE LOOKS FONT STREAM W FILEPOS) 
\TEDIT.GET.PARALOOKS.LIST (FILE TEXTOBJ) \TEDIT.GET.SINGLE.PARALOOKS (FILE FILEPOS LOOKSLEN TEXTOBJ) 
\TEDIT.PUT.CHARLOOKS.LIST (FILE STREAM W LOOKSLIST LOOKSHASH) \TEDIT.PUT.SINGLE.PARALOOKS (FILE STREAM
 W LOOKS TAB FILEPOS) TEDIT.BUILD.PCTB2 (START PCCOUNT TEXT END N WIDTH TEXTSTREAM BASEA0601 BASEA0604
 NA0602 ARRA0603 BASEA0605 BASEA0608 NA0606 ARRA0607 BASEA0611 ARRA0610 VALA0609 BASEA0612) 
\TEDIT.GET.CHARLOOKS.LIST2 (FILE) \TEDIT.GET.SINGLE.CHARLOOKS2 (FILE) \TEDIT.PUT.SINGLE.PARALOOKS2 (
STREAM W FILE LOOKS TAB) \TEDIT.PUT.SINGLE.CHARLOOKS2 (LOOKS FONT FILE STREAM W) 
\TEDIT.GET.PARALOOKS.LIST2 (FILE) \TEDIT.GET.SINGLE.PARALOOKS2 (FILE) TEDIT.PUT.PCTB2 (TEXTOBJ 
BASEA0613 NO ARR A0615 A0616 TEDIT.PUT.FINISHEDFORMS FORM) \TEDIT.PUT.CHARLOOKS.LIST2 (FILE STREAM W 
LOOKSLIST LOOKSHASH) \TEDIT.PUT.PARALOOKS.LIST2 (FILE STREAM W LOOKSLIST LOOKSHASH) TEDIT.BUILD.PCTB1 
(START PCCOUNT TEXT END N WIDTH TEXTSTREAM BASEA0617 BASEA0620 NA0618 ARRA0619 BASEA0621 BASEA0624 
NA0622 ARRA0623 BASEA0627 ARRA0626 VALA0625 BASEA0628) TEDIT.GET.PAGEFRAMES1 (FILE) 
\TEDIT.GET.CHARLOOKS1 (FILE) \TEDIT.GET.PARALOOKS1 (FILE) TEDIT.GET.OBJECT1 (STREAM FILE CURCH# PIECE 
TEXTOBJ) TEDIT.BUILD.PCTB0 (START PCCOUNT TEXT END N WIDTH TEXTSTREAM BASEA0629 BASEA0632 NA0630 
ARRA0631 BASEA0633 BASEA0636 NA0634 ARRA0635 BASEA0639 ARRA0638 VALA0637 BASEA0640) 
TEDIT.GET.CHARLOOKS0 (FILE) TEDIT.GET.OBJECT0 (STREAM FILE CURCH# PIECE TEXTOBJ) TEDIT.GET.PARALOOKS0 
(FILE) NIL
SETFREE TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB (PREVPREVPC) 
\TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN
 NIL \DWOUT NIL \STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL 
TEDIT.RAW.INCLUDE NIL \TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL 
\TEDIT.PUT.PARALOOKS.LIST NIL \TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL 
\TEDIT.GET.SINGLE.PARALOOKS NIL \TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL 
TEDIT.BUILD.PCTB2 (DEFAULTPARALOOKS) \TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL 
\TEDIT.PUT.SINGLE.PARALOOKS2 NIL \TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL 
\TEDIT.GET.SINGLE.PARALOOKS2 NIL TEDIT.PUT.PCTB2 (PARAHASH LOOKSHASH PREVPREVPC) 
\TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 (DEFAULTPARALOOKS) 
TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 NIL 
TEDIT.BUILD.PCTB0 (DEFAULTPARALOOKS) TEDIT.GET.CHARLOOKS0 NIL TEDIT.GET.OBJECT0 NIL 
TEDIT.GET.PARALOOKS0 NIL NIL
SET TEDIT.BUILD.PCTB (DEFAULTPARALOOKS DEFAULTLOOKS TEXT CACHE? CACHE START END PCCOUNT PCTB 
USERFILEFORMAT FILETYPE USERTEMP PC PIECEINFOCH# PCLEN TYPECODE PCN LOOKSHASH LOOKS I PARAHASH 
OLDPARALOOKS CURFILECH# CURCH# OLDPC) \TEDIT.CONVERT.FOREIGN.FORMAT (WORKINGSTREAM TSTREAM) 
TEDIT.FORMATTEDFILEP (OLDPARALOOKS TENTATIVE PC OLDLOOKS FONTFILE PREVPC) TEDIT.GET (OFILE PCTB LINES 
FIRSTLINE WINDOW LINE TITLE MENUSTREAM FILENAME) TEDIT.INCLUDE (STREAM NFILE NNFILE WASOPEN START END 
TEXTLEN NSTREAM PCTB INSERTCH# INSPC# INSPC PCLST LEN PCCOUNT) TEDIT.PARSE.PAGEFRAMES1 (FRAMETYPE 
PAGELIST PAGEFRAME) TEDIT.PUT (OFILE PUTFN CACHE FONTFILEUSED CH#S PC TITLE MENUSTREAM FILENAME) 
TEDIT.PUT.PCTB (PC OLDLOOKS TRUEFILE OFILE CURCH# OLDCH# FONTFILE PCCOUNT PARAHASH PARALOOKSSEEN 
LOOKSHASH PREVFATP PFILE PSTR CH I CH#S PREVPC) \TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR (STR) 
\ARBIN (USERSTR) \ARBOUT (ITEM) \ATMIN (I) \ATMOUT (CH) \DWIN NIL \DWOUT NIL \STRINGIN (STR I) 
\STRINGOUT (LEN CH I) \TEDIT.FORMATTEDP1 (LEN DESCPTR NPIECES PASSWORD) \TEDIT.SET.WINDOW NIL 
TEDIT.RAW.INCLUDE (SEL HOLDING.FILE INFILE WASOPEN START END TEXTLEN PCTB INSERTCH# INSPC# INSPC PCLST
 LEN) \TEDIT.GET.CHARLOOKS.LIST (I) \TEDIT.GET.SINGLE.CHARLOOKS (NAME SIZE SUPER PROPS) 
\TEDIT.PUT.PARALOOKS.LIST (LOOKS I) \TEDIT.PUT.SINGLE.CHARLOOKS (LEN) \TEDIT.GET.PARALOOKS.LIST (I) 
\TEDIT.GET.SINGLE.PARALOOKS (TABSPEC TABFLG QUAD DEFAULTTAB TABCOUNT TABS TABTYPE TAB#) 
\TEDIT.PUT.CHARLOOKS.LIST (LOOKS I) \TEDIT.PUT.SINGLE.PARALOOKS (DEFAULTTAB TABSPECS LEN) 
TEDIT.BUILD.PCTB2 (DEFAULTLOOKS PCTB PIECEINFOCH# PC PCLEN TYPECODE PCN LOOKSHASH LOOKS I PARAHASH 
OLDPARALOOKS CURFILECH# CURCH# OLDPC) \TEDIT.GET.CHARLOOKS.LIST2 (I) \TEDIT.GET.SINGLE.CHARLOOKS2 (
NAME SIZE SUPER PROPS) \TEDIT.PUT.SINGLE.PARALOOKS2 (DEFAULTTAB TABSPECS) \TEDIT.PUT.SINGLE.CHARLOOKS2
 NIL \TEDIT.GET.PARALOOKS.LIST2 (I) \TEDIT.GET.SINGLE.PARALOOKS2 (TABSPEC TABFLG DEFAULTTAB TABCOUNT 
TABS TAB#) TEDIT.PUT.PCTB2 (PC OLDLOOKS TRUEFILE OFILE CURCH# OLDCH# FONTFILE PCCOUNT PARALOOKSSEEN 
PREVFATP PFILE PSTR CH I CH#S PREVPC) \TEDIT.PUT.CHARLOOKS.LIST2 (LOOKS I) \TEDIT.PUT.PARALOOKS.LIST2 
(LOOKS I) TEDIT.BUILD.PCTB1 (DEFAULTLOOKS PCTB PIECEINFOCH# PC PCLEN TYPECODE PCN OLDPARALOOKS 
CURFILECH# EXLOOK LOOK EXISTINGCHARLOOKS EXISTINGFMTSPECS CURCH# OLDPC I) TEDIT.GET.PAGEFRAMES1 NIL 
\TEDIT.GET.CHARLOOKS1 (NAME SIZE SUPER SUB PROPS) \TEDIT.GET.PARALOOKS1 (TABSPEC TABFLG DEFAULTTAB 
TABCOUNT TABS TAB#) TEDIT.GET.OBJECT1 (GETFN FILEPTRSAVE OBJ) TEDIT.BUILD.PCTB0 (PCTB PIECEINFOCH# PC 
PCLEN TYPECODE CURFILECH# OLDPC CURCH# I PCN) TEDIT.GET.CHARLOOKS0 (NAMELEN NAME I SIZE SUPER SUB 
STYLESTR USERSTR PROPS) TEDIT.GET.OBJECT0 (GETFN FILEPTRSAVE OBJ) TEDIT.GET.PARALOOKS0 (TABSPEC TABFLG
 DEFAULTTAB TABCOUNT TABS TAB#) NIL
SMASHFREE TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET 
NIL TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL
 TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL 
\STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL \TEDIT.PUT.SINGLE.PARALOOKS2 NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL 
TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 
NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 
NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 NIL TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
SMASH TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 (PAGEFRAME) TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET
 NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL
 \STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS (LOOKS) \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS (LOOKS 
TABSPEC) \TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 (LOOKS) \TEDIT.PUT.SINGLE.PARALOOKS2 NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 (LOOKS 
TABSPEC) TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL 
TEDIT.BUILD.PCTB1 NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 (PC LOOKS) \TEDIT.GET.PARALOOKS1
 (LOOKS TABSPEC) TEDIT.GET.OBJECT1 NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 (PC LOOKS) 
TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 (PC LOOKS TABSPEC) NIL
PROP TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL 
TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL 
\STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL \TEDIT.PUT.SINGLE.PARALOOKS2 NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL 
TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 
NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 
NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 NIL TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
TEST TEDIT.BUILD.PCTB (TEXTOBJ CACHE? PCCOUNT CLEARGET? START PC OLDPC DEFAULTLOOKS) 
\TEDIT.CONVERT.FOREIGN.FORMAT (TEXTOBJ) TEDIT.FORMATTEDFILEP (PC PREVPC TENTATIVE) TEDIT.GET (OFILE 
GETFN MENUSTREAM) TEDIT.INCLUDE (NFILE) TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT (FILE FORCENEW OFILE 
PUTFN UNFORMATTED? OR0593 OLDFORMAT? CACHE PC CH#S MENUSTREAM) TEDIT.PUT.PCTB (PARALOOKSSEEN 
FORMATTINGLEVEL PC FONTFILE PREVPC EDITSTENTATIVE PREVFATP OR0595 CACHE TRUEFILE UNFORMATTED? 
SEPARATEFORMAT) \TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT (ITEM) \ATMIN 
NIL \ATMOUT (ATOM) \DWIN NIL \DWOUT NIL \STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL 
\TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE (END WASOPEN START) \TEDIT.GET.CHARLOOKS.LIST NIL 
\TEDIT.GET.SINGLE.CHARLOOKS (NAME) \TEDIT.PUT.PARALOOKS.LIST NIL \TEDIT.PUT.SINGLE.CHARLOOKS NIL 
\TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL \TEDIT.PUT.CHARLOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.PARALOOKS (DEFAULTTAB TABSPECS) TEDIT.BUILD.PCTB2 (TEXTOBJ OLDPC PC) 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 (NAME) \TEDIT.PUT.SINGLE.PARALOOKS2 (
DEFAULTTAB TABSPECS) \TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL 
\TEDIT.GET.SINGLE.PARALOOKS2 NIL TEDIT.PUT.PCTB2 (PARALOOKSSEEN FORMATTINGLEVEL PC FONTFILE PREVPC 
EDITSTENTATIVE PREVFATP OR0614 CACHE TRUEFILE UNFORMATTED? SEPARATEFORMAT) \TEDIT.PUT.CHARLOOKS.LIST2 
NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 (TEXTOBJ OLDPC PC) TEDIT.GET.PAGEFRAMES1 NIL 
\TEDIT.GET.CHARLOOKS1 (NAME) \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 NIL TEDIT.BUILD.PCTB0 (
TEXTOBJ OLDPC) TEDIT.GET.CHARLOOKS0 (NAME) TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
TESTFREE TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL
 TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL 
TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL 
\STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL \TEDIT.PUT.SINGLE.PARALOOKS2 NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL 
TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 
NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 
NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 NIL TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
PREDICATE TEDIT.BUILD.PCTB (STREAMP RANDACCESSP type? GREATERP IGREATERP ZEROP FMEMB) 
\TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP (EQFMTSPEC EQCLOOKS) TEDIT.GET (MOUSECONFIRM 
INFILEP STREAMP type?) TEDIT.INCLUDE (INFILEP OPENP IGREATERP) TEDIT.PARSE.PAGEFRAMES1 (TYPENAMEP) 
TEDIT.PUT (TEDIT.FORMATTEDFILEP IGREATERP type?) TEDIT.PUT.PCTB (type? IGREATERP EQFMTSPEC ZEROP 
EQCLOOKS IEQP GREATERP RANDACCESSP) \TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN (
IGREATERP ZEROP) \ARBOUT NIL \ATMIN (IGREATERP ZEROP GREATERP) \ATMOUT (IGREATERP) \DWIN NIL \DWOUT 
NIL \STRINGIN (IGREATERP GREATERP) \STRINGOUT (IGREATERP GREATERP) \TEDIT.FORMATTEDP1 (ILEQ IGREATERP 
IEQP) \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE (OPENP IGREATERP) \TEDIT.GET.CHARLOOKS.LIST (IGREATERP 
GREATERP) \TEDIT.GET.SINGLE.CHARLOOKS (IGREATERP ZEROP FETCHFIELD) \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS (TYPENAMEP ZEROP) \TEDIT.GET.PARALOOKS.LIST (IGREATERP GREATERP) 
\TEDIT.GET.SINGLE.PARALOOKS (IGREATERP GREATERP ILESSP) \TEDIT.PUT.CHARLOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.PARALOOKS (IGREATERP) TEDIT.BUILD.PCTB2 (GREATERP IGREATERP ZEROP) 
\TEDIT.GET.CHARLOOKS.LIST2 (IGREATERP GREATERP) \TEDIT.GET.SINGLE.CHARLOOKS2 (IGREATERP ZEROP 
FETCHFIELD) \TEDIT.PUT.SINGLE.PARALOOKS2 NIL \TEDIT.PUT.SINGLE.CHARLOOKS2 (TYPENAMEP ZEROP) 
\TEDIT.GET.PARALOOKS.LIST2 (IGREATERP GREATERP) \TEDIT.GET.SINGLE.PARALOOKS2 (IGREATERP GREATERP) 
TEDIT.PUT.PCTB2 (type? IGREATERP EQFMTSPEC ZEROP EQCLOOKS IEQP GREATERP RANDACCESSP) 
\TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 (GREATERP IGREATERP 
ZEROP EQCLOOKS EQFMTSPEC) TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 (IGREATERP FETCHFIELD) 
\TEDIT.GET.PARALOOKS1 (IGREATERP GREATERP) TEDIT.GET.OBJECT1 NIL TEDIT.BUILD.PCTB0 (GREATERP IGREATERP
) TEDIT.GET.CHARLOOKS0 (IGREATERP GREATERP FETCHFIELD) TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 (
IGREATERP GREATERP) NIL
EFFECT TEDIT.BUILD.PCTB (replace COPYBYTES CLOSEF COPYCHARS bind SELECTQ SHOULDNT SETFILEPTR SELECTC 
add SETA \TEDIT.GET.CHARLOOKS TEDIT.GET.OBJECT TEDIT.PROMPTPRINT \EDITSETA DECLARE) 
\TEDIT.CONVERT.FOREIGN.FORMAT (RESETLST replace) TEDIT.FORMATTEDFILEP (DECLARE while) TEDIT.GET (
FRESHLINE RESETLST if DECLARE \FILLWINDOW TEDIT.PROMPTPRINT) TEDIT.INCLUDE (TEDIT.PROMPTPRINT 
COPYBYTES CLOSEF TEDIT.DO.BLUEPENDINGDELETE \SHOWSEL \TEDIT.CONVERT.TO.FORMATTED DECLARE add 
\TEDIT.INSERT.PIECES \TEDIT.HISTORYADD \FIXILINES TEDIT.UPDATE.SCREEN \FIXSEL if \SETUPGETCH) 
TEDIT.PARSE.PAGEFRAMES1 (REPLACEFIELD) TEDIT.PUT (RESETLST if UNINTERRUPTABLY MBUTTON.SET.FIELD 
\TEDIT.HISTORYADD) TEDIT.PUT.PCTB (DECLARE TEDIT.PUT.PAGEFRAMES add \TEDIT.FLUSH.UNUSED.LOOKS while 
\TEDIT.PUT.CHARLOOKS \TEDIT.PUT.PARALOOKS \TEDIT.PUT.SINGLE.CHARLOOKS BOUT replace COPYBYTES for push 
COPYCHARS \DWOUT \SMALLPOUT CLOSEF) \TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR (\DWOUT \SMALLPOUT 
DECLARE PRIN1) \ARBIN (CLOSEF?) \ARBOUT (\SMALLPOUT DECLARE) \ATMIN (FRPLACD) \ATMOUT (\SMALLPOUT 
DECLARE) \DWIN NIL \DWOUT NIL \STRINGIN (RPLCHARCODE) \STRINGOUT (\SMALLPOUT DECLARE) 
\TEDIT.FORMATTEDP1 (SETFILEPTR) \TEDIT.SET.WINDOW (replace) TEDIT.RAW.INCLUDE (SHOULDNT \SHOWSEL 
COPYBYTES CLOSEF DECLARE add \TEDIT.INSERT.PIECES \FIXILINES TEDIT.UPDATE.SCREEN \FIXSEL if 
\SETUPGETCH) \TEDIT.GET.CHARLOOKS.LIST (FRPLACD) \TEDIT.GET.SINGLE.CHARLOOKS (REPLACEFIELD SETFILEPTR)
 \TEDIT.PUT.PARALOOKS.LIST (\DWOUT \SMALLPOUT DECLARE \TEDIT.PUT.SINGLE.PARALOOKS PUTHASH) 
\TEDIT.PUT.SINGLE.CHARLOOKS (\SMALLPOUT \ARBOUT \ATMOUT DECLARE SETFILEPTR) \TEDIT.GET.PARALOOKS.LIST 
(FRPLACD) \TEDIT.GET.SINGLE.PARALOOKS (REPLACEFIELD FRPLACD RPLACA RPLACD TEDIT.PROMPTPRINT SETFILEPTR
) \TEDIT.PUT.CHARLOOKS.LIST (\DWOUT \SMALLPOUT DECLARE \TEDIT.PUT.SINGLE.CHARLOOKS PUTHASH) 
\TEDIT.PUT.SINGLE.PARALOOKS (\SMALLPOUT DECLARE MAPC \ARBOUT \ATMOUT SETFILEPTR) TEDIT.BUILD.PCTB2 (
replace SETFILEPTR bind SELECTC add for SETA \TEDIT.GET.CHARLOOKS TEDIT.GET.OBJECT SHOULDNT \EDITSETA 
DECLARE) \TEDIT.GET.CHARLOOKS.LIST2 (FRPLACD) \TEDIT.GET.SINGLE.CHARLOOKS2 (REPLACEFIELD) 
\TEDIT.PUT.SINGLE.PARALOOKS2 (\SMALLPOUT DECLARE MAPC \ARBOUT \ATMOUT) \TEDIT.PUT.SINGLE.CHARLOOKS2 (
\ARBOUT \ATMOUT \SMALLPOUT DECLARE) \TEDIT.GET.PARALOOKS.LIST2 (FRPLACD) \TEDIT.GET.SINGLE.PARALOOKS2 
(REPLACEFIELD FRPLACD RPLACA RPLACD) TEDIT.PUT.PCTB2 (DECLARE TEDIT.PUT.PAGEFRAMES add 
\TEDIT.FLUSH.UNUSED.LOOKS while \TEDIT.PUT.CHARLOOKS \TEDIT.PUT.PARALOOKS \TEDIT.PUT.SINGLE.CHARLOOKS 
BOUT replace COPYBYTES for push COPYCHARS \DWOUT \SMALLPOUT CLOSEF) \TEDIT.PUT.CHARLOOKS.LIST2 (\DWOUT
 \SMALLPOUT DECLARE \TEDIT.PUT.SINGLE.CHARLOOKS2 PUTHASH) \TEDIT.PUT.PARALOOKS.LIST2 (\DWOUT 
\SMALLPOUT DECLARE \TEDIT.PUT.SINGLE.PARALOOKS2 PUTHASH) TEDIT.BUILD.PCTB1 (replace SETFILEPTR bind 
SELECTC add \TEDIT.GET.CHARLOOKS1 TEDIT.GET.OBJECT1 \WIN SHOULDNT push \EDITSETA DECLARE) 
TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 (REPLACEFIELD) \TEDIT.GET.PARALOOKS1 (REPLACEFIELD 
FRPLACD RPLACA RPLACD) TEDIT.GET.OBJECT1 (SETFILEPTR replace) TEDIT.BUILD.PCTB0 (SETFILEPTR bind 
replace SELECTC TEDIT.GET.CHARLOOKS0 add TEDIT.GET.OBJECT0 TEDIT.GET.PARALOOKS0 SHOULDNT \EDITSETA 
DECLARE) TEDIT.GET.CHARLOOKS0 (REPLACEFIELD FRPLACD) TEDIT.GET.OBJECT0 (SETFILEPTR replace) 
TEDIT.GET.PARALOOKS0 (REPLACEFIELD FRPLACD RPLACA RPLACD) NIL
CLISP TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 (type? for in collect) TEDIT.PUT NIL TEDIT.PUT.PCTB NIL 
\TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN (for from to collect)
 \ATMOUT (for inatom do) \DWIN NIL \DWOUT NIL \STRINGIN (for from to do) \STRINGOUT (for instring as 
from to do) \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST (for from to collect) \TEDIT.GET.SINGLE.CHARLOOKS NIL 
\TEDIT.PUT.PARALOOKS.LIST (for from as in do) \TEDIT.PUT.SINGLE.CHARLOOKS (type?) 
\TEDIT.GET.PARALOOKS.LIST (for from to collect) \TEDIT.GET.SINGLE.PARALOOKS (for from to collect) 
\TEDIT.PUT.CHARLOOKS.LIST (for from as in do) \TEDIT.PUT.SINGLE.PARALOOKS (for in do) 
TEDIT.BUILD.PCTB2 NIL \TEDIT.GET.CHARLOOKS.LIST2 (for from to collect) \TEDIT.GET.SINGLE.CHARLOOKS2 
NIL \TEDIT.PUT.SINGLE.PARALOOKS2 (for in do) \TEDIT.PUT.SINGLE.CHARLOOKS2 (type?) 
\TEDIT.GET.PARALOOKS.LIST2 (for from to collect) \TEDIT.GET.SINGLE.PARALOOKS2 (for from to collect) 
TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 (for from as in do) \TEDIT.PUT.PARALOOKS.LIST2 (for 
from as in do) TEDIT.BUILD.PCTB1 NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL 
\TEDIT.GET.PARALOOKS1 (for from to collect) TEDIT.GET.OBJECT1 NIL TEDIT.BUILD.PCTB0 NIL 
TEDIT.GET.CHARLOOKS0 (for from to collect) TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 (for from to 
collect) NIL
SPECVARS TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL
 TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL 
TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL 
\STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL \TEDIT.PUT.SINGLE.PARALOOKS2 NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL 
TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 
NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 
NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 NIL TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
LOCALVARS TEDIT.BUILD.PCTB (BASEA0571 ARRA0573 NA0572 BASEA0574 BASEA0575 ARRA0577 NA0576 BASEA0578 
ARRA0580 VALA0579 BASEA0581 BASEA0582) \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP (ARR NO 
BASEA0583) TEDIT.GET (ARR NO BASEA0584 BASEA0585) TEDIT.INCLUDE (BASEA0586 ARR NO BASEA0587 BASEA0588 
BASEA0589 BASEA0590 BASEA0591 BASEA0592) TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB (ARR
 NO BASEA0594 $$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR (
STREAM W) \ARBIN NIL \ARBOUT (STREAM W) \ATMIN NIL \ATMOUT (STREAM W $$TEM1 $$TEM2 $$TEM3 $$TEM4 
$$TEM5) \DWIN NIL \DWOUT NIL \STRINGIN NIL \STRINGOUT ($$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) 
\TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE (BASEA0598 ARR NO BASEA0599 BASEA0600) 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL \TEDIT.PUT.PARALOOKS.LIST (STREAM W) 
\TEDIT.PUT.SINGLE.CHARLOOKS (STREAM W) \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST (STREAM W) \TEDIT.PUT.SINGLE.PARALOOKS (STREAM W) TEDIT.BUILD.PCTB2 (
BASEA0601 ARRA0603 NA0602 BASEA0604 BASEA0605 ARRA0607 NA0606 BASEA0608 ARRA0610 VALA0609 BASEA0611 
BASEA0612) \TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL 
\TEDIT.PUT.SINGLE.PARALOOKS2 (STREAM W) \TEDIT.PUT.SINGLE.CHARLOOKS2 (STREAM W) 
\TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL TEDIT.PUT.PCTB2 (ARR NO BASEA0613 
$$TEM1 $$TEM2 $$TEM3 $$TEM4 $$TEM5) \TEDIT.PUT.CHARLOOKS.LIST2 (STREAM W) \TEDIT.PUT.PARALOOKS.LIST2 (
STREAM W) TEDIT.BUILD.PCTB1 (BASEA0617 ARRA0619 NA0618 BASEA0620 BASEA0621 ARRA0623 NA0622 BASEA0624 
ARRA0626 VALA0625 BASEA0627 BASEA0628) TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL 
\TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 NIL TEDIT.BUILD.PCTB0 (BASEA0629 ARRA0631 NA0630 BASEA0632
 BASEA0633 ARRA0635 NA0634 BASEA0636 ARRA0638 VALA0637 BASEA0639 BASEA0640) TEDIT.GET.CHARLOOKS0 NIL 
TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
APPLY TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL 
TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL 
\STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL \TEDIT.PUT.SINGLE.PARALOOKS2 NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL 
TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 
NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 
NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 NIL TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
ERROR TEDIT.BUILD.PCTB (apply) \TEDIT.CONVERT.FOREIGN.FORMAT (apply) TEDIT.FORMATTEDFILEP NIL 
TEDIT.GET (apply) TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT (apply) TEDIT.PUT.PCTB NIL 
\TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN (ppe) \ARBOUT NIL \ATMIN (ppe) \ATMOUT NIL 
\DWIN NIL \DWOUT NIL \STRINGIN (ppe) \STRINGOUT NIL \TEDIT.FORMATTEDP1 (ppe) \TEDIT.SET.WINDOW NIL 
TEDIT.RAW.INCLUDE NIL \TEDIT.GET.CHARLOOKS.LIST (ppe) \TEDIT.GET.SINGLE.CHARLOOKS (ppe) 
\TEDIT.PUT.PARALOOKS.LIST NIL \TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST (ppe) 
\TEDIT.GET.SINGLE.PARALOOKS (ppe) \TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL 
TEDIT.BUILD.PCTB2 NIL \TEDIT.GET.CHARLOOKS.LIST2 (ppe) \TEDIT.GET.SINGLE.CHARLOOKS2 (ppe) 
\TEDIT.PUT.SINGLE.PARALOOKS2 NIL \TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 (ppe) 
\TEDIT.GET.SINGLE.PARALOOKS2 (ppe) TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL 
\TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 (
ppe) \TEDIT.GET.PARALOOKS1 (ppe) TEDIT.GET.OBJECT1 NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 (ppe
) TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 (ppe) NIL
LOCALFREEVARS TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL 
TEDIT.GET NIL TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL 
\TEDIT.PUTRESET NIL TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN
 NIL \DWOUT NIL \STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL 
TEDIT.RAW.INCLUDE NIL \TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL 
\TEDIT.PUT.PARALOOKS.LIST NIL \TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL 
\TEDIT.GET.SINGLE.PARALOOKS NIL \TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL 
TEDIT.BUILD.PCTB2 NIL \TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL 
\TEDIT.PUT.SINGLE.PARALOOKS2 NIL \TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL 
\TEDIT.GET.SINGLE.PARALOOKS2 NIL TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL 
\TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 
NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 NIL 
TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
ARGS TEDIT.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL 
TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL 
\STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL \TEDIT.PUT.SINGLE.PARALOOKS2 NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL 
TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 
NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 
NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 NIL TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL
USERTEMPLATES PERFORM (MACRO ARGS (PERFORMTRAN ARGS T)) REF (CALL EVAL (IF (AND (CONSP EXPR) (EQ (CAR 
EXPR) (QUOTE QUOTE))) (NIL FETCH) EVAL)) UNINTERRUPTABLY (CALL .. EVAL) \DoveIO.LockMem (CALL .. EVAL)
 WINDOWPROP (CALL EVAL PROP EVAL . PPE) RUN-SUPER (CALL .. EVAL) SPREADAPPLY (CALL FUNCTIONAL EVAL . 
PPE) perform (MACRO ARGS (PERFORMTRAN ARGS T)) SHAZAM (CALL .. NIL) 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.BUILD.PCTB NIL \TEDIT.CONVERT.FOREIGN.FORMAT NIL TEDIT.FORMATTEDFILEP NIL TEDIT.GET NIL 
TEDIT.INCLUDE NIL TEDIT.PARSE.PAGEFRAMES1 NIL TEDIT.PUT NIL TEDIT.PUT.PCTB NIL \TEDIT.PUTRESET NIL 
TEDIT.PUT.PIECE.DESCRIPTOR NIL \ARBIN NIL \ARBOUT NIL \ATMIN NIL \ATMOUT NIL \DWIN NIL \DWOUT NIL 
\STRINGIN NIL \STRINGOUT NIL \TEDIT.FORMATTEDP1 NIL \TEDIT.SET.WINDOW NIL TEDIT.RAW.INCLUDE NIL 
\TEDIT.GET.CHARLOOKS.LIST NIL \TEDIT.GET.SINGLE.CHARLOOKS NIL \TEDIT.PUT.PARALOOKS.LIST NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS NIL \TEDIT.GET.PARALOOKS.LIST NIL \TEDIT.GET.SINGLE.PARALOOKS NIL 
\TEDIT.PUT.CHARLOOKS.LIST NIL \TEDIT.PUT.SINGLE.PARALOOKS NIL TEDIT.BUILD.PCTB2 NIL 
\TEDIT.GET.CHARLOOKS.LIST2 NIL \TEDIT.GET.SINGLE.CHARLOOKS2 NIL \TEDIT.PUT.SINGLE.PARALOOKS2 NIL 
\TEDIT.PUT.SINGLE.CHARLOOKS2 NIL \TEDIT.GET.PARALOOKS.LIST2 NIL \TEDIT.GET.SINGLE.PARALOOKS2 NIL 
TEDIT.PUT.PCTB2 NIL \TEDIT.PUT.CHARLOOKS.LIST2 NIL \TEDIT.PUT.PARALOOKS.LIST2 NIL TEDIT.BUILD.PCTB1 
NIL TEDIT.GET.PAGEFRAMES1 NIL \TEDIT.GET.CHARLOOKS1 NIL \TEDIT.GET.PARALOOKS1 NIL TEDIT.GET.OBJECT1 
NIL TEDIT.BUILD.PCTB0 NIL TEDIT.GET.CHARLOOKS0 NIL TEDIT.GET.OBJECT0 NIL TEDIT.GET.PARALOOKS0 NIL NIL

)