(FILECREATED " 4-Sep-85 18:40:25" ("compiled on " {ERIS}DIG>CENTRONICS.;8) "16-Aug-85 06:20:26" recompiled changes: CENTRONICS.RESET \CreateCentronicsDevice \CENTRONICS.OPENFILE \CENTRONICS.CLOSEFILE \CENTRONICS.BOUT \CENTRONICS.BUSYWAIT \CENTRONICS.EVENTFN in "INTERLISP-D 16-Aug-85 ..." dated "16-Aug-85 08:01:07") (FILECREATED " 4-Sep-85 18:40:13" {ERIS}DIG>CENTRONICS.;8 5213 changes to: (FNS CENTRONICS.RESET \CENTRONICS.OPENFILE \CreateCentronicsDevice \CENTRONICS.CLOSEFILE \CENTRONICS.EVENTFN \CENTRONICS.BUSYWAIT \CENTRONICS.BOUT) (VARS CENTRONICSCOMS) previous date: "14-Aug-85 16:14:15" {ERIS}DIG>CENTRONICS.;5) CENTRONICS.RESET D1 (I 0 C150STREAM) '@@gnunuk nuh(37Q DISMISS) (20Q CENTRONICS 13Q FDEV 6 STREAM) () CENTRONICS.BUSYWAIT D1 (P 0 C150STATUSLINE) :tn|Xn itn|n`o` ` o h(62Q HELP 53Q TERPRI 44Q PRIN1) (50Q PROMPTWINDOW 41Q PROMPTWINDOW) ( 57Q "Printer error - type (RETURN) to continue" 36Q "Printer error") \CreateCentronicsDevice D1 (P 0 DEVICE) `dgdgdg dgdgdg:dg8dg6dg4dg2dg0dg.dg*dg$dgdggH H(175Q \DEFINEDEVICE) (171Q CENTRONICS 160Q NILL 151Q NILL 142Q \GENERIC.READP 133Q NILL 124Q \IS.NOT.RANDACCESSP 115Q \ILLEGAL.DEVICEOP 106Q \IS.NOT.RANDACCESSP 77Q \ILLEGAL.DEVICEOP 70Q \GENERIC.BINS 61Q \GENERIC.BOUTS 52Q \GENERIC.RENAMEFILE 43Q \CENTRONICS.CLOSEFILE 34Q \CENTRONICS.OPENFILE 25Q \CENTRONICS.BOUT 16Q \CENTRONICS.EVENTFN 7 CENTRONICS 2 FDEVTYPE#) () \CENTRONICS.OPENFILE D1 (P 0 OLDSTREAM I 4 DEVICE I 3 PARAMETERS I 2 RECOG I 1 ACCESS I 0 NAME) AgAgD(Ho@ D`dDdgdg.dg,d`&dg"dg djd`djd`dhdldjRdk@dk0dhY(I(43Q ERROR) (161Q \STREAM.DEFAULT.MAXBUFFERS 145Q FILELINELENGTH 130Q \FILEOUTCHARFN 121Q \EOSERROR 112Q \NOIMAGEOPS 103Q \STREAM.NOT.OPEN 74Q \STREAM.NOT.OPEN 65Q {CENTRONICS} 53Q STREAMTYPE# 50Q FDEV 24Q FDEV 11Q APPEND 3 OUTPUT) ( 37Q "Only one open stream allowed on this device") \CENTRONICS.CLOSEFILE D1 (L (0 STREAM)) @h(hNIL (10Q FDEV 3 STREAM) () \CENTRONICS.BOUT D1 (P 0 C150DATANOSTB I 1 BYTE I 0 STREAM) &tn|n`AnHuHnuHuh(14Q \CENTRONICS.BUSYWAIT) NIL () \CENTRONICS.BUSYWAIT D1 (P 0 C150STATUSLINE) :tn|Xn itn|n`o` ` o h(62Q HELP 53Q TERPRI 44Q PRIN1) (50Q PROMPTWINDOW 41Q PROMPTWINDOW) ( 57Q "Printer error - type (RETURN) to continue" 36Q "Printer error") \CENTRONICS.EVENTFN D1 (I 1 EVENT I 0 DEVICE) AgAgAg(25Q CENTRONICS.RESET) (17Q AFTERMAKESYS 11Q AFTERSYSOUT 3 AFTERLOGOUT) () (PRETTYCOMPRINT CENTRONICSCOMS) (RPAQQ CENTRONICSCOMS ((FNS CENTRONICS.RESET CENTRONICS.BUSYWAIT) (FNS \CreateCentronicsDevice \CENTRONICS.OPENFILE \CENTRONICS.CLOSEFILE \CENTRONICS.BOUT \CENTRONICS.BUSYWAIT \CENTRONICS.EVENTFN) (DECLARE: DONTEVAL@LOAD DOCOPY (P (\CreateCentronicsDevice))))) (\CreateCentronicsDevice) (PUTPROPS CENTRONICS COPYRIGHT ("Xerox Corporation" 1985)) NIL