shithub: plan9front

ref: 8550a2adb53e41368b0ca706a070cf3e554031c6
dir: /rc/bin/spell/

View raw version 
#!/bin/rc

spellflags=()
deroffargs=()
fflag=''
for(x){
	switch($x){
	case -[abcvx]
		spellflags=($spellflags $x)
	case -f
		fflag=$x
	case *
		if(~ $fflag -f)	{
			spellflags=($spellflags -f $x)
			fflag=''
		}
		if not		deroffargs=($deroffargs $x)
	}
}

deroff -w $deroffargs | sort -u | aux/sprog $spellflags