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:
1896858
)
%PURMD isn't defined for ITS (it is for Tenex).
author
Adam Sampson
<ats@offog.org>
Fri, 20 Apr 2018 15:45:37 +0000
(16:45 +0100)
committer
Adam Sampson
<ats@offog.org>
Fri, 20 Apr 2018 15:51:22 +0000
(16:51 +0100)
<mdl.int>/agc.141
patch
|
blob
|
history
diff --git
a/<mdl.int>/agc.141
b/<mdl.int>/agc.141
index a0f2684fcc2aa91ac650b7700ff2e2e41228b995..e0d8cdfea5b78730b69699397381803fe94998c9 100644
(file)
--- a/
<mdl.int>/agc.141
+++ b/
<mdl.int>/agc.141
@@
-489,7
+489,7
@@
PURCLS: MOVE P,[-2000,,MRKPDL]
MOVE A,INF3 ; GET PTR TO PURIFIED STRUCTURE
SKIPN NPRFLG
PUSHJ P,%PURIF ; PURIFY
MOVE A,INF3 ; GET PTR TO PURIFIED STRUCTURE
SKIPN NPRFLG
PUSHJ P,%PURIF ; PURIFY
- PUSHJ P,%PURMD
+
IFE ITS,
PUSHJ P,%PURMD
SETZM GPURFL
JRST EPURIF ; FINISH UP
SETZM GPURFL
JRST EPURIF ; FINISH UP