Update.

[thirdparty/glibc.git] / printsources

#! /bin/csh -f

#
#	Prints all the files given as arguments.
#	Files that will fit on less than a printed page
#	are concatenated together.  Bigger ones are pr'd.
#


set tocat='' topr=''

foreach file ($*)
	set lines=`wc -l $file | sed "s/$file//"`
	if ($lines > 40) then
		set topr=($topr $file)
	else
		set tocat=($tocat $file)
	endif
end


if ("$topr" != '') pr $topr

if ("$tocat" != '') foreach file ($tocat)
	echo -n "==================== $file ======================"
	cat $file
end

exit 0