Prevent MIDAS from splitting two-word directives across blocks.
[pdp10-muddle.git] / <mdl.int> / stink.2
index 7bdce956647516f44c48f8797c0b880d02a0db1f..c39c6386ef62e6e3c5e718bc693dee1cfed3a883 100644 (file)
@@ -527,7 +527,9 @@ LOCGLO:     JUMPGE T,LG2    ;JUMP FOR NORMAL LOCAL TO GLOBAL RECOVERY
 
 ;HERE TO EXPUNGE OR RENAME LOCAL IN LOADER TABLE
 
-       JUMPGE D,[JRST 4,.]     ;NO SYMBOL THERE
+       JUMPGE D,[(5000+SIXBIT /ENS/)
+                 PUSHJ P,RPB   ;Expunge for nonexistant symbol - ignore
+                 JRST DATABK]
        HRRZM D,T2              ;TABLE ENTRY TO DELETE
        PUSHJ P,RPB             ;SOAK UP ANOTHER WORD
        JUMPGE T,LG1            ;JUMP TO RENAME LOCAL