Modules/FortranCInterface/call_sub.f - third_party/github.com/Kitware/CMake - Git at Google


            
                    subroutine call_sub

            
                      !DIR$ NOINLINE

            
                      call mysub()

            
                      call my_sub()

            
                    end
	subroutine call_sub
	!DIR$ NOINLINE
	call mysub()
	call my_sub()
	end