Fixed typos.
[retro-software/dec/tops10/v4.5.git] / src / lptser.mac
index 05dade0..f5c3273 100644 (file)
@@ -16,7 +16,7 @@ SUBTTL        T. W. MCMANUS /TNM   TS   20 MAY 69
 \r
 ;THE FOLLOWING EXTERNAL SYMBOLS ARE DEFINED IN UUCON:\r
 \r
-       EXTERNAL ADVBFE, IDSET, OUT, SETACT, STOIOS\r
+       EXTERNAL ADVBFE, IOSET, OUT, SETACT, STOIOS\r
 \r
 ;THE FOLLOWING SYMBOLS ARE REFERENCED OUTSIDE OF LPTSER:\r
 \r
@@ -168,7 +168,7 @@ LPTWCK:     TLZE IOS,IOW                    ;IS JOB WAITING FOR I/O COMPLETION?
 LPTEX2:        JRST STOIOS                     ;SAVE IOS, RESET HUNG DEVICE COUNT\r
                                        ; AND DISMISS INTERRUPT\r
 \r
-LTPOFF:        TLNN IOS,LPTEND                 ;SKIP IF CLOSE HAS BEEN DONE\r
+LPTOFF:        TLNN IOS,LPTEND                 ;SKIP IF CLOSE HAS BEEN DONE\r
        JRST LPTOF1                     ; GO TURN PRINTER OFF UNTIL NEXT OUTPUT\r
        TLON IOS,LPTSYN                 ;HAS FINAL CRFF BEEN OUTPUT?\r
        JRST LPTBG2                     ; NO, SO GO DO IT\r
@@ -195,13 +195,13 @@ LPTER1:   MOVEM TAC,LPTSV2(DEVDAT)        ;SAVE TAC IN DDB
        XCT LPTDTO(DEVDAT)\r
        JRST LPTER4\r
 \r
-LPTER4:        XCT LPTECH(DEVDAT)              ;SKIP IF ERROR INTERRUPT NOT ASSIGNED\r
+LPTER2:        XCT LPTECH(DEVDAT)              ;SKIP IF ERROR INTERRUPT NOT ASSIGNED\r
        JRST LPTER5                     ; ERROR CONDITION DETECTED\r
        MOVE TAC,LPTCH(DEVDAT)          ;GET INTERRUPT CHANNEL ASSIGNMENTS\r
        ANDI TAC,LPTDCM                 ;MASK OUT ERROR CHANNEL\r
        IORI TAC,LPTBSY                 ;SET THE BUSY FLAG\r
        XCT LPTCNO(DEVDAT)              ;SEND IT OUT TO THE LPT\r
-       MOVEI TAC,LPTRLOV+LPTERR+LPTDON ;ENABLE FOR ALL INTERRUPTS\r
+       MOVEI TAC,LPTLOV+LPTERR+LPTDON  ;ENABLE FOR ALL INTERRUPTS\r
 LPTER3:        HRRM TAC,LPTCON(DEVDAT)         ;SAVE SKIP CHAIN MASK FLAGS\r
 LPTER4:        MOVE TAC,LPTSV2(DEVDAT)         ;RESTORE SAVED ACCUMULATOR\r
        JRST LPTEX1(DEVDAT)             ; AND GO DISMISS INTERRUPT\r
@@ -227,4 +227,5 @@ LPTSET:     MOVEI TAC,@DEVOAD(DEVDAT)       ;GET ABS. ADDR. OF CURRENT BUFFER
 \r
 \r
 \r
-       
\ No newline at end of file
+       \r
+\0\0\0\0
\ No newline at end of file