(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED "31-Mar-87 13:04:37" ("compiled on " {ERIS}TEXTOFD.;45) "25-Mar-87 12:30:51" brecompiled changes%: \TEXTINIT in "" dated "25-Mar-87 12:58:17") (FILECREATED "31-Mar-87 13:02:37" {ERIS}TEXTOFD.;45 141274 changes to%: (FNS \TEXTINIT) (VARS TEXTOFDCOMS) previous date%: " 7-Jan-87 01:40:01" {ERIS}TEXTOFD.;43) COPYTEXTSTREAM :D4 (P 5 NEWTEXTOBJ P 4 NEWSTREAM P 3 PCLST P 2 PCTB P 1 TSEL P 0 TEXTOBJ I 1 CROSSCOPY I 0 ORIGINAL) @ aHZHYhdddHF \d ]IkIHk IH HIAgHM [MkKHhdA MHMH8jkj^8NjhL(102 \TEDIT.INSERT.PIECES 85 TEDIT.SELECTED.PIECES 39 TEXTOBJ 34 OPENTEXTSTREAM 3 TEXTOBJ) (122 TEXTOBJ 118 TEXTOBJ 110 TEXTOBJ 106 TEXTOBJ 93 TEXTOBJ 79 \TEDIT.COPYTEXTSTREAM.PIECEMAPFN 69 TEXTOBJ 65 SELECTION 55 TEXTOBJ 51 SELECTION 44 SELECTION 28 TEXTOBJ 17 TEXTOBJ 10 TEXTOBJ) () OPENTEXTSTREAM :D4 (P 27 FORM P 26 SELN P 25 PWINDOW P 24 PARALOOKS P 23 CLEARGET? P 22 PROP P 21 OTEXTOBJ P 20 TEXTSTREAM P 19 PC P 18 PCTB P 17 SEL P 16 FONT P 15 TEXTOBJ.WINDOW.VALID P 14 PROPS P 3 TEDIT.GET.FINISHEDFORMS P 2 TEXTOBJ I 4 PROPS I 3 END I 2 START I 1 WINDOW I 0 TEXT F 28 BXCARET F 29 DEFAULTFONT F 30 \CARETRATE) @3@(@`H dmdmdjr@`@ dmdmdjP`dj:d`:dj8`nghj HdIngjd HdIngjd HdIdjHdI8dj,dh,dj*dj(dj&dj$`dndndjdjdghhHdIhhHdIdjdjHdI"`dnwwdjdkdjdghhHdIhhHdIdjdjHdI `dmdndjdjdghhHdIhhHdIdjdjHdI`dkdkdndjdghhHdIhhHdIdjdjHdI`dkdkdndjdghhHdIhhHdIdjdjHdIdgdodhdj dj dmdhdj D` JF AdJ JAg JAdhJhJOF@@.bOg'Og'+Og'Og'Og' Og'W:hJ _ Og'_0JO0 `` _0J :@@_*@_(JJJ JJ"h8dO*O4O4JO4jjO4jjdhO(JJO(.Jh0J,jJd, Jj,O JO J @Jl ` `dL0`dMdJ^.N_(J@JBCO O0Og' _$O$ll_&KdO6 JO$dkkk_OOkJJdO J _@O J 4J`Ad _dOdiW8 _dOdW< dW8 dil_dOl_dO2JOg'kj:JOg'_,d0." 28 "TEdit consistency-check failure [RETURN to continue]: ") \SETUPGETCH :D4 (L (1 TEXTOBJ 0 CH#))  AA. Ih@dM@@JJ3IJIjIjIjIjI0jIK hA_kOOko ,@H HKk_OO@HKK^IJIkkjhJN_I0NIK J\NOIL ,J]JNOIMJjh J]1oJ I0JJA IJ JA "hg _lNkO IjIjINIJIjINIjI0O0IO""hIkIjIkIjIjIjIj6(342 \SETUPGETCH 325 IMAGEOBJPROP 315 \TEDIT.APPLY.STYLES 301 \TEDIT.APPLY.PARASTYLES 280 ERROR 265 \TEDIT.TEXTBIN.FILESETUP 236 \TEDIT.TEXTBIN.STRINGSETUP 135 \CHTOPCNO 128 ERROR) (478 STREAM 470 STREAM 462 STREAM 439 STREAM 429 STREAM 424 STREAM 415 TEXTIMAGEDATA 410 STREAM 405 TEXTIMAGEDATA 400 STREAM 392 STREAM 384 STREAM 370 PIECE 356 STREAM 347 STREAM 337 STREAM 322 SUBSTREAM 307 STREAM 294 PIECE 290 TEXTIMAGEDATA 285 STREAM 254 PIECE 220 STREAM 213 TEXTIMAGEDATA 208 STREAM 198 PIECE 184 STREAM 177 STREAM 162 ARRAYP 146 ARRAYP 105 TEXTOBJ 96 STREAM 88 TEXTIMAGEDATA 83 STREAM 75 STREAM 67 STREAM 49 STREAM 18 STREAM 9 TEXTOBJ 3 TEXTOBJ) ( 276 "Piece is neither a file nor a string??" 125 "TRYING TO \SETUPGETCH BEYOND END OF TEXT") \TEDIT.REOPEN.STREAM :D4 (P 2 PC P 1 PCTB P 0 NEWSTREAM I 1 PIECESTREAM I 0 TEXTSTREAM) AAAg @ Il ZdHAJHJZ(32 ELT 18 TEXTOBJ 14 OPENSTREAM) (58 PIECE 50 PIECE 41 PIECE 21 TEXTOBJ 11 INPUT 3 STREAM) () \TEDIT.COPYTEXTSTREAM.PIECEMAPFN :D4 (P 2 COPYFN P 1 NEWOBJ P 0 OBJ I 3 TOOBJ I 2 FROMOBJ I 1 TEXTOBJ I 0 PC) 0`@ dkbdw@Xg Z6HB.C.lJYdgAoi g @IH@H Hg ZHCB.C.lJ@(114 IMAGEOBJPROP 104 COPYALL 84 RETFROM 77 TEDIT.PROMPTPRINT 38 IMAGEOBJPROP 9 NCREATE2) (135 TEXTOBJ 129 TEXTOBJ 122 TEXTOBJ 111 WHENCOPIEDFN 100 PIECE 91 PIECE 81 TEDIT.COPY 64 DON'T 52 TEXTOBJ 46 TEXTOBJ 35 COPYFN 29 PIECE 21 PIECE 5 |PIECETYPE#|) ( 73 "COPY of this object not allowed.") \TEXTINITA0024 :D4 (I 2 DIMENSION I 1 BITMAP I 0 STREAM) ABdgh@ A gh@ A Bd@ A h@ A  (62 \ILLEGAL.ARG 56 BITMAPHEIGHT 52 DSPSCALE 46 BITMAPWIDTH 42 DSPSCALE 32 BITMAPHEIGHT 28 DSPSCALE 16 BITMAPWIDTH 12 DSPSCALE) (21 HEIGHT 4 WIDTH) () \TEXTINITA0028 :D4 (I 1 CHARCODE I 0 STREAM) Ah@ (8 CHARWIDTH 5 DSPFONT) NIL () \TEXTINITA0030 :D4 (I 2 RDTBL I 1 STR I 0 STREAM) Ah@ Bd (10 STRINGWIDTH 5 DSPFONT) NIL () \TEXTINITA0037 :D4 (I 0 STREAM) @(@l lHNIL (3 STREAM) () \TEXTINITA0041 :D4 (I 2 Y I 1 X I 0 STREAM) +@.@AlH@.@BlHNIL (29 IMAGEOPS 24 STREAM 8 IMAGEOPS 3 STREAM) () \TEXTINITA0045 :D4 (I 0 STREAM) @(@l lHNIL (3 STREAM) () \TEXTINITA0078 :D4 (I 5 STREAM I 4 FDEV I 3 OTHERINFO I 2 RECOG I 1 ACCESS I 0 FILE) Eg E(6 \SETACCESS) (3 BOTH) () \TEXTINITA0149 :D4 (P 2 XCL::RESULT P 1 STREAM P 0 STREAM-ERROR I 0 CONDITION F 3 ERRORPOS F 4 *TEDIT-OLD-STREAM-ERROR-HANDLER*) I@Hg .I (I JS JIS mSd Sid @kT(64 ENVAPPLY 57 STKNTH 50 SUBST 47 STKARGS 41 STKNAME 31 REOPENTEXTSTREAM 25 TEXTSTREAMP 19 BOUNDP) (16 ERRORPOS 7 STREAM-ERROR) () \TEXTINIT :D4 (F 2 *TEDIT-OLD-STREAM-ERROR-HANDLER*) D`dgdgdgdg dg dgdgdg,dgXdgVdgTdgRdgPdgNdgLdgJdgHdgFdgDdgBdg@dg>dgdgdO>djdkdjdjdh_*BO*_@ Ok@ Ok@ O*NBO*OgB B_BO*_BnN BN BABANi_2BHdNCAO _&O OO&k_@O@O@_$OpNOj`OOk _BdOBB4_DdOD O_FdOFdjdkdjdjdh_*OOkO BOp`Bn _HOH_JdOJB4_LdOL OOB: B _NdONdjdkdjdjdh_*BnN BO*_O*NBO*_@ Ok@ Ok@ BN BAi_2AOAOO&O&jOO$BhO&OO$AB BhO&l _&OXO O _4OO_6OO4O6B:O6O4 B:O4BO&B_O* O$_,O*B4 O*OjwOlO_,O _,dO,BH_.g AO.j_0Bj.AOj&O.gO.O.N; B:BO0gggOAOO0O.hdh O2O&AkO _&OkkO&l+OV>OVjjOVOV ^jOVOTOkkOTOkk4OOTOOTOTNJKKLOTl_V_TBNO_BANBkkjhB,jhiBd,i Bk,kjhOOjOkj_POPjhh(1493 \TEDIT.WINDOW.TITLE 1490 \TEDIT.ORIGINAL.WINDOW.TITLE 1341 \FZEROP 1297 \CHTOPCNO 1279 \TEDIT.HISTORYADD 1225 \FZEROP 955 \INSERTPIECE 944 \SPLITPIECE 885 RPLCHARCODE 877 RPLSTRING 869 STRINGP 787 \TEDIT.UNIQUIFY.PARALOOKS 783 COPYALL 731 ALLOCSTRING 712 SUBSTRING 629 SUBSTRING 574 \CHTOPCNO 491 \INSERTPIECE 459 RPLCHARCODE 451 RPLSTRING 443 STRINGP 355 ALLOCSTRING 339 SUBSTRING 277 RPLCHARCODE 266 RPLSTRING 255 STRINGP 90 %%ARRAY-TYPE-NUMBER 69 %%ARRAY-BASE 52 %%ARRAY-OFFSET 27 %%ARRAY-TYPE-NUMBER 14 STRINGP 8 NCHARS 3 STRINGP) (1515 PIECE 1510 PIECE 1472 TEXTOBJ 1458 TEXTOBJ 1449 TEXTOBJ 1413 ARRAYP 1394 ARRAYP 1374 ARRAYP 1356 ARRAYP 1305 ARRAYP 1254 PIECE 1249 RIGHT 1246 Insert 1242 Replace 1231 TEXTOBJ 1205 Insert 1184 TEXTOBJ 1164 Delete 1156 TEXTOBJ 1147 PIECE 1141 PIECE 1132 PIECE 1121 PIECE 1104 PIECE 1094 TEXTOBJ 1090 PIECE 1076 PIECE 1066 TEXTOBJ 1057 TEXTOBJ 1045 TEXTOBJ 1031 TEXTOBJ 1020 PIECE 1010 PIECE 1005 PIECE 996 PIECE 986 PIECE 981 PIECE 972 PIECE 963 PIECE 912 ARRAYP 858 PIECE 848 PIECE 778 TEXTOBJ 770 PIECE 751 TEXTOBJ 723 |PIECETYPE#| 704 PIECE 658 PIECE 642 TEXTOBJ 619 |PIECETYPE#| 593 ARRAYP 551 TEXTOBJ 537 TEXTOBJ 529 TEXTOBJ 498 TEXTOBJ 487 LASTPIECE 480 PIECE 473 TEXTOBJ 465 PIECE 432 PIECE 385 PIECE 369 PIECE 352 % 345 |PIECETYPE#| 331 PIECE 318 TEXTOBJ 283 PIECE 230 PIECE 199 TEXTOBJ 182 TEXTOBJ 173 TEXTOBJ 167 TEXTOBJ 161 TEXTOBJ 155 TEXTOBJ 149 TEXTOBJ 143 TEXTOBJ) () \INSERTCR :D4 (P 0 INPC I 2 TEXTOBJ I 1 CH# I 0 CH) BB:j@l jB l AB @l jBXkBjh(31 \INSERTCH 23 \TEDIT.CONVERT.TO.FORMATTED) (58 TEXTOBJ 49 PIECE 43 TEXTOBJ 6 TEXTOBJ) () \CHTOPC :D4 (I 1 PCTB I 0 CH#) A@A kHII(5 \CHTOPCNO) (14 ARRAYP) () \CHTOPCNO :D4 (L (1 PCTB 0 CH#)) rAjAkkklmAkkkHJ\@LJYdKmZj$JL@J[IJmZjJdllHJNIL (30 ARRAYP 10 ARRAYP 3 ARRAYP) () \CLEARPCTB :D4 (I 0 PCTB) o(2 HELP) NIL ( 6 (PROG ((OLASTPC (\EDITELT PCTB \PCTBLastPieceOffset))) (\EDITSETA PCTB \FirstPieceOffset 1) (* Create the LASTPIECE pseudo-piece placeholder in the first piece of the table) (\EDITSETA PCTB (ADD1 \FirstPieceOffset) (QUOTE LASTPIECE)) (for I from \SecondPieceOffset to OLASTPC do (* Now remove the other pieces, setting them to NIL) (\EDITSETA PCTB I NIL)) (\EDITSETA PCTB \PCTBLastPieceOffset (ADD1 \FirstPieceOffset)) (* Fix up the last-piece pointer) (\EDITSETA PCTB \PCTBFreePieces (IPLUS (\EDITELT PCTB \PCTBFreePieces) (LRSH (IDIFFERENCE OLASTPC (ADD1 \FirstPieceOffset)) 1))) (* And the free count of pieces.) (RETURN PCTB))) \CREATEPIECEORSTREAM :D4 (P 0 PC I 4 END I 3 START I 2 PARALOOKS I 1 LOOKS I 0 STRING F 4 DEFAULTFONT) @@ D`d@dh@ dIdjdB@j@ @lDdJkjk@`dodhdjF3@gg @ @Rj@@@1@ b`d@dh@ dKdjdBdjXdAT  HB `` H(215 NCREATE2 197 CHARLOOKS.FROM.FONT 163 NCHARS 142 MKSTRING 116 STREAMP 111 OPENSTREAM 54 %%ARRAY-TYPE-NUMBER 26 NCHARS 6 STRINGP) (212 TEDIT.DEFAULT.FMTSPEC 209 |FMTSPECTYPE#| 203 PIECE 190 PIECE 148 |PIECETYPE#| 134 PIECE 121 STREAM 108 OLD 105 INPUT 80 |PIECETYPE#| 11 |PIECETYPE#|) ( 86 "") \DELETEPIECE :D4 (P 10 HIBASE P 9 LOBASE P 7 LO P 6 HI P 2 PCLIM P 1 PCLEN P 0 PCNO I 2 PC# I 1 PCTB I 0 PC) B@A @@3j@Akk#HJHlH3 O!OjVOO JjOJNNJ=AOO_ANN_OOINl_ԾOl_AJlٻkkKAdkؼL@@@ @ @ @h(70 \FZEROP 7 \FINDPIECE) (232 PIECE 228 PIECE 223 PIECE 215 PIECE 206 PIECE 202 PIECE 197 PIECE 189 PIECE 179 ARRAYP 169 ARRAYP 154 ARRAYP 103 ARRAYP 89 ARRAYP 25 ARRAYP 19 PIECE) () \FINDPIECE :D4 (P 1 I I 1 PCTB I 0 PC) pAkklJ5JjKJJ AjJIAkkIAkk@AIIIkوIlZԹh o@ (109 ERROR 32 \FZEROP) (75 ARRAYP 59 ARRAYP 43 ARRAYP 3 ARRAYP) ( 105 "Piece not found: ") \INSERTPIECE :D4 (P 30 I P 17 \INTERRUPTABLE P 6 BASE2 P 5 BASE P 4 NPCTB P 3 OLIM P 2 PCNO P 1 PCTB P 0 PLEN I 4 PC# I 3 DONTUPDATECH#S I 2 TEXTOBJ I 1 OLD I 0 NEW) #@BDAI ZIkk[jHo@ sAg<@h@h JlWIJk_OOb@@A0@A@A A A @A@ Jlj@h@IJk_OO I_jOwO pI l I I _dOOghj I]LI O&O$O(MdI k Ld I _OBLYI]Kk_O^hNhMJdMJdlKJkO.O0O*O,O2MJhIJIJl_OOO4O6O6O8MJkhIJk_OO@IKl_kkOIdk_ O CnKlJlO>+O>jYO>O> MjO>O_dIJkklJllkJllgJJIkٻKJkklJllkJll@J@kؼllLJllgJ(27 ARRAY) (192 LASTPIECE 181 ARRAYP 165 ARRAYP 157 PIECE 140 ARRAYP 124 ARRAYP 109 ARRAYP 99 ARRAYP 87 LASTPIECE 76 ARRAYP 60 ARRAYP 45 ARRAYP 35 ARRAYP 22 POINTER) () \SPLITPIECE :D4 (P 4 \INTERRUPTABLE P 3 NEWLEN P 2 CHNO P 1 NEWPC P 0 PCNO I 3 PC# I 2 TEXTOBJ I 1 CH I 0 PC) C @B `@ "ABHHZdjo @jjdh@%I@Jk I@J@dkJ 0@1I@Idj@Jd؃@JI@J@JI@gBiHl BHBHHIMNNOBjjdhI(176 \INSERTPIECE 98 SUBSTRING 77 SUBSTRING 47 SHOULDNT 16 NCREATE2 9 \FINDPIECE) (222 TEXTOBJ 206 ARRAYP 187 ARRAYP 166 LASTPIECE 119 PIECE 52 PIECE 26 ARRAYP 12 |PIECETYPE#|) ( 44 "Splitting a piece at the start.") \TEXTCLOSEF :D4 (P 5 I P 2 PC P 1 PCTB P 0 TEXTOBJ I 0 STREAM) @ 1HYH[jKK vIkkklN:NjZNN PjNMIkkkMIkkk'IMMZJ Ml^ԽH, h(161 CLOSEF? 142 CLOSEF? 71 \FZEROP 34 \FZEROP 3 TEXTOBJ) (156 TEXTOBJ 137 PIECE 130 PIECE 118 ARRAYP 101 ARRAYP 83 ARRAYP 40 ARRAYP 17 TEXTOBJ 10 TEXTOBJ) () \TEXTDSPFONT :D4 (P 0 WIN I 1 NEWFONT I 0 STREAM) F@ 4A5i@Ag &@ @ dAH (62 DSPFONT 46 TEXTOBJ 35 TEXTOBJ 28 TEDIT.CARETLOOKS 25 \COERCEFONTDESC 3 TEXTOBJ) (49 TEXTOBJ 38 TEXTOBJ 22 DISPLAY 11 CHARLOOKS 6 TEXTOBJ) () \TEXTEOFP :D4 (P 1 PC I 0 STREAM) v@hN@@j=@Hj HH #@h@IiZjJJ hIY(104 \FZEROP 49 \FZEROP) (111 PIECE 89 PIECE 76 PIECE 71 STREAM 61 PIECE 56 STREAM 30 STREAM 19 STREAM 13 STREAM 3 STREAM) () \TEXTGETEOFPTR :D4 (I 0 STREAM) @NIL (8 TEXTOBJ 3 STREAM) () \TEXTGETFILEPTR :D4 (P 5 PLEN P 4 LIMIT P 3 OFFSET P 2 CHARSLEFT P 1 PCNO P 0 PC I 0 STREAM) @@ @@@5H@_kOLO@IIMJ@KLlۂKLk@dNNkNIL (119 TEXTOBJ 114 STREAM 93 STREAM 78 ARRAYP 73 TEXTOBJ 68 STREAM 61 PIECE 44 TEXTOBJ 39 STREAM 27 STREAM 21 STREAM 15 STREAM 9 STREAM 3 STREAM) () \TEXTOPENF :D4 (P 4 I P 2 PC P 1 PCTB P 0 TEXTOBJ I 4 ZXCV I 3 QWER I 2 ASDF I 1 ACCESS I 0 STREAM) @!HYdkkklM:MjkMM ajMLIkkkLIkkk8ILLZJRj@J Ll]Լ@(138 \TEDIT.REOPEN.STREAM 50 \FZEROP) (133 PIECE 122 STREAM 117 PIECE 109 PIECE 97 ARRAYP 80 ARRAYP 62 ARRAYP 19 ARRAYP 12 TEXTOBJ 3 STREAM) () \TEXTOUTCHARFN :D4 (I 1 STREAM I 0 CH) @AA (20 \INSERTCH) (15 STREAM 9 TEXTOBJ 4 STREAM) () \TEXTBACKFILEPTR :D4 (P 3 REALFILE P 2 PF P 1 PS P 0 PC I 0 STREAM) p@@j@@j@@ \L@k@h@@ m H o ]j?M5H@H H@ "HY Hkk@I r H XHZ"Hdkk@JHjhg ;H@j+o "@^jN@@ @ i @@@@Kj@K K K @K@K@K@K(348 \PEEKBIN 343 \BACKFILEPTR 338 \BACKFILEPTR 290 \FZEROP 285 \PAGEDBACKFILEPTR 280 \PAGEDBACKFILEPTR 251 ERROR 226 \TEDIT.TEXTBIN.FILESETUP 176 \FZEROP 171 \TEDIT.TEXTBIN.STRINGSETUP 145 \TEDIT.APPLY.STYLES 104 ERROR) (396 STREAM 392 STREAM 383 STREAM 379 STREAM 370 STREAM 366 STREAM 357 STREAM 353 STREAM 331 STREAM 323 STREAM 313 STREAM 307 STREAM 303 STREAM 296 STREAM 273 STREAM 257 STREAM 239 STREAM 232 PIECE 222 PEEKBIN 212 PIECE 201 PIECE 191 PIECE 182 PIECE 161 PIECE 152 PIECE 140 STREAM 133 PIECE 129 STREAM 110 PIECE 86 STREAM 82 STREAM 74 STREAM 65 STREAM 53 PIECE 48 STREAM 44 STREAM 31 STREAM 25 STREAM 12 STREAM 6 STREAM) ( 248 "CAN'T GET TO NEXT PIECE" 101 "Trying to BACKFILEPTR thru start of text.") \TEXTBOUT :D4 (P 7 OFFST P 6 PSTR P 5 PC P 4 PS P 3 TEXTLEN P 2 WINDOW P 1 CH# P 0 TEXTOBJ I 1 BYTE I 0 STREAM) @@ krH[HZdHId AIH JH H]\@M@H @LjL LLjL L_@j@dOk_OH @j@d@k@j@hh(106 %%ARRAY-OFFSET 91 %%ARRAY-BASE 49 TEDIT.UPDATE.SCREEN 43 \INSERTCH 36 \TEDIT.MARK.LINES.DIRTY 9 \TEXTGETFILEPTR) (176 STREAM 169 STREAM 157 STREAM 149 STREAM 140 TEXTOBJ 125 STREAM 75 TEXTOBJ 71 STREAM 64 STREAM 54 TEXTOBJ 25 TEXTOBJ 18 TEXTOBJ 3 STREAM) () \TEXTSETEOF :D4 (I 1 EOFPTR I 0 STREAM) @A@AnHIINIL (12 STREAM 3 STREAM) () \TEXTSETFILEPTR :D4 (P 0 TEXTOBJ I 1 FILEPOS I 0 STREAM) l@1HYjWII MAmjAHjHkJJkH @ #jAAHA AkػkKKkH h(104 \SETUPGETCH 88 \ILLEGAL.ARG 66 \SETUPGETCH 27 \FZEROP) (80 TEXTOBJ 52 TEXTOBJ 41 TEXTOBJ 12 TEXTOBJ 3 STREAM) () \TEXTDSPXPOSITION :D4 (I 1 XPOSITION I 0 STREAM) h@  (13 DSPXPOSITION 4 TEXTOBJ) (7 TEXTOBJ) () \TEXTDSPYPOSITION :D4 (I 1 YPOSITION I 0 STREAM) h@  (13 DSPYPOSITION 4 TEXTOBJ) (7 TEXTOBJ) () \TEXTLEFTMARGIN :D4 (I 1 XPOSITION I 0 STREAM) @ :l(3 TEXTOBJ) (11 FMTSPEC 6 TEXTOBJ) () \TEXTRIGHTMARGIN :D4 (P 0 TEXTOBJ I 1 XPOSITION I 0 STREAM) ;@ H:jHH$lnH:l(3 TEXTOBJ) (51 FMTSPEC 46 TEXTOBJ 32 TEXTOBJ 25 TEXTOBJ 15 FMTSPEC 10 TEXTOBJ) () \TEXTBIN :D4 (L (0 STREAM)) $  @@q@['@dV@ @@9@ 8g ^@@kN @@@jK@i  @_jOz@[{@jjdhN_kN @k@j@J@j@k@j@0N0@N""N  @@Md_OZJ_jOO @kkjh@hJ@@ l @0#@0_@JlO\@LZLJ[/MJW@0JJ@ Jg ^kN @0N0@N"'J M @J J@ "JYjJ@I @ JX!JjJ@HJjhg @ J[v@jjdhN\kN @j@J@J@j@j@j@0N0@N""N @jKo @*@*_@kO@jK@ (801 \TEDIT.TEXTBIN.NEW.PAGE 763 ERROR 667 \SETUPGETCH 628 \TEDIT.TEXTBIN.FILESETUP 588 \TEDIT.TEXTBIN.STRINGSETUP 565 \TEDIT.APPLY.STYLES 543 EQCLOOKS 492 \SETUPGETCH 479 IMAGEOBJPROP 468 \TEDIT.APPLY.PARASTYLES 325 \FZEROP 272 \FZEROP 194 \SETUPGETCH 128 \PAGEDBIN 123 \TEDIT.TEXTBIN.NEW.PAGE 75 IMAGEOBJPROP 67 \PAGEDBIN 46 \PAGEDBIN) (792 STREAM 776 STREAM 768 STREAM 751 STREAM 740 STREAM 736 STREAM 728 TEXTIMAGEDATA 723 STREAM 719 TEXTIMAGEDATA 714 STREAM 707 STREAM 700 STREAM 688 PIECE 679 PIECE 675 STREAM 662 STREAM 644 STREAM 635 PIECE 624 PEEKBIN 614 PIECE 606 PIECE 595 PIECE 581 PIECE 572 PIECE 560 STREAM 553 PIECE 549 STREAM 538 PIECE 532 PIECE 524 STREAM 520 STREAM 511 TEXTIMAGEDATA 506 STREAM 502 TEXTIMAGEDATA 497 STREAM 487 STREAM 476 SUBSTREAM 463 STREAM 456 PIECE 452 TEXTIMAGEDATA 447 STREAM 438 PIECE 432 PIECE 423 PIECE 409 STREAM 390 TEXTIMAGEDATA 385 STREAM 377 TEXTIMAGEDATA 372 STREAM 361 STREAM 357 STREAM 345 STREAM 331 STREAM 307 PIECE 291 PIECE 285 STREAM 278 STREAM 262 STREAM 258 STREAM 250 TEXTIMAGEDATA 245 STREAM 241 TEXTIMAGEDATA 236 STREAM 229 STREAM 222 STREAM 210 PIECE 202 STREAM 189 STREAM 169 STREAM 158 PIECE 153 STREAM 133 STREAM 113 STREAM 104 STREAM 100 STREAM 86 STREAM 82 STREAM 72 SUBSTREAM 57 STREAM 51 STREAM 37 STREAM 27 PIECE 22 STREAM 12 STREAM 6 STREAM) ( 760 "CAN'T GET TO NEXT PIECE") \TEDIT.TEXTBIN.STRINGSETUP :D4 (P 0 OFFST I 3 PS I 2 STREAM I 1 CHARSLEFT I 0 CHOFFSET) CjC ClDoBCjC CCjC CBjB@BjBjBABBkBjBhBjBijBCjC CCjC CXBjBjBHkBHk@BABBkBjBhBhh(159 %%ARRAY-OFFSET 144 %%ARRAY-BASE 50 %%ARRAY-OFFSET 35 %%ARRAY-BASE 13 %%ARRAY-TYPE-NUMBER) (235 STREAM 227 STREAM 219 STREAM 186 STREAM 178 STREAM 129 STREAM 120 STREAM 112 STREAM 104 STREAM 81 STREAM 73 STREAM) () \TEDIT.TEXTBIN.FILESETUP :D4 (P 3 FPOS P 2 CH P 1 BYTEOFFSET P 0 BYTESLEFT I 7 NOERRORFLG I 6 OPERATION I 5 FATP I 4 PF I 3 STREAM I 2 CHARSLEFT I 1 CHOFFSET I 0 PC) EBBEAARDRjjCD bC@[CKnDKI D \j&LL KID FdgYDG CDCDCDCnCDDHؽdMMCHCCCDCECEkgD j^NjhJ(105 \PEEKBIN 87 GETEOFPTR 78 \FZEROP 65 GETEOFPTR 61 SETFILEPTR 28 \TEDIT.REOPEN.STREAM) (188 BIN 181 STREAM 174 STREAM 167 STREAM 152 STREAM 95 PEEKBIN 47 STREAM 35 STREAM) () \TEDIT.TEXTBIN.NEW.PAGE :D4 (P 1 CH P 0 FILE I 1 SPLITCHAR I 0 STREAM) @!HRjjHHg g XHHH Y@H@H@H@@HdJJ@@@@AI@ I(154 \PAGEDBIN 42 \GETSTREAM 36 OPENFILE) (143 STREAM 134 STREAM 128 STREAM 124 STREAM 109 STREAM 103 STREAM 99 STREAM 91 STREAM 87 STREAM 79 STREAM 75 STREAM 67 STREAM 63 STREAM 52 STREAM 48 STREAM 39 INPUT 33 INPUT 25 STREAM 12 STREAM 3 STREAM) () \TEXTPEEKBIN :D4 (P 7 SUBSTREAM P 6 PO P 5 PC P 4 PS P 3 PF P 2 STR P 1 FILE P 0 CH I 1 NOERRORFLG I 0 STREAM)   @]@@M#@u@ :_@kOAhM@ @@k@ @A @ @\d@L LA L @A M;@_jO@A  @M_O]d@@ l @M M@ "M^{@jjdh@M@jOSkO @M@j@j@j@0O0@O""O @jNM\jM@L @A M[ MjM@KMjhgA o A#@*_@kOA@*_@kOh(456 ERROR 448 \TEDIT.TEXTBIN.FILESETUP 409 \PEEKBIN 404 \TEDIT.TEXTBIN.STRINGSETUP 304 \SETUPGETCH 251 \TEDIT.APPLY.STYLES 191 \FZEROP 187 \TEDIT.PEEKBIN.NEW.PAGE 158 \PAGEDPEEKBIN 151 \PAGEDBACKFILEPTR 146 \PAGEDPEEKBIN 140 \PAGEDBIN 115 \PAGEDBACKFILEPTR 110 \PAGEDPEEKBIN 104 \PAGEDBIN 81 \PEEKBIN) (482 STREAM 464 STREAM 443 PEEKBIN 433 PIECE 425 PIECE 414 PIECE 397 PIECE 387 PIECE 378 STREAM 366 STREAM 361 STREAM 353 TEXTIMAGEDATA 348 STREAM 343 TEXTIMAGEDATA 338 STREAM 331 STREAM 324 STREAM 312 PIECE 308 STREAM 299 STREAM 281 PIECE 266 STREAM 257 PIECE 246 STREAM 239 PIECE 235 STREAM 224 STREAM 220 STREAM 201 PIECE 197 STREAM 168 STREAM 132 STREAM 128 STREAM 121 STREAM 92 STREAM 86 STREAM 74 PIECE 66 PIECE 47 FDEV 42 STREAM 34 STREAM 19 STREAM 13 STREAM 6 STREAM) ( 453 "CAN'T GET TO NEXT PIECE") \TEDIT.PEEKBIN.NEW.PAGE :D4 (P 1 CH P 0 FILE I 1 NOERRORFLG I 0 STREAM) @1HRjjHHg g XHHH :HkJAh&H @H HA H HA Y@H@H@H@@HdKK@@@I(114 \PEEKBIN 107 \PAGEDBACKFILEPTR 102 \PAGEDPEEKBIN 96 \PAGEDBIN 82 \PEEKBIN 42 \GETSTREAM 36 OPENFILE) (190 STREAM 184 STREAM 180 STREAM 165 STREAM 159 STREAM 155 STREAM 147 STREAM 143 STREAM 135 STREAM 131 STREAM 123 STREAM 119 STREAM 88 STREAM 65 FDEV 60 STREAM 52 STREAM 48 STREAM 39 INPUT 33 INPUT 25 STREAM 12 STREAM 3 STREAM) () CGETTEXTPROP :D4 (L (1 PROP 0 WINFORM)) *gggg@hAddi3 gAhhNIL (31 QUOTE 11 of 8 EDITPROPS 5 fetch 2 LISTGET) () CTEXTPROP :D4 (I 0 FORMTAIL) @d-oi i g@hi i g@h gg@g@h@ ggggg@hhggggg@hh@@hhigggg@hgg@@hhhh(80 CGETTEXTPROP 46 CGETTEXTPROP 35 TERPRI 30 PRIN1 18 TERPRI 13 PRIN1) (170 LIST 167 WITH 159 TEXTOBJ 156 OF 153 EDITPROPS 150 REPLACE 121 TEXTOBJ 118 OF 115 EDITPROPS 112 FETCH 109 LISTPUT 96 TEXTOBJ 93 OF 90 EDITPROPS 87 FETCH 84 COND 67 TEXTOBJ 58 IGNOREMACRO 53 QUOTE 38 TEXTOBJ 22 TEXTPROP) ( 9 "Possible error in call to TEXTPROP: less than 2 args") GETTEXTPROP :D4 (I 1 PROP I 0 WINDOW) @FA'NIL (3 TEXTOBJ) () PUTTEXTPROP :D4 (I 2 VALUE I 1 PROP I 0 TEXTOBJ) /@ F@ FAB @ ABhHIFI(28 TEXTOBJ 23 LISTPUT 13 TEXTOBJ 3 TEXTOBJ) (31 TEXTOBJ 16 TEXTOBJ 6 TEXTOBJ) () TEXTPROP :D4 (P 0 X) 0eHdlka lala lka la  (45 \ILLEGAL.ARG 41 GETTEXTPROP 35 TEXTOBJ 24 PUTTEXTPROP 15 TEXTOBJ) NIL () (PRETTYCOMPRINT TEXTOFDCOMS) (RPAQQ TEXTOFDCOMS ((FILES TEDITDECLS) (DECLARE%: EVAL@COMPILE DONTCOPY (CONSTANTS (\SCRATCHLEN 64)) ( FILES (LOADCOMP) TEDITDECLS)) (FNS COPYTEXTSTREAM OPENTEXTSTREAM REOPENTEXTSTREAM TEDIT.STREAMCHANGEDP TEXTSTREAMP TXTFILE \DELETECH \SETUPGETCH \TEDIT.REOPEN.STREAM \TEDIT.COPYTEXTSTREAM.PIECEMAPFN \TEXTINIT \TEXTMARK \TEXTTTYBOUT) (FNS \INSERTCH \INSERTCR) (COMS (* ;;; "Functions to manipulate the Piece Table (PCTB)") (FNS \CHTOPC \CHTOPCNO \CLEARPCTB \CREATEPIECEORSTREAM \DELETEPIECE \FINDPIECE \INSERTPIECE \MAKEPCTB \SPLITPIECE)) (COMS (* ; "Generic-IO type operations support") (FNS \TEXTCLOSEF \TEXTDSPFONT \TEXTEOFP \TEXTGETEOFPTR \TEXTGETFILEPTR \TEXTOPENF \TEXTOUTCHARFN \TEXTBACKFILEPTR \TEXTBOUT \TEXTSETEOF \TEXTSETFILEPTR \TEXTDSPXPOSITION \TEXTDSPYPOSITION \TEXTLEFTMARGIN \TEXTRIGHTMARGIN) (FNS \TEXTBIN \TEDIT.TEXTBIN.STRINGSETUP \TEDIT.TEXTBIN.FILESETUP \TEDIT.TEXTBIN.NEW.PAGE) (FNS \TEXTPEEKBIN \TEDIT.PEEKBIN.NEW.PAGE)) (COMS (* ; "Support for TEXTPROP") (FNS CGETTEXTPROP CTEXTPROP GETTEXTPROP PUTTEXTPROP TEXTPROP)) (DECLARE%: DONTEVAL@LOAD DOCOPY (P (\TEXTINIT))) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA TEXTPROP))))) (FILESLOAD TEDITDECLS) (\TEXTINIT) (PUTPROPS TEXTOFD COPYRIGHT ("John Sybalsky & Xerox Corporation" 1983 1984 1985 1986 1987)) NIL