#!/usr/bin/awk -f
#
# $NetBSD: setrev.awk,v 1.1 1996/01/16 15:15:55 leo Exp $
#
function revcmp(r1, r2,    n1, n2, a1, a2, n, i) {
	n1 = split(r1, a1, "\.")
	n2 = split(r2, a2, "\.")
	n = (n1 < n2) ? n1 : n2

	for (i = 1; i <= n; ++i) {
		if (a1[i] != a2[i])
			return(a1[i] - a2[i])
	}
	if (n1 != n2)
		return(n1 - n2)
	return(0)
}

BEGIN {
	destfile = ARGV[1]
	rev = "0.0"
}

{
	if (revcmp($4, rev) > 0)
		rev = $4
	next file
}

END {
	while ((e = getline <destfile) > 0) {
		if (/"\$Revision.*\$"/)
			sub("\\\$Revision.*\\\$", "Revision " rev)
		print
	}
	if (e)
		exit(1)
	exit(0)
}