home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V7 / bin / spell < prev    next >
Encoding:
Text File  |  1979-01-10  |  546 b   |  29 lines

  1. : B flags, D dictionary, F files, H history, S stop, V data for -v
  2. H=${H-/usr/dict/spellhist}
  3. T=/tmp/spell.$$
  4. V=/dev/null
  5. F= B=
  6. trap "rm -f $T*; exit" 0 1 2 13 15
  7. for A in $*
  8. do
  9.     case $A in
  10.     -v)    B="$B -v"
  11.         V=${T}a ;;
  12.     -a)    ;;
  13.     -b)     D=${D-/usr/dict/hlistb}
  14.         B="$B -b" ;;
  15.     *)    F="$F $A"
  16.     esac
  17.     done
  18. deroff -w $F |\
  19.   sort -u |\
  20.   /usr/lib/spell ${S-/usr/dict/hstop} $T |\
  21.   /usr/lib/spell ${D-/usr/dict/hlista} $V $B |\
  22.   sort -u +0f +0 - $T |\
  23.   tee -a $H
  24. who am i >>$H 2>/dev/null
  25. case $V in
  26. /dev/null)    exit
  27. esac
  28. sed '/^\./d' $V | sort -u +1f +0
  29.