XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>SEDIT-LINEAR.;1 Source file created Thursday, 17 May 1990, 10:54:05. FASL file created Monday, 26 January 1998, 13:33:51. #ogg o FILECREATEDLOC*STANDARD-INPUT*1 top-level formFUNCTIONDEFINE-FILE-INFOOPEN OUTPUT DIRECTION READTABLEXCLPACKAGE DEFPACKAGEXEROX-COMMON-LISPSEDITUSELISPXCL{Null}7ggo oo o 4 top-level forms1PUTPROPS&PUTPROPSEDIT-LINEARCOMS FILEDATES SEDIT-LINEAR,MAKEFILE-ENVIRONMENT XCL !FILETYPE COMPILE-FILEPROP%( LOCALVARSDECLARE:DONTCOPYDOEVAL@COMPILEFILES SEDIT-DECLS FUNCTIONSCLEAR-ALL-LINEAR-FORMSSEDITCLEAR-LINEAR-FORM6RELINEARIZE-PRELINEARIZED-NODE6FNSCLEAN-UP-AFTER-RELINEARIZATION6FIRST-LINE-LINEAR6GENERATE-LINEAR-FORM6LAST-LINE-LINEAR6 LINE-FINISHED6LINEAR-ITEM-WIDTH6 LINEARIZE6 NEW-BLOCK6NEXT-LINEAR-ITEM6 OUTPUT-BITMAP6OUTPUT-CONSTANT-STRING6 OUTPUT-CR6 OUTPUT-SPACE6 OUTPUT-STRING6PAINT-TO-END-OF-LINE6RECOMPUTE-FORMAT-VALUES6 RELINEARIZE6REPAINT6REUSE-LINEAR-FORM6 SHIFT-BLOCK6TRY-REUSING-BITS6 17-May-90 11:06:114{DSK}local>lde>lispcore>sources>SEDIT-LINEAR.;27#@$ @g 7CONTEXT WALK-UP-TREE6SYMBOL-FUNCTION8 EDIT-NODE6 EDIT-CONTEXT68H@$@j@`XH@I@ @Xhh8NODE59<\"WEAK-LINKTYPE#6\\ EDIT-NODE-TYPE6\9n@X\HHjHhi HI@I@I@I@ZIIh9NODE1 STRINGWIDTH6 `\V\L\B\8 STRING-ITEM6$iii i\<@X @@@ Kkؼhhh_BBA@ A_ OOOB ٽjMCB_OO M O_IIMIIjMDDJhihOD@"6CDhCD1DDkDC_JHKCDJHKJLOJ J_CJDB JkDC_B_h_Ohi_OCO_O %B BBB_OObONCD_HKOkHKNkLCO J_jHKOLNOk BA@B B kBBBO hCDH hDDChjHKCLDC A_ OOOٽIMkIjM<  &OPTIONALCONTEXTNODEFOLLOWING-LINEY-1Y-2 INTERLISP<BLTSHADE#WYOFFSETMՙtBITBLTvF? \INSUREWINDOW!h LINE-START6^xUxLxC\ xxxxxxxxyxqxgxZx1xߙ]xxx~xtxjxaxXxO\?x%]]]]=:@b-@@A$h=kNODECONTEXTr0\)] xxx\>YAF@YhiZJ@A$h@jhwj@iheH@Bhi[K@@BHhi3@@[K @@BHhihh@B@A {@H@B@j@AHA@DAjJ@A@LA@N"AA@JKNKL@h@AlIA@DALAL@h`A@ KJLKNKNJKNJAbA Ahb@AH@@AFJKJKH@AFH@Yjjjhi>kNODECONTEXT RIGHT-MARGINrCLASTęN3F\9]3\]\\]\]]ؙ\љ]ę]]]\ WEAK-LINK6]{]p\j]Y\F\?]9]-]"\]\]]]\\ؙ\Ι\\\\\\p\h\T\C\4\&]c \]?:@b-@@A$h?kNODECONTEXTr0\)] xxx\@@do @HX HHH@@idibH HHH@"@`A@`@`YI@``JKKB@^"@^@^h@^K@K hibK@`KC@B B@Bh@Bj@B l@bn@fhcB @nBBٰ+B BBBk@"hih@ifIB@Bh@Bj@B l@bn@fhcB @nBBٰ+B BBBk@"hih@[ifihh@kCONTEXTXLINEARFORCEr[J1PSHOULDNTB]]xxx~xrxix]]UxH]>]3x,]!]]]]xxיxΙx™xx]x]]x|]q]g]J LINE-BLOCK6?]'] ]]x왂]ۙΘLINE-BLOCKTYPE#6ș]]]]~]txkxcx[xM]B]8x/x'xx]] 2tried to flush a line off the bottom of the screenA-@3 @@@@@ o AkITEMr' BITMAPWIDTHii" this doesn't have a linear widthB,AnADH@hiYI@ AJhio AbALAL@hh@AL@AA@IJLININJrINJ_A`YI@KALJILJNJNIJNI@ALAbA AhbAdhw@jhi@Y AnIIkهI Ah$j@ihYI@\AibA@A hb@Z AnJJٰ'J JJJkA"hiIJfJZJiA A`@JiJ@ I An7JI JIJIIJI kII JIJI@ABBH A@NAANLA@ JHH@@غIJIJ@@@BB@@AF@9ADA@D@@AlJAZHDHA@ BkNODECONTEXT RIGHT-MARGINr&F0>`C4CDe\]c\]]ܙcՙ\ʙ]ę\\\\\\\z\q\k\`\Z]N]H]=\7])\xxxxxܙϙxəxx]x\yp\g]C]7x.x&xxx x]x\]ۙ\ԙ]ʙ]c\\]xxzxo]gx_\Q\E];]*]]\\]]]]ݙ]Ιb\]]]]\\v]p\_]U]K]2]*\\]]?%this node shouldn't be linearized nowC@`@FYHJHIH@HZJH`KLLX`HIH@LHZhhCkCONTEXTr xm]g]KE82]& ]]D]4]*]]]]'the pretty printer doesn't like bitmapsF@n'@L@LAh$@@@LHINILkA@L@N@NI@NI@IN@b$@ @`I@hb@@FAF@HYIA HJHJ@HYIA HKHKJKK@jAAAi hA@ i @@FAԻIKFKFkCONTEXT STRINGITEMrt TEDIT.INSERTmMAP-FONT6WMKSTRING FONTDESCENT똕 FONTASCENTC$i]{]f]^iOiFi;i2]i xx]iۙxՙx̙]i]]]]]|]r\k]^]T]J]4]-]']]]]G@n`@H@Dhhhhhh_B@bH HHHٺII_@F_OOOO@L@L[h@dgKK^KK_KK kKK]K@n K K@HKBKjKjKA KJ @_`_@H_O_OOO_@D_O_OOO__OBO__OjO__OjO__OA O__OJ O[@L_OOLONONOONO@bB@`\L_L @FL LؼH@F @d_Ogj@H_ OOO@")@O O kOOO@L O OOO@@id@@F@L @hp@^_@O`OAO@LO_@b_OOO/OL OM ONOO@@LHH@H@AF@_@_@L_OONO_OOLO@`l hhi @gAo gBB@h @_AFAG kCONTEXTINDENTLINESKIPrTEDIT.PARALOOKSFIXR~z@Mf]EDIT-ENV6] PARALEADING6-1-STLEFTMARGIN6]r\OneCharAtomBasek]I]@]7]-]"]x] ]Ꙃߙș]]]]]s]k]]]O]Ex:x0x&x]xxxxי]͙x™xxx]NEW6]]yxnf^]UJA9]/]$\]]]]]]s]iLINE-STARTTYPE#6YxOxEx;x1x&] xx ]xxxxxәx͙xxx]x]]y]n\h\]xTxLxDx92]]]]B rHMjAh@n@L@Lh<@b@LAhih@ @hb@LA\@A@LHILHNHNIHNI@b@ @hb@@@LIHNHL@@FAԹHIFIA@۹kHI#@oh`i HkԸ@@FAԹHIFIHkCONTEXTXr(CIC<]5]! DEFAULTFONT]Ă]]]Ι]Ǚ]]]]\]]~]t]j]Z]P]6]-]]]] Ia@nhhC@b@L@LXhHAhiZJ*HChi[KjHhiBhi\ACB HAHIHCHBkjJK@b@ @hbHACB @`ZJALZJILZJCLZBkjJML@LKJLKNKNJKNJ@b@ @hb@@@LJKNKL@H[KC JLJL@H[KC LJLJ@@FIԺKJFJ@BAi bAhCC@b@ i AC YIFHJFJIkCONTEXTSTRINGPRIN-2?FONTr Eh=6ٙgChəCh*R]K]/]%Ă]]]]Йxʙx]xx]]~]x]n]]]S\L]?]5]+]!]󘒌STRING-ITEMTYPE#6ݙiЙ]]iiiimiYiFi:i1]']]]J@H@jH@lH @@lj@IH HHHk@ IkHHH @@lH kHH@hA j@@H HHHk@ @k@j H HHH @@l@jY kII@hA JkCONTEXT LINEAR-ENDrMKtșMt(]uxmxcx[]S]@x7x/x'xx] ]]xxxxؙ]Й]]xxx]xxyxm]axXxPxHx?]5],]"x] ]]Kh@`@-@ IIZA jJiI@@AAlIHH@hih@YkkjhihKkNODECONTEXTr/K |\k\Z]PcI\7\\\ TYPE-LITATOM6\L @hh@@@hA h_h_ANANANNm ANNm"HCAAnknAhpAjr@_h_@A _A_@ A_OOdOAhbPA@jhibA^_AO`AO OOOA"fOOOO  OO AbyOiOAFO OO kOO OOOOOhAO lAOjAOhOOOOOO kOOOAn O@Oi mjANNNN AhriAgdAhb@j@jA @j=@)COMPUTE-ALL-FORMATS6ܙt=2DSPCLIPPINGREGIONт v] ex ^\ Vx O\ Ax 7x .x %x ] xxҙxʙxxxxxv]nxdX]RF]@3\-$]]x\\ޙxיxΙ\]]u]b]SxIx@x7x.\]]]xxٙxϙx]xxxx]vxkxaxWxCȂ*] x\\\\\љ]˙xę\]\\\]\w\a]V\P\D]>\3\,]]]]\♂ۙ]ә̙]\c\\xxtxf]U\O\D\>]2],]!\]\ \\]ߙ\ř\]\]]]|\v]i\^\X\M\G\0\x\x\]Ȃ]]ƙ]\]xxx|xuxixbxVxOxC]8]-x&]xxxޙxәx̙]]x|xui[]QxGx>x5x.]#]]\]]ݙ]ՙxΙ\ř]\]]]]k]X]L]A]+]!\\\\unexpected value for Below?;2the linearize root method should take care of thisMh@hhhhABI D3 Dhb@CD]CACZJb5JAJ kJJbJLhJ BI J3 JjI JMJ.Jo JI JJ[ KIjJhi XjJKI BKI 8J)JhhIhI BJ J jI o CbCbHMkCONTEXTXY LINEAR-STARTENDroc RELMOVETO\TvJ DSPXPOSITION7PRIN2-PRIN1 PRINT-STRING6STRINGP瘕DSPFONTؙMOVETO\}!i iiiߙi˙iiixxxxpxfx^xP\IA)]]junknown linear form itemӘthis StringItem has no fontNgAFAHhh@j@HAF@Zj@J @hi\L@@q@IAb%j@h@hihA AhbH@@ Ih ظ6H@@ Ih ظ@II[IIH KK J A^I IIIK ٽAdNAHK AdAL`NNgAKLK_ OOOA"AO O kOOOAL O OOOAAidKLKAKHAhpKLK J LK LKLKLK kKK LiKK M K@aN\KK kKKMKKKKKAn KKK JX K[K J NAHK AdA@A YHK I@ Ii ظH@@o AHFAA@MLNLNLLLNkNODECONTEXTr 1 ?ԙ@]2](x!]] ]xxxܙ]Ιxřxxx]]xwxoxexSx@x3x*x"xx]xx]֙xșxxxxxx]t]_xDx0]%]]]]]͙xřxx]]]]]|]t]j]b]Z]J]8]$xxx x]PA @AAAAAA_h_Nj@pA @pD@H_ kOO_H@tظ@lA @r_Lk@H_ OOOpA @r_Lk@j OLk@j_ OOO@lH@ _OOL@hiLOLk@"/@H_ kOOOh_O?OM@.@H_ kOOOhIHNJ IH@ O8h_IH.J _NNOپHOظOO_J HOHNk@ h9Jjh_HNK _k@ NOؾK JK@HONJKLMOA ihP kCONTEXTBLOCKrݙODAsDQA.D3ՙ]]8]xxx]]̙xÙxx]]]x]n]bxXxOxFx=]*x#]] xxxx֙]Ǚ]]]xxx}]r]j^]H?6-$ ] o 1 top-level form COPYRIGHTVenue & Xerox Corporation‚ÂĂ"