: sccsdiff 1.2
trap "rm -f /tmp/get$$ >/dev/null; exit 1" 2

: DESCRIPTION:
: 	Run bdiff on two versions of a set of SCCS files
: 	$1 and $2 are two (old/new) SCCS get specifiers (-r... or -c...)
: 	if $3 begins with a "-" it is taken to be an argument for pr (e.g. -l84)
: 	$3 $4 ... are SCCS files which are gotten.

if test $# -lt 3
then
	echo "Usage: sccsdiff -r<old> -r<new> [pr flags] sccsfile ..."
	exit 1
fi
a=$1
shift
b=$1
shift

case $1 in
-*)	c=$1; shift ;;
*)	c='' ;;
esac

for f
do
	get -s -p -k $a $f >/tmp/get$$
	if test $? -eq 0
	then
		get -s -p -k $b $f |
			bdiff /tmp/get$$ - |
				pr $c -h "$f: $a vs. $b"
	fi
done
rm /tmp/get$$
