#!/bin/csh	-f

# This C-shell script turns files with procedure names "Aedxxx"
# into files with names "Grxxx".  This is needed for other modules
# to lint against (the names "Grxxx" are actually macros).

# rcsid = $Header: /ufs/repository/magic/scripts/makeforlint,v 1.1 2000/10/20 18:42:12 tim Exp $

foreach i ($argv)
	set new=`echo $i | sed s/grAed/grLint/`
	rm -f $new
	sed "s/^Aed/Gr/g" < $i > $new
end