|
DataMuseum.dkPresents historical artifacts from the history of: Regnecentalen RC-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Regnecentalen RC-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1848 (0x738) Types: TextFile Notes: UNIX file Names: »spell«
└─⟦270712047⟧ Bits:30004042/spell.imd SW95705I 386/ix Multi-user Release 1.2 └─⟦270712047⟧ UNIX Filesystem └─⟦this⟧ »su/new/usr/bin/spell«
# Copyright (c) 1984 AT&T # All Rights Reserved # THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T # The copyright notice above does not evidence any # actual or intended publication of such source code. #ident "@(#)spell:spell.sh 1.8" # spell program # B_SPELL flags, D_SPELL dictionary, F_SPELL input files, H_SPELL history, S_SPELL stop, V_SPELL data for -v # L_SPELL sed script, I_SPELL -i option to deroff H_SPELL=${H_SPELL-/usr/lib/spell/spellhist} V_SPELL=/dev/null F_SPELL= B_SPELL= L_SPELL="sed -e \"/^[.'].*[.'][ ]*nx[ ]*\/usr\/lib/d\" -e \"/^[.'].*[.'][ ]*so[ ]*\/usr\/lib/d\" -e \"/^[.'][ ]*so[ ]*\/usr\/lib/d\" -e \"/^[.'][ ]*nx[ ]*\/usr\/lib/d\" " trap "rm -f /tmp/spell.$$; exit" 0 1 2 13 15 for A in $* do case $A in -v) if /bin/pdp11 then echo -v option not supported on pdp11 >&2 EXIT_SPELL=exit else B_SPELL="$B_SPELL -v" V_SPELL=/tmp/spell.$$ fi ;; -a) : ;; -b) D_SPELL=${D_SPELL-/usr/lib/spell/hlistb} B_SPELL="$B_SPELL -b" ;; -x) B_SPELL="$B_SPELL -x" ;; -l) L="cat" ;; +*) if [ "$FIRSTPLUS" = "+" ] then echo "multiple + options in spell, all but the last are ignored" >&2 fi; FIRSTPLUS="$FIRSTPLUS"+ if LOCAL=`expr $A : '+\(.*\)' 2>/dev/null`; then if test ! -r $LOCAL; then echo "spell cannot read $LOCAL" >&2; EXIT_SPELL=exit; fi else echo "spell cannot identify local spell file" >&2; EXIT_SPELL=exit; fi ;; -i) I_SPELL="-i" ;; *) F_SPELL="$F_SPELL $A" esac done ${EXIT_SPELL-:} cat $F_SPELL | eval $L_SPELL |\ deroff -w $I_SPELL |\ sort -u +0 |\ /usr/lib/spell/spellprog ${S_SPELL-/usr/lib/spell/hstop} 1 |\ /usr/lib/spell/spellprog ${D_SPELL-/usr/lib/spell/hlista} $V_SPELL $B_SPELL |\ comm -23 - ${LOCAL-/dev/null} |\ tee -a $H_SPELL who am i >>$H_SPELL 2>/dev/null case $V_SPELL in /dev/null) exit esac sed '/^\./d' $V_SPELL | sort -u +1f +0