##########################################################################
# Shellscript:	check - remove unneccessary files
# Version    :	0.1 (beta)
# Project    :	
# Author     :	Heiner Steven (stv)
# Written    :	09/28/93
# SCCS-Id.   :	@(#) check	1.1 04/02/18
##########################################################################
# Description
#
##########################################################################

PN=`basename $0`			# program name
VER='0.1 (beta)'

Usage () {
    echo "$PN - remove unneccessary files, $VER (stv '94)"
    exit 1
}

Msg () {
    for i
    do echo "$PN: $i" >&2
    done
}

FilesToRemove="core dead.letter '*~' '*.v' tmp gnuelpf '\#*\#' '*.swp'"

# build "find" command line
Names=
for i in $FilesToRemove
do
    [ -n "$Names" ] && Names="$Names -o "
    Names="${Names}-name $i"
done
Names="\( $Names \)"

eval find . -type f $Names -print | xargs rm 
