ports//lang/gnat-gcc42/work/gcc-4.2.2/gcc/testsuite/gcc.dg/compat/scalar-by-value-6.c

TEST_FUNCS (longdouble_i, long double, int, d, -987)
TEST_FUNCS (longdouble_d, long double, double, d, -987.0)
TEST_FUNCS (complexlongdouble_i, _Complex long double, int, cd, -987)
TEST_FUNCS (complexlongdouble_d, _Complex long double, double, cd, -987.0)

syntax highlighted by Code2HTML, v. 0.9.1