Fixed typos.
[retro-software/dec/tops10/v4.5.git] / src / pltser.mac
index 8af014f..f7b68b1 100644 (file)
@@ -21,7 +21,7 @@ PLTADR: XWD PROG,0
 PLTCTR:        0                       ;OUTPUT BYTE COUNTER\r
 \r
 EXTERNAL OUT,SETACT,PLTCHN,PLTCHL,IOSET,ADVBFE,ADRERR,CPOPJ1\r
-EXTERNAL SETIOD,STOIOS,CLRACT,IULLINP,PLTSAV,IADRCK\r
+EXTERNAL SETIOD,STOIOS,CLRACT,ILLINP,PLTSAV,IADRCK\r
 \r
 INTERN PLTDDB,PLTINT,PLTDSP\r
 \f;DISPATCH TABLE\r
@@ -79,14 +79,14 @@ PLT1:       JSR PLTSAV              ;SAVE AC'S. SET UP PUSH DOWN POINTER
        PUSHJ PDP,PLTSET        ;SETUP BYTE POINTER AND COUNTER\r
         JRST PLTOFF            ;ADDRESS ERROR RET FROM PLTSET\r
 PLT2:  TLZE IOS,IOW\r
-       PUSHJ PDP,SETIUOD       ;LET JOB START AGAIN\r
+       PUSHJ PDP,SETIOD        ;LET JOB START AGAIN\r
        JRST STOIOS             ;EVENTUALLY DISMISS INTERRUPT. IF ADVBFE\r
                                ;FOUND MORE DATA (IT SKIPPED), ANOTHER\r
                                ;INTERRUPT WILL IMMEDIATELY OCCUR BUT\r
                                ;IT WILL BE HANDLED WITHOUT GOING TO PLT1\r
 \r
 PLTOFF:        CONO PLT,0              ;SHUT DOWN PLOTTER\r
-       HLLSZ PLTINT            ;REMOVE PLOTTER FROM CHAIN\r
+       HLLZS PLTINT            ;REMOVE PLOTTER FROM CHAIN\r
        PUSHJ PDP,CLRACT\r
        TLZE IOS,PLTUP          ;HAS THE "CLOSE" BEEN DONE?\r
        DATAO PLT,[40]          ;YES, LIFT PEN\r