summaryrefslogtreecommitdiffstats
path: root/Tests/FortranModules/Submodules/parent.f90
diff options
context:
space:
mode:
authorBrad King <brad.king@kitware.com>2018-04-19 15:26:06 (GMT)
committerBrad King <brad.king@kitware.com>2018-04-20 14:57:32 (GMT)
commitb1f95e5b1477794c0ee3a56a4ea016a34c3e3d5c (patch)
tree715af1b794f404479f96a5932d2d1ea9b0187490 /Tests/FortranModules/Submodules/parent.f90
parent402735314ec7fe48ec21e5f4c5b19b6f17682c54 (diff)
downloadCMake-b1f95e5b1477794c0ee3a56a4ea016a34c3e3d5c.zip
CMake-b1f95e5b1477794c0ee3a56a4ea016a34c3e3d5c.tar.gz
CMake-b1f95e5b1477794c0ee3a56a4ea016a34c3e3d5c.tar.bz2
Fortran: Extend submodule test with great-grandchild
Name the module using CamelCase to test lower-case file name conversion. Also add coverage of existing "sibling" module.
Diffstat (limited to 'Tests/FortranModules/Submodules/parent.f90')
-rw-r--r--Tests/FortranModules/Submodules/parent.f905
1 files changed, 5 insertions, 0 deletions
diff --git a/Tests/FortranModules/Submodules/parent.f90 b/Tests/FortranModules/Submodules/parent.f90
index 7693a72..3180b70 100644
--- a/Tests/FortranModules/Submodules/parent.f90
+++ b/Tests/FortranModules/Submodules/parent.f90
@@ -7,10 +7,15 @@ module parent
module function child_function() result(child_stuff)
logical :: child_stuff
end function
+ module function sibling_function() result(sibling_stuff)
+ logical :: sibling_stuff
+ end function
! Test Fortran 2008 "module subroutine" syntax
module subroutine grandchild_subroutine()
end subroutine
+ module subroutine GreatGrandChild_subroutine()
+ end subroutine
end interface