(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10)


(FILECREATED " 2-Aug-2024 08:48:45" {WMEDLEY}<library>tedit>TEDIT-RENAMES.;5
 7187   

      :EDIT-BY rmk

      :CHANGES-TO (VARS TEDITSYMBOLMAP)

      :PREVIOUS-DATE "22-Jul-2024 11:31:22" {WMEDLEY}<library>tedit>TEDIT-RENAMES.;4)


(PRETTYCOMPRINT TEDIT-RENAMESCOMS)

(RPAQQ TEDIT-RENAMESCOMS
 (
                          (* ;; "TEDITSYMBOLMAP is a list that maps names for current TEDIT items  (e.g.  \TEDIT.FORMATLINE) into the names of those items in earlier Tedits (e.g. \FORMATLINE).")


                          
                          (* ;; 

                        "FORWARDEDFILES  maps original TEDIT filenames (e.g. PCTREE to TEDIT-PCTREE)")


                          (VARS TEDITSYMBOLMAP)
                          (VARS FORWARDEDFILES)))



(* ;; 
"TEDITSYMBOLMAP is a list that maps names for current TEDIT items  (e.g.  \TEDIT.FORMATLINE) into the names of those items in earlier Tedits (e.g. \FORMATLINE)."
)





(* ;; "FORWARDEDFILES  maps original TEDIT filenames (e.g. PCTREE to TEDIT-PCTREE)")



(RPAQQ TEDITSYMBOLMAP

       ((MB.NB.ARRANGEBUTTONS MB.NB.PACKITEMS)
        (MB.NWAYBUTTON.BUTTONEVENTINFN MB.NWAYBUTTON.SELFN)
        (\TEDIT.BTFAIL BTFAIL)
        (\TEDIT.BTVALIDATE BTVALIDATE)
        (\TEDIT.BTVALIDATE.PRINT BTVALIDATE.PRINT)
        (\TEDIT.CHANGE.CHARLOOKS \TEDIT.CHANGE.LOOKS)
        (\TEDIT.CHECK-BTREE CHECK-BTREE)
        (\TEDIT.CHECK-BTREE1 CHECK-BTREE1)
        (\TEDIT.EQCLOOKS EQCLOOKS)
        (\TEDIT.EQFMTSPEC EQFMTSPEC)
        (\TEDIT.REOPENTEXTSTREAM REOPENTEXTSTREAM)
        (\TEDIT.SAMECLOOKS SAMECLOOKS)
        (\TEDIT.DO.BLUEPENDINGDELETE TEDIT.DO.BLUEPENDINGDELETE)
        (\TEDIT.FORMATBOX TEDIT.FORMATBOX)
        (\TEDIT.FORMATFOLIO TEDIT.FORMATFOLIO)
        (\TEDIT.FORMATHEADING TEDIT.FORMATHEADING)
        (\TEDIT.FORMATPAGE TEDIT.FORMATPAGE)
        (\TEDIT.FORMATTEXTBOX TEDIT.FORMATTEXTBOX)
        (\TEDIT.GET.CHARLOOKS0 TEDIT.GET.CHARLOOKS0)
        (\TEDIT.GET.OBJECT TEDIT.GET.OBJECT)
        (\TEDIT.GET.OBJECT0 TEDIT.GET.OBJECT0)
        (\TEDIT.GET.PARALOOKS0 TEDIT.GET.PARALOOKS0)
        (\TEDIT.GET.PCTB0 TEDIT.GET.PCTB0)
        (\TEDIT.PUT.OBJECT TEDIT.PUT.OBJECT)
        (\TEDIT.RESET.EXTEND.PENDING.DELETE TEDIT.RESET.EXTEND.PENDING.DELETE)
        (\TEDIT.SELECTED.PIECES TEDIT.SELECTED.PIECES)
        (\TEDIT.UPDATE.SCREEN TEDIT.UPDATE.SCREEN)
        (\TEDIT.ALIGNEDPIECE \ALIGNEDPIECE)
        (\TEDIT.BACKFORMAT \BACKFORMAT)
        (\TEDIT.CHTOPC \CHTOPC)
        (\TEDIT.COPYSEL \COPYSEL)
        (\TEDIT.CREATE.TEDIT.RESTART.MENU \CREATE.TEDIT.RESTART.MENU)
        (\TEDIT.DELETEPIECES \DELETEPIECES)
        (\TEDIT.DELETETREE \DELETETREE)
        (\TEDIT.DISPLAYLINE \DISPLAYLINE)
        (\TEDIT.DISPLAYLINE.TABS \DISPLAYLINE.TABS)
        (\TEDIT.FILLPANE \FILLPANE)
        (\TEDIT.FIRSTPIECE \FIRSTPIECE)
        (\TEDIT.FIXSEL \FIXSEL)
        (\TEDIT.FORMATBLOCK \FORMATBLOCK)
        (\TEDIT.FORMATLINE \FORMATLINE)
        (\TEDIT.FORMATLINE.EMPTY \FORMATLINE.EMPTY)
        (\TEDIT.FORMATLINE.JUSTIFY \FORMATLINE.JUSTIFY)
        (\TEDIT.FORMATLINE.LASTLEGAL \FORMATLINE.LASTLEGAL)
        (\TEDIT.FORMATLINE.PURGE.SPACES \FORMATLINE.PURGE.SPACES)
        (\TEDIT.FORMATLINE.SCALETABS \FORMATLINE.SCALETABS)
        (\TEDIT.FORMATLINE.SETUP \FORMATLINE.SETUP)
        (\TEDIT.FORMATLINE.TABS \FORMATLINE.TABS)
        (\TEDIT.FORMATLINE.UPDATELOOKS \FORMATLINE.UPDATELOOKS)
        (\TEDIT.HARDCOPY.FORMATLINE.HEADINGS \HARDCOPY.FORMATLINE.HEADINGS)
        (\TEDIT.INSERT TEDIT.\INSERT)
        (\TEDIT.INSERTCH \INSERTCH)
        (\TEDIT.INSERTCH.EXTEND \INSERTCH.EXTEND)
        (\TEDIT.INSERTCH.HISTORY \INSERTCH.HISTORY)
        (\TEDIT.INSERTCH.INSERTION \INSERTCH.INSERTION)
        (\TEDIT.INSERTEOL \INSERTEOL)
        (\TEDIT.INSERTPIECE \INSERTPIECE)
        (\TEDIT.INSERTPIECES \INSERTPIECES)
        (\TEDIT.INSERTTREE \INSERTTREE)
        (\TEDIT.LASTPIECE \LASTPIECE)
        (\TEDIT.LINKNEWPIECE \LINKNEWPIECE)
        (\TEDIT.MAKE.VACANT.BTREESLOT \MAKE.VACANT.BTREESLOT)
        (\TEDIT.MAKEPCTB \MAKEPCTB)
        (\TEDIT.MATCHPCS \MATCHPCS)
        (\TEDIT.NAMEDTAB.INIT \NAMEDTAB.INIT)
        (\TEDIT.PCTOCH \PCTOCH)
        (\TEDIT.PRIMARYPANE \TEDIT.PRIMARYW)
        (\TEDIT.SELPIECES \SELPIECES)
        (\TEDIT.SELPIECES.CHARTRANSFORM \SELPIECES.CHARTRANSFORM)
        (\TEDIT.SELPIECES.CONCAT \SELPIECES.CONCAT)
        (\TEDIT.SELPIECES.COPY \SELPIECES.COPY)
        (\TEDIT.SELPIECES.FROM.STRING \SELPIECES.FROM.STRING)
        (\TEDIT.SELPIECES.TO.STRING \SELPIECES.TO.STRING)
        (\TEDIT.SHOWSEL \SHOWSEL)
        (\TEDIT.SPLITPIECE \SPLITPIECE)
        (\TEDIT.TEDIT.FORMATLINES \TEDIT.FORMATLINES)
        (\TEDIT.POSTSCRIPT.HARDCOPY \TEDIT.HARDCOPY)
        (\TEDIT.TEDIT.HARDCOPY \TEDIT.HARDCOPY)
        (\TEDIT.TEXTBACKFILEPTR \TEXTBACKFILEPTR)
        (\TEDIT.TEXTBIN \TEXTBIN)
        (\TEDIT.TEXTBOUT \TEXTBOUT)
        (\TEDIT.TEXTCLOSEF \TEXTCLOSEF)
        (\TEDIT.TEXTDSPCHARWIDTH \TEXTDSPCHARWIDTH)
        (\TEDIT.TEXTDSPFONT \TEXTDSPFONT)
        (\TEDIT.TEXTDSPLINEFEED \TEXTDSPLINEFEED)
        (\TEDIT.TEXTDSPSTRINGWIDTH \TEXTDSPSTRINGWIDTH)
        (\TEDIT.TEXTDSPXPOSITION \TEXTDSPXPOSITION)
        (\TEDIT.TEXTDSPYPOSITION \TEXTDSPYPOSITION)
        (\TEDIT.TEXTEOFP \TEXTEOFP)
        (\TEDIT.TEXTGETEOFPTR \TEXTGETEOFPTR)
        (\TEDIT.TEXTGETFILEPTR \TEXTGETFILEPTR)
        (\TEDIT.TEXTINIT \TEXTINIT)
        (\TEDIT.TEXTLEFTMARGIN \TEXTLEFTMARGIN)
        (\TEDIT.TEXTOPENF \TEXTOPENF)
        (\TEDIT.TEXTPEEKBIN \TEXTPEEKBIN)
        (\TEDIT.TEXTRIGHTMARGIN \TEXTRIGHTMARGIN)
        (\TEDIT.TEXTSETEOF \TEXTSETEOF)
        (\TEDIT.TEXTSETFILEPTR \TEXTSETFILEPTR)
        (\TEDIT.TEXTBACKCCODEFN \TEXTSTREAM.BACKCCODEFN)
        (\TEDIT.TEXTSTREAM.BACKCCODEFN \TEXTSTREAM.BACKCCODEFN)
        (\TEDIT.TEXTFORMATBYTESTREAM \TEXTSTREAM.FORMATBYTESTREAM)
        (\TEDIT.TEXTSTREAM.FORMATBYTESTREAM \TEXTSTREAM.FORMATBYTESTREAM)
        (\TEDIT.TEXTINCCODEFN \TEXTSTREAM.INCCCODEFN)
        (\TEDIT.TEXTSTREAM.INCCCODEFN \TEXTSTREAM.INCCCODEFN)
        (\TEDIT.TEXTOUTCHARFN \TEXTSTREAM.OUTCHARFN)
        (\TEDIT.TEXTSTREAM.OUTCHARFN \TEXTSTREAM.OUTCHARFN)
        (\TEDIT.TEXTTTYBOUT \TEXTTTYBOUT)
        (\TEDIT.UNLINKPIECE \UNLINKPIECE)
        (\TEDIT.UPDATEPCNODES \UPDATEPCNODES)
        (\TEDIT.XYTOSEL \TEDIT.SELECT.LINE.SCANNER)))

(RPAQQ FORWARDEDFILES

       ((PCTREE TEDIT-PCTREE)
        (TEDIT TEDIT)
        (TEDIT-FILE TEDIT-FILE)
        (TEDIT-TEXTOFD TEDIT-STREAM)
        (TEDITABBREV TEDIT-ABBREV)
        (TEDITCHAT TEDIT-CHAT)
        (TEDITCOMMAND TEDIT-COMMAND)
        (TEDITDCL TEDITDCL)
        (TEDITDEBUG TEDIT-DEBUG)
        (TEDITFILE TEDIT-FILE TEDIT-OLDFILE)
        (TEDITFIND TEDIT-FIND)
        (TEDITFNKEYS TEDIT-FNKEYS)
        (TEDITHCPY TEDIT-HCPY)
        (TEDITHISTORY TEDIT-HISTORY)
        (TEDITLOOKS TEDIT-LOOKS)
        (TEDITMENU TEDIT-MENU)
        (TEDITPAGE TEDIT-PAGE)
        (TEDITSCREEN TEDIT-SCREEN)
        (TEDITSELECTION TEDIT-SELECTION)
        (TEDITWINDOW TEDIT-WINDOW)
        (TFBRAVO TEDIT-TFBRAVO)))
(DECLARE%: DONTCOPY
  (FILEMAP (NIL)))
STOP