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