ports//lang/gnat-gcc41/work/gcc-4.1.2/gcc/testsuite/gfortran.dg/g77/cpp5.h

	FUNCTION FOO()
#include "cpp5inc.h"
	END FUNCTION

syntax highlighted by Code2HTML, v. 0.9.1