(FILECREATED " 1-Sep-87 11:52:01" ("compiled on " {ERINYES}KOTO>PATCH-TWOSIDED.;1) "12-Nov-85 14:59:23" tcompl'd in "INTERLISP-D 20-Jul-87 ..." dated "20-Jul-87 18:39:29") (FILECREATED " 1-Sep-87 11:23:23" {ERINYES}KOTO>PATCH-TWOSIDED.;1 6479 previous date: "15-Oct-86 12:20:47" {QV}LISP>PATCH-TWOSIDED.;1) \NSPRINT.INTERNAL D1 (P 15Q LASTSTATUS P 12Q STATUS P 11Q PRINTOPTIONS P 10Q VALUE P 7 COURIERSTREAM P 6 ATTRIBUTES P 5 PROPERTIES P 4 DOCNAME P 3 SENDER.NAME P 2 TWO.SIDED? P 1 STAPLE? P 0 MEDIUM I 2 TRANSFERFN I 1 OPTIONS I 0 PRINTER F 16Q RESETVARSLST F 17Q EMPRESS#SIDES) $Ag'`Ag'Ag'WlAg'ddi Ag'o gLhgAg'hgKhhgAg'kjhh_Ag'_gOO hO_Ag'_,gOdgdgdgdg hO_Ag'_gOO hO_Ag'_0@ _mjd` o` @` n d=Od5d0_'jO!O_jOgOhO_O gOhhhWcj Oggg _gTOOD` o` @` o` Olm ` o` nu0 gO_dOdgIHIJOggg ]gnM_o@oLo O O g(` o` @` o` oO O_n HIQgM4gihO_hY6gM@ _gOhO_hjd` o` J,gMoO_hZjd` o` OggBNOg _gO(1424Q COURIER.CALL 1400Q PRIN1 1365Q TAB 1323Q PRIN1 1310Q TAB 1252Q \NSPRINT.MEDIUM.CHECK 1173Q DISMISS 1157Q ERROR 1145Q PRIN1 1132Q PRIN1 1121Q PRIN1 1106Q TERPRI 1066Q CLOSEF 1060Q ERROR 1052Q CONCAT 1013Q COURIER.CALL 727Q DISMISS 720Q PRIN1 705Q PRIN1 677Q SUBSTRING 664Q PRIN1 651Q PRIN1 640Q PRIN1 625Q TERPRI 577Q COURIER.CALL 530Q \ILLEGAL.ARG 423Q DISMISS 414Q PRIN1 403Q PRIN1 370Q TAB 354Q \NSPRINT.COURIER.OPEN 326Q MKSTRING 266Q \ILLEGAL.ARG 203Q MKSTRING 110Q IDATE 46Q USERNAME) (1432Q ERROR 1420Q RETURNERRORS 1411Q PRINT 1406Q PRINTING 1375Q PROMPTWINDOW 1362Q PROMPTWINDOW 1332Q TWO.SIDED 1320Q PROMPTWINDOW 1305Q PROMPTWINDOW 1261Q MEDIUM.HINT 1242Q MEDIA 1221Q STAPLE 1210Q STAPLE 1142Q PROMPTWINDOW 1127Q PROMPTWINDOW 1116Q PROMPTWINDOW 1103Q PROMPTWINDOW 1075Q Busy 1020Q ERROR 1010Q RETURNERRORS 1005Q GET.PRINTER.PROPERTIES 1002Q PRINTING 760Q Available 735Q SPOOLER 715Q PROMPTWINDOW 702Q PROMPTWINDOW 661Q PROMPTWINDOW 646Q PROMPTWINDOW 635Q PROMPTWINDOW 622Q PROMPTWINDOW 605Q ERROR 574Q RETURNERRORS 571Q GET.PRINTER.STATUS 566Q PRINTING 536Q \SPP.RESETCLOSE 506Q PAGES.TO.PRINT 411Q PROMPTWINDOW 400Q PROMPTWINDOW 365Q PROMPTWINDOW 343Q PAGES.TO.PRINT 313Q MESSAGE 303Q MESSAGE 261Q HIGH 253Q NORMAL 245Q LOW 236Q HOLD 230Q PRIORITY.HINT 220Q PRIORITY 170Q RECIPIENT.NAME 160Q RECIPIENT.NAME 136Q #COPIES 132Q COPY.COUNT 116Q SENDER.NAME 102Q DOCUMENT.CREATION.DATE 76Q PRINT.OBJECT.CREATE.DATE 67Q PRINT.OBJECT.NAME 52Q DOCUMENT.NAME 36Q SENDER.NAME 22Q #SIDES 15Q STAPLE? 11Q NSPRINT.DEFAULT.MEDIUM 3 MEDIUM) ( 1372Q "Printer does not support two-sided copies" 1343Q (TWO.SIDED T) 1315Q "[Printer does not support stapled copies]" 1152Q "Printer spooler" 1137Q " Status: Spooler busy; will retry]" 1113Q "[From " 1046Q " RETURN to try again." 1041Q " attempting to print " 1033Q "Unexpected error from " 712Q "; will retry]" 656Q " Error: " 632Q "[From " 375Q "No response from printer " 61Q "Document") (PRETTYCOMPRINT PATCH-TWOSIDEDCOMS) (RPAQQ PATCH-TWOSIDEDCOMS ((FNS \NSPRINT.INTERNAL) (DECLARE: EVAL@COMPILE DONTEVAL@LOAD DONTCOPY ( FILES (LOADCOMP) NSPRINT)))) (PUTPROPS PATCH-TWOSIDED COPYRIGHT ("Xerox Corporation" 1986 1987)) NIL