projects
/
pdp10-muddle.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
933fb84
)
Fix a couple of bad EXPUNGEs.
author
Adam Sampson
<ats@offog.org>
Mon, 16 Apr 2018 10:51:11 +0000
(11:51 +0100)
committer
Adam Sampson
<ats@offog.org>
Mon, 16 Apr 2018 10:51:11 +0000
(11:51 +0100)
I don't think we can easily get rid of all of these...
<mdl.int>/muddle.347
patch
|
blob
|
history
diff --git
a/<mdl.int>/muddle.347
b/<mdl.int>/muddle.347
index cb732d5704fba6a332e0645147aa6212464dd1ee..a7504a5598518e672d6e6718b867b026df971774 100644
(file)
--- a/
<mdl.int>/muddle.347
+++ b/
<mdl.int>/muddle.347
@@
-460,7
+460,7
@@
TERMIN
]
]
-RMT [EXPUNGE GENERAL,NUMS
TA
+RMT [EXPUNGE GENERAL,NUMS
AT
]
DEFINE XPUNGR A
]
DEFINE XPUNGR A
@@
-578,7
+578,7
@@
TYPMAK SOFFS,[[OFFS,OFFSET]]
IFN MAIN,[RMT [LOC SAVE
]
]
IFN MAIN,[RMT [LOC SAVE
]
]
-IF2,EXPUNGE TYPMAK
,DOTYPS
+IF2,EXPUNGE TYPMAK
\f
RMT [EQUALS XP EXPUNGE
IF2,XP STMPLT
\f
RMT [EQUALS XP EXPUNGE
IF2,XP STMPLT