\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
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
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
\r
\r
\r
-
\ No newline at end of file
+ \r
+\0\0\0\0
\ No newline at end of file