#!/bin/sh

for i in * 
do	
	case $i in
	*.[ch])	echo $* $i	# message
		$* $i	;;    # execute "command files_found"
	*lib)
		if( test -d $i) then
			echo cd $i
			cd $i
			rexec $*
			echo cd ..
			cd ..
		fi
		;;
	*) 
	esac
done
# Recursively execute a command on all files of *.[ch] format.
#	existing on the system directories of the form ${TOPDIR}/*lib/*lib ... 
# WARNING: It should be run from the top directory.
#	No error messge at the moment
#	Readable files (*.[ch]) should exists in . ./*lib ...
#		to cause the action on them
# It is a good policy to keep a set of copies of all modules in SCCS
#	archives files on the system by "rsccs get SCCS".
