(FILECREATED "30-SEP-83 10:27:42" ("compiled on " {PHYLUM}SOURCES>NEWPRINTDEF.;3) "27-SEP-83 19:35:40" bcompl'd in WORK dated "27-SEP-83 19:52:39") (FILECREATED "29-SEP-83 20:43:49" {PHYLUM}SOURCES>NEWPRINTDEF.;3 31031 changes to: (VARS NEWPRINTDEFCOMS) previous date: "31-AUG-83 16:46:08" {PHYLUM}SOURCES>NEWPRINTDEF.;2) NEWPRINTDEFA0106 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 RESETVARSLST F 1 LEFT F 2 EXPR F 3 TAILFLG F 4 TAIL F 5 FILE F 6 RESETY F 7 PRETTYFLG) gd gU PcQjddQj؆`(cg` hhPcggg hhPcggg hhPcggg hhPcggg hhPcggg hhPcW`(QSR RT SRhdddg RT c i(352Q PRIN2S 344Q MAPRINT 324Q SUPERPRINT 315Q \DSPRETTY/SUBPRINT 255Q RESETDEF 227Q RESETDEF 201Q RESETDEF 153Q RESETDEF 125Q RESETDEF 77Q SETFONT 21Q SETTOPVAL 16Q IMAGESTREAMP 6 GETTOPVAL) (340Q PRIN2S 303Q \DISPLAYDATA 276Q PPDSP 252Q TTYPRIN2S 247Q PRIN2S 244Q RESETDEF 224Q TTYPRIN1S 221Q PRIN1S 216Q RESETDEF 176Q TTYSHUTS 173Q SHUTS 170Q RESETDEF 150Q TTYOPENS 145Q OPENS 142Q RESETDEF 122Q TTYNEWLINE 117Q NEWLINE 114Q RESETDEF 74Q DEFAULTFONT 71Q SETFONT 57Q PPDSP 12Q PPDSP 2 PPDSP) NIL NEWPRINTDEF D1 (P 7 RESETY P 6 LISPXHIST P 5 FILEFLG P 4 CHANGEFLG P 3 COMMENTCOL P 2 TAIL P 1 LASTPOS P 0 FIRSTPOS I 5 FILE I 4 FNSLST I 3 TAILFLG I 2 FORMFLG I 1 LEFT I 0 EXPR F 11Q LISPXHIST F 12Q RESETVARSLST) Q Eg b d 8hE hE @h3W!Wog hg_ Oh@ABCDE (116Q OLDPRINTDEF 102Q ERROR! 72Q RESETRESTORE 57Q NEWPRINTDEFA0106 30Q DSPRIGHTMARGIN 23Q DSPLEFTMARGIN 14Q IMAGESTREAMP 6 \GETSTREAM) (65Q ERROR 54Q INTERNAL 3 OUTPUT) (51Q (DUMMY.FOR.ERRORSET)) SUPERPRINT D1 (L (2 BRFLG 0 E) I 1 TAIL F 1 LASTPOS F 2 FIRSTPOS F 3 LEFT F 4 CLISPTRANFLG F 5 FORMFLG F 6 PRETTYTRANFLG) g@0Q@`i H`(HRSdHH @A `@`@AB U@` @ VT@@ @AB (144Q \DSPRETTY/SUPERPRINT0 135Q \DSPRETTY/SUPERPRINT/TRAN 121Q \DSPRETTY/SUPERPRINT/COMMENT 114Q SUPERPRINTEQ 101Q \DSPRETTY/SUPERPRINT/CHANGES 60Q PRIN2S 51Q \DSPRETTY/ENDLINE 14Q STRINGWIDTH) (111Q COMMENTFLG 71Q CHANGESARRAY 64Q CHANGESARRAY 24Q PPDSP 10Q PPDSP) NIL \DSPRETTY/SUPERPRINT0 D1 (L (2 BRFLG 0 E) P 2 TAIL P 1 LEFT I 1 TAIL F 3 LASTPOS) cBh`d @` AHgg @BH S`(o` I AHgBhg @(137Q SHUTS 115Q \DSPRETTY/ENDLINE 102Q STRINGWIDTH 57Q \DSPRETTY/SUBPRINT 46Q OPENS 26Q \DSPRETTY/RPARS) (134Q %) 124Q %] 77Q PPDSP 64Q PPDSP 43Q %( 37Q %[ 23Q #RPARS 7 #RPARS) (74Q ")") \DSPRETTY/SUBPRINT D1 (L (2 END 1 BRFLG) P 14Q LEFT P 0 FORMFLG I 0 TAIL F 17Q LEFT F 20Q CLISPFLG F 21Q FORMFLG F 22Q FNSLST) 0W"d@`(@g u Kc@dB@h@@ `(_@W I#Mg _LOh_I Jg hIYMlRO`FM``;J@"BMW$Md`` `Mg M``h M@dhA @b@dBDd>W HI@_lOg _O LOOk)l<@B _@MlKM CsMM @hO &`(``(@J`(c`(_`(`l @AO bg,@gJg Jg MdEOlO O`Ok _`Og|Og r liOdgdgihhBOibIOl;@JMd 0Mg M Md`m _`OgM 5@JM)IM` MdgKo` ciadgdg@A dg@A dgdg𓿱dg@dgdg%iK`c`(``(@iB O @O rMk)l<`(``(`(K`l_dOOO`(MlMg@_M?BM` Odd` 0lOg Og ONO h`(``(WKO` Odg#dgdgdgdgdg4OOgOglk` `_@A@gB dgdgdgdgO_@hdgdg@@JgB _O`()@hO `(``(`(O`l `_`(_@kO @AO b(2450Q \DSPRETTY/SUBPRINT 2437Q NLEFT 2407Q \DSPRETTY/ENDLINE 2333Q \DSPRETTY/DSFITP 2305Q \DSPRETTY/SUBPRINT1 2177Q \DSPRETTY/SUBPRINT1 2155Q \DSPRETTY/ENDLINE 2043Q FASSOC 1767Q \DSPRETTY/DSFITP 1747Q SUPERPRINTGETPROP 1735Q SUPERPRINTGETPROP 1711Q SUPERPRINTEQ 1670Q SUPERPRINTEQ 1500Q \DSPRETTY/DSFITP 1475Q \DSPRETTY/SUBPRINT1 1332Q \DSPRETTY/PRINTSQ 1315Q \DSPRETTY/PRINTPROG 1270Q \DSPRETTY/ENDLINE 1257Q STRINGWIDTH 1230Q FASSOC 1176Q \DSPRETTY/BACKARROWP 1151Q NTHCHAR 1132Q BOUNDP 1125Q SUPERPRINTGETPROP 1113Q FGETD 1016Q SUPERPRINTGETPROP 764Q NTHCHAR 740Q BOUNDP 707Q SUPERPRINTEQ 673Q SUPERPRINTEQ 637Q \DSPRETTY/SUBPRINT 526Q \DSPRETTY/ENDLINE 522Q \DSPRETTY/DSFITP 512Q \DSPRETTY/BACKARROWP 474Q \DSPRETTY/BACKARROWP 450Q \DSPRETTY/SUBPRINT2 405Q SUPERPRINTGETPROP 314Q SETFONT 310Q SUPERPRINT 274Q SETFONT 254Q SUPERPRINTGETPROP 236Q DEFINEDP 137Q SUPERPRINTEQ 107Q SUPERPRINTGETPROP 53Q DOT 22Q SUPERPRINTGETPROP) (2421Q PPDSP 2412Q SPACESIZE 2400Q SPACESIZE 2366Q PPDSP 2353Q PPDSP 2350Q SPACESIZE 2345Q \DISPLAYDATA 2340Q PPDSP 2315Q PPDSP 2277Q CLISPWORD 2260Q !! 2252Q ! 2231Q or 2223Q and 2215Q OR 2206Q AND 2173Q IFWORD 2160Q SPACESIZE 2150Q SPACESIZE 2137Q then 2130Q THEN 2115Q elseif 2107Q else 2101Q then 2072Q ELSEIF 2063Q ELSE 2054Q THEN 2040Q PRETTYEQUIVLST 2013Q PPDSP 2010Q SPACESIZE 2005Q \DISPLAYDATA 2000Q PPDSP 1744Q CLISPTYPE 1732Q CLISPWORD 1706Q COMMENTFLG 1665Q COMMENTFLG 1635Q > 1611Q PPDSP 1557Q SPACESIZE 1547Q PPDSP 1534Q PPDSP 1531Q SPACESIZE 1526Q \DISPLAYDATA 1521Q PPDSP 1441Q PPDSP 1436Q SPACESIZE 1433Q \DISPLAYDATA 1426Q PPDSP 1417Q SPACESIZE 1405Q NLAMBDA 1377Q LAMBDA 1357Q FUNCTION 1345Q RESETVAR 1337Q SETQ 1322Q SELECTQ 1305Q RESETVARS 1277Q PROG 1254Q PPDSP 1240Q COND 1225Q PRETTYEQUIVLST 1165Q > 1156Q CLISPCHARS 1141Q FUNNYATOMLST 1122Q EXPR 1046Q FORWORD 1040Q IFWORD 1013Q UNARYOP 1003Q < 771Q CLISPCHARS 751Q FUNNYATOMLST 704Q create 670Q CREATE 660Q _ 645Q > 621Q SPACESIZE 612Q PPDSP 600Q PPDSP 566Q PPDSP 546Q PPDSP 543Q SPACESIZE 540Q \DISPLAYDATA 533Q PPDSP 402Q CLISPWORD 267Q CLISPFONT 262Q CLISPCHARS 251Q CLISPTYPE 243Q SYSTEMFONT 231Q USERFONT 222Q FONTFNS 176Q USERFONT 171Q FONTWORDS 163Q CLISPFONT 134Q QUOTE 104Q CLISPWORD 57Q PPDSP 17Q CLISPWORD 6 PPDSP) (1251Q "CO") \DSPRETTY/SUBPRINT1 D1 (L (2 END 1 X 0 LST)) =@!HYddBlIgZAIJAgIdgINIL (64Q _ 53Q RECORDWORD 32Q CLISPWORD) NIL \DSPRETTY/SUBPRINT2 D1 (L (1 END 0 LST)) Q@dAEdAdl; jkZH"I@J dgkgmjعJkذIj@d@b(46Q NTHCHAR 25Q NCHARS) (62Q > 52Q <) NIL \DSPRETTY/PRINTPROG D1 (L (1 BRFLG) P 1 LEFT I 0 TAIL F 3 CLISPFLG) `(o` `(``(I@@dbhA @dH @@d h@JhZI`(I H`(H S o@ Z`(IJ@ @@ @b(245Q SUPERPRINT 235Q NCHARS 210Q STRPOS 173Q NEWLINE 152Q NEWLINE 116Q DOT 104Q \DSPRETTY/ENDLINE 72Q SUPERPRINT 20Q STRINGWIDTH) (223Q \DISPLAYDATA 216Q PPDSP 160Q PPDSP 137Q PPDSP 47Q \DISPLAYDATA 42Q PPDSP 33Q SPACESIZE 24Q PPDSP 15Q PPDSP 2 PPDSP) (203Q "_" 12Q "ROG") \DSPRETTY/PRINTSQ D1 (L (1 BRFLG) P 4 LEFT P 3 FORMFLG P 1 LEFT I 0 TAIL F 5 LEFT) U`(l!`(``(`(YdHlغ@@ @bhH @d q@dcg @@ @dBI`(``(@J`(L `(\@ @g @ |@@A r(310Q SUPERPRINT 276Q PRIN2S 267Q SHUTS 257Q \DSPRETTY/SUBPRINT 237Q NEWLINE 152Q SUPERPRINT 136Q OPENS 116Q DOT 106Q NEWLINE 72Q SUPERPRINT) (264Q %) 243Q PPDSP 225Q PPDSP 204Q PPDSP 201Q SPACESIZE 176Q \DISPLAYDATA 171Q PPDSP 133Q %( 47Q PPDSP 34Q PPDSP 31Q SPACESIZE 26Q \DISPLAYDATA 21Q PPDSP 3 PPDSP) NIL \DSPRETTY/BACKARROWP D1 (L (0 X)) g@ @m)l_h(6 STRPOS) (2 _) NIL \DSPRETTY/ENDLINE D1 (L (0 N) F 0 TAIL F 1 FORMFLG F 2 LEFT) &QP` PP Pc@R @(42Q NEWLINE 24Q SUPERPRINT 15Q SUPERPRINTEQ) (12Q COMMENTFLG) NIL \DSPRETTY/RPARS D1 (L (1 NP 0 E)) 3Ajh@hdgdgig@ Akbb(45Q LAST) (36Q DEFINEQ 27Q NLAMBDA 21Q LAMBDA) NIL \DSPRETTY/DSFITP D1 (L (3 LSTCOL 0 X) P 1 CAREFUL I 2 ENDTAIL I 1 TAILFLG F 2 LASTPOS) 8CR``(``AH`l`@H @H (65Q \DSPRETTY/DSFIT2 57Q \DSPRETTY/DSFIT1) (46Q SPACESIZE 40Q AVERAGEVARLENGTH 25Q SPACESIZE 22Q #CAREFULCOLUMNS 11Q PPDSP 6 SPACESIZE) NIL \DSPRETTY/DSFIT1 D1 (L (2 N1 1 N 0 LST) F 3 TAILFLG F 4 ENDTAIL F 5 CAREFUL) R@ShAHZJdTi(I4IUIJ`i ```ٹjIhJBA IAJ(106Q \DSPRETTY/DSFIT2 50Q STRINGWIDTH) (63Q SPACESIZE 57Q SPACESIZE 54Q AVERAGEVARLENGTH 44Q PPDSP) NIL \DSPRETTY/DSFIT2 D1 (L (2 NC 1 N 0 X) F 0 CAREFUL) @d` i)Ao` bj@A @h@A Ao` PA@`i ``bh@ddgjVdgo` Cdgdgo` *go` ``؎ABb`k`A`lb@A@g dgdgAB`فh (365Q \DSPRETTY/DSFIT1 332Q SUPERPRINTGETPROP 252Q STRINGWIDTH 230Q STRINGWIDTH 177Q STRINGWIDTH 116Q STRINGWIDTH 101Q STRINGWIDTH 65Q \DSPRETTY/DSFIT1 47Q \DSPRETTY/DSFIT2 32Q STRINGWIDTH 10Q SUPERPRINTEQ) (355Q SPACESIZE 345Q FORWORD 337Q IFWORD 327Q CLISPWORD 306Q SPACESIZE 301Q SPACESIZE 274Q AVERAGEFNLENGTH 260Q SPACESIZE 255Q AVERAGEVARLENGTH 247Q PPDSP 235Q SETQ 225Q PPDSP 213Q NLAMBDA 205Q LAMBDA 174Q PPDSP 162Q FUNCTION 150Q COND 125Q SPACESIZE 122Q AVERAGEFNLENGTH 112Q PPDSP 76Q PPDSP 27Q PPDSP 5 COMMENTFLG) (244Q "(SETQ " 222Q "(LAMBDA ABC" 171Q "(FUNCTION LAMBDA ABC)" 73Q "()" 24Q "()") \DSPRETTY/SUPERPRINT/CHANGESA0109 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 E F 1 TAIL F 2 BRFLG) h` PQR c hh(26Q SETFONT 20Q SUPERPRINT 12Q SETFONT) (7 CHANGEFONT 3 CHANGESARRAY) NIL \DSPRETTY/SUPERPRINT/CHANGES D1 (P 1 CHANGEFLG0 P 0 CHANGEFLG I 2 BRFLG I 1 TAIL I 0 E F 4 RESETVARSLST F 5 CHANGEFLG F 6 FILEFLG) RU1`HV`iYg`TcZog JKdTJcT TkK J@(116Q ERROR! 106Q NLEFT 77Q TAILP 51Q \DSPRETTY/SUPERPRINT/CHANGESA0109) (57Q CHANGESARRAY 46Q INTERNAL 30Q CHANGESARRAY 25Q CHANGESARRAY 16Q DISPLAYTERMFLG 6 CHANGECHAR) (43Q (DUMMY.FOR.ERRORSET)) \DSPRETTY/SUPERPRINT/TRAN D1 (L (0 E) F 0 PRETTYTRANFLG F 1 CLISPTRANFLG) jQ `.P+@d`$dl 1@P@i@@@dg @g Pi@`Q@`@ (145Q COPYCONS 117Q SUPERPRINTEQ 103Q SUPERPRINTEQ 36Q FGETD) (140Q CLISPARRAY 131Q CLISPARRAY 114Q NLAMBDA 100Q LAMBDA 17Q CLISPARRAY 5 CLISPARRAY) NIL \DSPRETTY/SUPERPRINT/COMMENT D1 (L (0 L) F 3 LASTPOS F 4 FIRSTCOL F 5 COMMENTCOL F 6 TAIL) `@0@` h `@ Z*UTTddlDSPRINTDEF which provides one definition for the abstract fns such as WIDTH, ADJPOS, etc used here.) (FNS NEWPRINTDEF SUPERPRINT SUPERPRINT0 SUBPRINT SUBPRINT1 SUBPRINT2 PRINTPROG PRINTSQ BACKARROWP ENDLINE RPARS DSFITP DSFIT1 DSFIT2) (FNS SUPERPRINT/CHANGES SUPERPRINT/TRAN SUPERPRINT/COMMENT SUPERPRINT/COMMENT2) (P (MOVD? (QUOTE PRINTDEF) (QUOTE OLDPRINTDEF))) (DECLARE: EVAL@COMPILE DONTCOPY (GLOBALVARS **COMMENT**FLG CLISPARRAY CHANGESARRAY DISPLAYTERMFLG CHANGECHAR AVERAGEFNLENGTH #CAREFULCOLUMNS AVERAGEVARLENGTH #RPARS FONTWORDS FONTFNS DEFAULTFONT BOLDFONT USERFONT SYSTEMFONT CLISPFONT CHANGEFONT BIGFONT CLISPCHARS FUNNYATOMLST PRETTYPRINTMACROS PRETTYEQUIVLST SPACESIZE COMMENTFLG) (BLOCKS (DSPRETTY NEWPRINTDEF SUPERPRINT SUPERPRINT0 SUBPRINT SUBPRINT1 SUBPRINT2 PRINTPROG PRINTSQ BACKARROWP ENDLINE RPARS DSFITP DSFIT1 DSFIT2 SUPERPRINT/CHANGES SUPERPRINT/TRAN SUPERPRINT/COMMENT SUPERPRINT/COMMENT2 (ENTRIES NEWPRINTDEF SUPERPRINT) (SPECVARS TAIL LEFT) (LOCALFREEVARS TAILFLG FNSLST FIRSTPOS LASTPOS COMMENTCOL FORMFLG FILEFLG CHANGEFLG CHANGEFLG0))) (DECLARE: EVAL@COMPILEWHEN (NOT (BOUNDP (QUOTE NEWPRINTDEFDEFS))) (FILES (LOADCOMP) DSPRINTDEF))))) (MOVD? (QUOTE PRINTDEF) (QUOTE OLDPRINTDEF)) (PUTPROPS NEWPRINTDEF COPYRIGHT ("Xerox Corporation" 1982 1983)) NIL