projects
/
pdp10-muddle.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Prevent MIDAS from splitting two-word directives across blocks.
[pdp10-muddle.git]
/
<mdl.int>
/
stink.2
diff --git
a/<mdl.int>/stink.2
b/<mdl.int>/stink.2
index 7bdce956647516f44c48f8797c0b880d02a0db1f..c39c6386ef62e6e3c5e718bc693dee1cfed3a883 100644
(file)
--- a/
<mdl.int>/stink.2
+++ b/
<mdl.int>/stink.2
@@
-527,7
+527,9
@@
LOCGLO: JUMPGE T,LG2 ;JUMP FOR NORMAL LOCAL TO GLOBAL RECOVERY
;HERE TO EXPUNGE OR RENAME LOCAL IN LOADER TABLE
;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
HRRZM D,T2 ;TABLE ENTRY TO DELETE
PUSHJ P,RPB ;SOAK UP ANOTHER WORD
JUMPGE T,LG1 ;JUMP TO RENAME LOCAL