aboutsummaryrefslogtreecommitdiff
path: root/test cases
diff options
context:
space:
mode:
authorJussi Pakkanen <jpakkane@gmail.com>2019-03-14 23:37:50 +0200
committerGitHub <noreply@github.com>2019-03-14 23:37:50 +0200
commit2b446ab53978d18898eca5661e9752bc75b0a794 (patch)
tree0b0bba8baadf9b04bed36540a7126b005564abc8 /test cases
parent1f0b3652ac0abd15a8212a4cf9f3d9d5c4579c98 (diff)
parente491792a956dfae50cfae90cad7b7b6732b74c3d (diff)
downloadmeson-2b446ab53978d18898eca5661e9752bc75b0a794.zip
meson-2b446ab53978d18898eca5661e9752bc75b0a794.tar.gz
meson-2b446ab53978d18898eca5661e9752bc75b0a794.tar.bz2
Merge pull request #5081 from scivision/fortraninclude
FEATURE: Fortran Include directive
Diffstat (limited to 'test cases')
-rw-r--r--test cases/fortran/15 include/inc1.f905
-rw-r--r--test cases/fortran/15 include/inc2.f902
-rw-r--r--test cases/fortran/15 include/main.f908
-rw-r--r--test cases/fortran/15 include/meson.build4
4 files changed, 19 insertions, 0 deletions
diff --git a/test cases/fortran/15 include/inc1.f90 b/test cases/fortran/15 include/inc1.f90
new file mode 100644
index 0000000..0aec9ba
--- /dev/null
+++ b/test cases/fortran/15 include/inc1.f90
@@ -0,0 +1,5 @@
+
+real :: pi = 4.*atan(1.)
+real :: tau
+
+include "inc2.f90"
diff --git a/test cases/fortran/15 include/inc2.f90 b/test cases/fortran/15 include/inc2.f90
new file mode 100644
index 0000000..065b990
--- /dev/null
+++ b/test cases/fortran/15 include/inc2.f90
@@ -0,0 +1,2 @@
+
+tau = 2*pi
diff --git a/test cases/fortran/15 include/main.f90 b/test cases/fortran/15 include/main.f90
new file mode 100644
index 0000000..661aa62
--- /dev/null
+++ b/test cases/fortran/15 include/main.f90
@@ -0,0 +1,8 @@
+
+implicit none
+
+include "inc1.f90"
+
+print *, '2*pi:', tau
+
+end program
diff --git a/test cases/fortran/15 include/meson.build b/test cases/fortran/15 include/meson.build
new file mode 100644
index 0000000..5609128
--- /dev/null
+++ b/test cases/fortran/15 include/meson.build
@@ -0,0 +1,4 @@
+project('Inclusive', 'fortran')
+
+exe = executable('incexe', 'main.f90')
+test('Fortran include files', exe)