#! /bin/csh -f
#	delete trailing comment (! ...)

if ( $#argv != 1 ) then
  echo "Usage: dtrc filename"
  exit 1
endif

set orgfile = $argv[1]
sed 's/\!.*$//' $orgfile | sed 's/ *$//' > $orgfile.tmp
mv $orgfile $orgfile~
mv $orgfile.tmp $orgfile
