xref: /inferno-os/utils/lib/rcmain (revision 9dc22068e29604f4b484e746112a9a4efe6fd57f) 
1# rcmain: 9pm version
2if(~ $#home 0) home=/
3if(~ $#ifs 0) ifs='
4'
5switch($#prompt){
6case 0
7case 1
8	prompt=('% ' '	')
9}
10if(~ $rcname v.out) prompt=('broken! ' '	')
11if(! ~ $#cflag 0){
12	if(flag l && test -r $home/lib/profile) . $home/lib/profile
13	status=''
14	eval $cflag
15}
16if not if(flag i){
17	if(flag l && test -r $home/lib/profile) . $home/lib/profile
18	status=''
19	if(! ~ $#* 0) . $*
20	if not . -i 'stdin$'
21}
22if not {
23	if(~ $#* 0) . 'stdin$'
24	if not{
25		status=''
26		. $*
27	}
28}
29exit $status
30