[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.base / langs1.f

c I am not sure whether there is a way to have a fortran program without
c a MAIN, but it does not really harm us to have one.
      end
      subroutine fsub
        integer*4 cppsub
        return (cppsub (10000))
      end
Commit	Line	Data
c906108c SS	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