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