Cleanup typos.

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

diff --git a/src/dskint.mac b/src/dskint.mac
index cd914c2..841ea1a 100644 (file)
--- a/src/dskint.mac
+++ b/src/dskint.mac
@@ -124,7 +124,7 @@ DSKFDG:     HRRZI   TAC,DSKCHN      ;THIS INSTRUCTION TEMPORARILY ALTERED DURING "ONCE".
        HLRE    TAC1,@RCXIOC    ; CHANNEL CONTROL WORD SHOULD CONTAIN UPON\r
        SUB     TAC,TAC1        ; SUCCESSFUL COMPLETION OF THE DISK OPERATION.\r
        MOVE    TAC1,RCXIOC\r
-       HRLI    TAC,1(TAC)\r
+       HRLI    TAC,1(TAC1)\r
        MOVEM   TAC,RCXFIN\r
        SETZM   RCXCCW          ;ZERO THE LOCATION WHERE THE DISK SYNCRONIZER WILL\r
                                ; STORE THE CHANNEL CONTROL WORD.\r