* lib/gdb.exp (gdb_test): Between $pattern and $prompt, expect
[binutils-gdb.git] / gdb / testsuite / gdb.base / langs1.f
1 c I am not sure whether there is a way to have a fortran program without
2 c a MAIN, but it does not really harm us to have one.
3 end
4 subroutine fsub
5 integer*4 cppsub
6 return (cppsub (10000))
7 end