1 2b85f70d 2005-01-11 devnull #!/usr/local/plan9/bin/rc
 2 3ff9213b 2005-01-04 devnull 
 3 9bbe4594 2005-01-14 devnull . 9.rc
 4 3ff9213b 2005-01-04 devnull spellflags=()
 5 3ff9213b 2005-01-04 devnull deroffargs=()
 6 3ff9213b 2005-01-04 devnull fflag=''
 7 3ff9213b 2005-01-04 devnull for(x){
 8 3ff9213b 2005-01-04 devnull 	switch($x){
 9 3ff9213b 2005-01-04 devnull 	case -[abcvx]
10 3ff9213b 2005-01-04 devnull 		spellflags=($spellflags $x)
11 3ff9213b 2005-01-04 devnull 	case -f
12 3ff9213b 2005-01-04 devnull 		fflag=$x
13 3ff9213b 2005-01-04 devnull 	case *
14 3ff9213b 2005-01-04 devnull 		if(~ $fflag -f)	{
15 3ff9213b 2005-01-04 devnull 			spellflags=($spellflags -f $x)
16 3ff9213b 2005-01-04 devnull 			fflag=''
17 3ff9213b 2005-01-04 devnull 		}
18 3ff9213b 2005-01-04 devnull 		if not		deroffargs=($deroffargs $x)
19 3ff9213b 2005-01-04 devnull 	}
20 3ff9213b 2005-01-04 devnull }
21 3ff9213b 2005-01-04 devnull 
22 3ff9213b 2005-01-04 devnull deroff -w $deroffargs | sort -u | sprog $spellflags