#!/bin/csh -f
# This is a program to use when preparing a release, especially for
# SYSV. 
rm -f /tmp/gfiles /tmp/gviolate
find . -print | tr '\
' ' '> /tmp/gfiles
touch /tmp/gviolate
foreach d (`cat /tmp/gfiles`)
	if ( `basename $d | wc -c` > 13 ) then
		echo $d >> /tmp/gviolate
	endif
end
echo Violating file names are in /tmp/gviolate