diff options
| author | Brad King <brad.king@kitware.com> | 2007-10-10 13:09:09 (GMT) |
|---|---|---|
| committer | Brad King <brad.king@kitware.com> | 2007-10-10 13:09:09 (GMT) |
| commit | aa9ba5c3efcd32ea631435318f63dc476ac39798 (patch) | |
| tree | 7cde06b78ec51ef50142455d70ca8c2da9c7c86f /Tests/Fortran/in_interface | |
| parent | ea56464864674a8dd13e417c69d68bd9a80ff5fa (diff) | |
| download | CMake-aa9ba5c3efcd32ea631435318f63dc476ac39798.zip CMake-aa9ba5c3efcd32ea631435318f63dc476ac39798.tar.gz CMake-aa9ba5c3efcd32ea631435318f63dc476ac39798.tar.bz2 | |
ENH: Added test for 'use' keyword in a comment. Patch from Maik Beckmann. See bug#5809.
Diffstat (limited to 'Tests/Fortran/in_interface')
| -rw-r--r-- | Tests/Fortran/in_interface/main.f90 | 3 | ||||
| -rw-r--r-- | Tests/Fortran/in_interface/module.f90 | 12 |
2 files changed, 15 insertions, 0 deletions
diff --git a/Tests/Fortran/in_interface/main.f90 b/Tests/Fortran/in_interface/main.f90 new file mode 100644 index 0000000..28bcf36 --- /dev/null +++ b/Tests/Fortran/in_interface/main.f90 @@ -0,0 +1,3 @@ +program hello + use test_interface +end program hello diff --git a/Tests/Fortran/in_interface/module.f90 b/Tests/Fortran/in_interface/module.f90 new file mode 100644 index 0000000..1064d74 --- /dev/null +++ b/Tests/Fortran/in_interface/module.f90 @@ -0,0 +1,12 @@ +module test_interface + + interface dummy + module procedure module_function + end interface + +contains + + subroutine module_function + end subroutine + +end module test_interface
\ No newline at end of file |