Cleaned up more typos and fixed paging issues.

[retro-software/dec/tops10/v4.5.git] / src / dlsint.mac

diff --git a/src/dlsint.mac b/src/dlsint.mac
index 9699578..7d9de3a 100644 (file)
--- a/src/dlsint.mac
+++ b/src/dlsint.mac
@@ -20,9 +20,12 @@ IFN FTTTYSER,<XP FULTWX,4>
 \r
 ;BYTE POINTERS\r
 \r
+\r
 EXTERNAL PLASTC\r
 \r
 \r
+\r
+\r
 DLS=240                        ;DC10 DEVICE NUMBER\r
 ;BITS IN CHREC TO COMMUNCATE WITH DLS\r
 \r
@@ -59,8 +62,7 @@ SCNINT:       CONSO   DLS,30          ;ANY INTERRUPTS ON DLS
        JRST    RECINT          ;YES, RECEIVER INT. HANDLER\r
        DATAO   DLS,[EXP TDSABL]        ;CLEAR HARDWARE FLAG\r
        JRST    XMTINT          ;GO PROCESS CHAR IN SCNSRF OR SCNSRH\r
-\f\r
-;COMMON PARTS OF CTY AND SCANNER INTERRUPT SERVICE ROUTINES.\r
+\f;COMMON PARTS OF CTY AND SCANNER INTERRUPT SERVICE ROUTINES.\r
 \r
 EXTERNAL INJEST,DDBSRC\r
 INTERNAL TCOMM\r
@@ -82,9 +84,7 @@ TCOMM:
 SCNIN2:        DATAO   DLS,[EXP TDSABL]                ;SET TRANSMIT DISABLE BIT AND OUTPUT IT\r
                                ;(JUST INCASE, ELSE IT WILL INTERRUPT IMMEDIATLY AGAIN)\r
        POPJ    PDP,            ;DISMISS INTERRUPT\r
-\f\r
-\r
-;COMMON TO RECEIVE AND TRANSMIT.\r
+\f;COMMON TO RECEIVE AND TRANSMIT.\r
 \r
 INUSE: HRRZS  DDB      ;LINE DISABLED IF RH TTYTAB=-1\r
        CAIN DDB,-1\r
@@ -116,5 +116,4 @@ DLSTYP:     HRL     CHREC,LINE      ;SET UP LINE NUMBER IN CHREC
        POPJ PDP,\r
 \r
        LIT\r
-\r
 DLSEND:        END\r