|
|
1.1 root 1: $ SRC:= ex,ex_addr,ex_cmds,ex_cmds2,ex_cmdsub,-
2: ex_data,ex_extern,ex_get,ex_io,ex_put,ex_re,-
3: ex_set,ex_subr,ex_tagio,ex_temp,ex_tty,ex_unix,-
4: ex_v,ex_vadj,ex_vget,ex_vmain,ex_voper,-
5: ex_vops,ex_vops2,ex_vops3,ex_vput,ex_vwind,-
6: printf,termlib,tgoto,tputs,vms
7: $ DEF:= (UCVISUAL,VMUNIX,TABS=8,VFORK,LISPCODE,CHDIR,UNIX_SBRK)
8: $
9: $ if ("''p1'" .nes. "ALL") then goto else
10: $ source := 'SRC'
11: $ set noon
12: $ goto endif
13: $
14: $ else:
15: $ if ("''p1'" .eqs. "LINK") then goto dolink
16: $ source := "''p1'"
17: $
18: $ endif:
19: $ on warning then exit
20: $ cc/def='DEF' 'source'
21: $
22: $ dolink:
23: $ link 'SRC',ex/option
24: $
25: $ set on
26: $ exit
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.