diff options
| author | rsc <devnull@localhost> | 2004-03-09 12:45:12 +0000 |
|---|---|---|
| committer | rsc <devnull@localhost> | 2004-03-09 12:45:12 +0000 |
| commit | d49a2e4801752c8a1211c7fac8cc08055a6b6fa5 (patch) | |
| tree | 509d01c729341305f12abc34521276a4ccdb27ce /src/cmd/spell/spell.rc | |
| parent | fb7cc74a929c86ef1c84a971d7a05deaf4d30c85 (diff) | |
| download | plan9port-d49a2e4801752c8a1211c7fac8cc08055a6b6fa5.tar.gz plan9port-d49a2e4801752c8a1211c7fac8cc08055a6b6fa5.zip | |
Various fixes, add spell.
Diffstat (limited to 'src/cmd/spell/spell.rc')
| -rwxr-xr-x | src/cmd/spell/spell.rc | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/src/cmd/spell/spell.rc b/src/cmd/spell/spell.rc new file mode 100755 index 00000000..073ab2df --- /dev/null +++ b/src/cmd/spell/spell.rc @@ -0,0 +1,21 @@ +#!/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 |
