cleaned up typos

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

diff --git a/src/scnsrf.mac b/src/scnsrf.mac
index 76fda9d..fc3ef80 100644 (file)
--- a/src/scnsrf.mac
+++ b/src/scnsrf.mac
@@ -1008,7 +1008,7 @@ GETLIN:   SKIPGE  TAC,@UUO                ;DOES USER WANT ONE LINE CHAR. WD.?
        JUMPE   TAC,GETLN1              ;IF NONE, NO LINES.\r
        SKIPLE  TISYNC(DEVDAT)          ;ANY TYPE-IN?\r
        TLO     LINE,LINRDY             ;YES. FLAG.\r
-GETLN1:        MOVE    LINE,@UUO               ;GIVE IT TO USER\r
+GETLN1:        MOVEM   LINE,@UUO               ;GIVE IT TO USER\r
        POPJ    PDP,\r
 \r
 ;ROUTINE TO SET LINE CHARACTERISTICS THAT ARE SETABLE\r
@@ -1283,7 +1283,7 @@ TTYKIL:   MOVSI   IOS,TTYIOW+IOW+TTYDTC+SYNC+DDTM+USRB
        TLZ     LINE,LGLSET     ;INITIALIZE OTHER MODES\r
        HLLM    LINE,LINTAB(LINE)\r
        SETZB TAC,DEVLOG(DEVDAT)        ;CLEAR LOGICAL NAME\r
-       MOVE TAC,[XWD TTYUSR+TTYATC,ASSCON+ASSPRG]\r
+       MOVE TAC,[XWD TTYUSE+TTYATC,ASSCON+ASSPRG]\r
        ANDCAM TAC,DEVMOD(DEVDAT)       ;CLEAR ATTACH,USE, AND ASSIGN BITS\r
 TTYKL1:        LDB LINE,PUNIT                  ;LINE NO.\r
        SETZM TTYTAB(LINE)              ;CLEAR TRANSLATOR TABLE\r
@@ -1957,7 +1957,7 @@ TYP:
 TYPL:  TLNE    LINE,PTYLIN\r
        POPJ PDP,               ;YES\r
        PUSHJ   PDP,PEVEN8      ;GENERATE CORRECT PARITY\r
-       TLNE LINE,CTYLIN        ;NO,CONSOLE TTY?\r
+       TLNN LINE,CTYLIN        ;NO,CONSOLE TTY?\r
        JRST    SCNTYP                  ;TYPE CHAR.\r
 CTYP:  DATAO TTY,CHREC\r
        DPB     CHREC,PLASTC\r
@@ -2014,7 +2014,7 @@ DDBSRC:   HRRZ    TAC,LINE                ;NUMBER OF LINE ONLY
        POPJ PDP,               ;YES.\r
        MOVSI IOS,MLTTYL        ;NO. OF TTY DDBS\r
        MOVEI DEVDAT,TTYLST     ;ADDRESS OF FIRST TTY DDB\r
-       SKIPA   TAC,[XWD TTYUSE+TTYATC,ASSPRG+ASSCON]\r
+       SKIPA   TAC,[XWD TTYUSE+TTYATC,ASSCON+ASSPRG]\r
        HLRZ DEVDAT,DEVSER(DEVDAT)      ;CHAIN THRU DDBS\r
        TDNE TAC,DEVMOD(DEVDAT) ;USE,ATTACH OR ASSIGN BITS ON?\r
        AOBJN IOS,.-2           ;YES. DONE?\r