shithub: riscv

ref: 68aa4d5254c8e68171b19887dc39d8ca5f52d854
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