diff options
| -rw-r--r-- | test cases/fortran/12 submodule/a2.f90 | 4 | ||||
| -rw-r--r-- | test cases/fortran/12 submodule/a3.f90 | 3 | ||||
| -rw-r--r-- | test cases/fortran/12 submodule/meson.build | 3 |
3 files changed, 7 insertions, 3 deletions
diff --git a/test cases/fortran/12 submodule/a2.f90 b/test cases/fortran/12 submodule/a2.f90 index b3ce1f0..ba8a0dd 100644 --- a/test cases/fortran/12 submodule/a2.f90 +++ b/test cases/fortran/12 submodule/a2.f90 @@ -1,4 +1,5 @@ -submodule (a1) a2 +! testing no space between submodule() +submodule(a1) a2 contains @@ -6,5 +7,4 @@ module procedure pi2tau pi2tau = 2*pi end procedure pi2tau - end submodule a2 diff --git a/test cases/fortran/12 submodule/a3.f90 b/test cases/fortran/12 submodule/a3.f90 index 21aa355..3881675 100644 --- a/test cases/fortran/12 submodule/a3.f90 +++ b/test cases/fortran/12 submodule/a3.f90 @@ -1,3 +1,6 @@ +! submodule (bogus) foo +! testing don't detect commented submodule + submodule (a1:a2) a3 ! testing inline comment contains diff --git a/test cases/fortran/12 submodule/meson.build b/test cases/fortran/12 submodule/meson.build index b3ed9de..624e567 100644 --- a/test cases/fortran/12 submodule/meson.build +++ b/test cases/fortran/12 submodule/meson.build @@ -1,4 +1,5 @@ -project('submodule single level', 'fortran') +project('submodule single level', 'fortran', + meson_version: '>= 0.50.0') hier2 = executable('single', 'parent.f90', 'child.f90') test('single-level hierarchy', hier2) |