#!/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