Adding upstream version 1.0.1.upstream/1.0.1upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

2 files changed, 16 insertions, 0 deletions

diff --git a/test cases/fortran/1 basic/meson.build b/test cases/fortran/1 basic/meson.build
new file mode 100644
index 0000000..52e2d6f
--- /dev/null
+++ b/test cases/fortran/1 basic/meson.build
@@ -0,0 +1,13 @@
+project('simple fortran', 'fortran')
+
+fc = meson.get_compiler('fortran')
+if fc.get_id() == 'gcc'
+  add_global_arguments('-fbounds-check', language : 'fortran')
+endif
+
+args = fc.first_supported_argument(['-ffree-form', '-free', '/free'])
+assert(args != [], 'No arguments found?')
+
+e = executable('simple', 'simple.f90',
+  fortran_args : args)
+test('Simple Fortran', e)
diff --git a/test cases/fortran/1 basic/simple.f90 b/test cases/fortran/1 basic/simple.f90
new file mode 100644
index 0000000..2160d56
--- /dev/null
+++ b/test cases/fortran/1 basic/simple.f90
@@ -0,0 +1,3 @@
+program main
+print *, "Fortran compilation is working."
+end program