2 ;<BLOAT 100000 0 0 2000 50>
4 <DEFINE PFLOAD (S "AUX" ER) <PRINC .S> <PRINC " ">
5 <COND (<MEMQ !\. .S> <FLOAD .S>)
6 (<SET ER <GROUP-LOAD .S>>) (ELSE <ERROR .ER>)> >
8 <SETG NCT-SAVE ,NEW-CHANNEL-TYPE>
11 <PFLOAD "FILE-INDEX.MSUBR">
13 <PFLOAD "OPDEFVAX.MSUBR">
18 <PFLOAD "MIMAC.MSUBR">
19 <PFLOAD "MIMGEN.MSUBR">
21 <PFLOAD "MIMMISC.MSUBR">
22 <PFLOAD "TOPLEV.MSUBR">
23 <PFLOAD "ASSEM.MSUBR">
24 <PFLOAD "INTERFACE.MSUBR">
25 <PFLOAD "CHMKS.MSUBR">
26 <PFLOAD "LOOKAHEAD.MSUBR">
42 <SETG AC-STORE-OPT <>>
44 <SETG NCT-NEW ,NEW-CHANNEL-TYPE>
45 <SETG NEW-CHANNEL-TYPE ,NCT-SAVE>
47 <FLOAD "/USR/MIMC/NBOOT.COMPIL">
48 <LINK '<ERRET T> "
\ 5" <ROOT>>
50 <FEATURES "COMPILER" ("SUBSYSTEM" "MIMOC") ("TARGET-MACHINE" "VAX")>