projects
/
pdp10-muddle.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
MDL 105 and 106 executables.
[pdp10-muddle.git]
/
<mdl.comp>
/
pcomp.pure.3
1
PGLUE!-
2
<SET PURE!- <SET SILENT!- <SET GLUE T>>>
3
<FLOAD "CMP:PCOMP.LOAD">
4
<CONNECT-DIR "PS:<CLR>">
5
<FLOAD "<CLR>CLEAN.MUD">
6
<USE "CLEAN" "PURITY">
7
<CLEANUP>
8
<CONNECT-DIR "SRC:<MDL.COMP>">
9
<PROG ((FOO ,PURELST) (OUTCHAN <OPEN "PRINT" "FOO.OUT">))
10
<GROUP-PURIFY FOO>
11
<UNASSIGN <REMOVE FOO>>
12
<FLUSH-CLEANUP>
13
<KILL:PURITY>>