Subversion Repositories planix.SVN

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
#!/bin/rc
2 
 
3 
spellflags=()
4 
deroffargs=()
5 
fflag=''
6 
for(x){
7 
	switch($x){
8 
	case -[abcvx]
9 
		spellflags=($spellflags $x)
10 
	case -f
11 
		fflag=$x
12 
	case *
13 
		if(~ $fflag -f)	{
14 
			spellflags=($spellflags -f $x)
15 
			fflag=''
16 
		}
17 
		if not		deroffargs=($deroffargs $x)
18 
	}
19 
}
20 
 
21 
deroff -w $deroffargs | sort -u | aux/sprog $spellflags