From 01b949e46d095e3f5425a594689277463bc8f46b Mon Sep 17 00:00:00 2001
From: Giovanni Bussi <giovanni.bussi@gmail.com>
Date: Thu, 10 Mar 2022 12:34:30 +0100
Subject: [PATCH] improved check for F08

---
 regtest/scripts/run | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/regtest/scripts/run b/regtest/scripts/run
index c5066d8ce2..308b848752 100755
--- a/regtest/scripts/run
+++ b/regtest/scripts/run
@@ -209,6 +209,7 @@ case "$type" in
       if test "$plumed_language" = fortran08 ; then
         cat > __test_fortran08.f90 << EOF
 module test_fortran08_a
+implicit none
 type b
 contains
   final :: c
@@ -217,6 +218,10 @@ contains
   impure elemental subroutine c(x)
     type(b), intent(inout) :: x
   end subroutine c
+  subroutine sub(x)
+    integer :: x(:)
+    write(*,*) is_contiguous(x)
+  end subroutine sub
 end module test_fortran08_a
 EOF
         if make test-fortran08 2>err | grep SUCCESS=YES 1> /dev/null ; then