Rewrite XMOVEI to SETMI.

[pdp10-muddle.git] / <mdl.int> / atomhk.151

diff --git a/<mdl.int>/atomhk.151 b/<mdl.int>/atomhk.151
index 069ad4a258721f146fbcaaa5d456721d2f2c1195..5abb428e3a021f3e7d5305b8ab359225e7628a71 100644 (file)
--- a/<mdl.int>/atomhk.151
+++ b/<mdl.int>/atomhk.151
@@ -1098,7 +1098,8 @@ IMPUR0:   MOVE    C,(TP)          ; GET ATOM
        HLRE    A,C             ; GET LNTH IN WORDS OF PNAME
        MOVNS   A
 ;      PUSH    P,[SETZ IMPUR2] ; FAKE OUT ILOOKC
-       XMOVEI  0,IMPUR2
+;The below is really:  XMOVEI  0,IMPUR2
+       SETMI   0,IMPUR2
        PUSH    P,0
        PUSH    P,(C)           ; PUSH UP THE PNAME
        AOBJN   C,.-1