configury: check for modern type(*), dimension(..) syntax

First try if "type(*), dimension(..) :: foo" works as-is
(e.g. without any pragma/directive).

Thanks Chris Parrott for bringing this to our attention

Refs. open-mpi#11582

Signed-off-by: Gilles Gouaillardet <gilles@rist.or.jp>

config/ompi_fortran_check_ignore_tkr.m4

@@ -14,6 +14,8 @@ dnl Copyright (c) 2007      Los Alamos National Security, LLC.  All rights
 dnl                         reserved.
 dnl Copyright (c) 2007      Sun Microsystems, Inc.  All rights reserved.
 dnl Copyright (c) 2009-2015 Cisco Systems, Inc.  All rights reserved.
+dnl Copyright (c) 2013      Research Organization for Information Science
+dnl                         and Technology (RIST).  All rights reserved.
 dnl $COPYRIGHT$
 dnl
 dnl Additional copyrights may follow
@@ -72,8 +74,8 @@ AC_DEFUN([_OMPI_FORTRAN_CHECK_IGNORE_TKR], [
 
     # Vendor-neutral, TYPE(*) syntax
     OMPI_FORTRAN_CHECK_IGNORE_TKR_SUB(
-         [!], [type(*)],
-         [TYPE(*), DIMENSION(*)],
+         [!], [type(*), DIMENSION(..)],
+         [TYPE(*), DIMENSION(..)],
          [internal_ignore_tkr_happy=1], [internal_ignore_tkr_happy=0])
 
     # GCC compilers
@@ -149,6 +151,14 @@ AC_DEFUN([OMPI_FORTRAN_CHECK_IGNORE_TKR_SUB], [
      end subroutine foo
   end interface
 
+  interface
+     subroutine bar(buffer, count)
+       $1 buffer
+       $2, intent(in) :: buffer
+       integer, intent(in) :: count
+     end subroutine bar
+  end interface
+
 ! Simple interface with an un-typed first argument (e.g., a choice buffer)
   integer :: count
   real :: buffer1(3)
@@ -184,13 +194,28 @@ AC_DEFUN([OMPI_FORTRAN_CHECK_IGNORE_TKR_SUB], [
   end program
 
   subroutine force_assumed_shape(a, count)
+    implicit none
     integer :: count
     real, dimension(:,:) :: a
     call foo(a, count)
   end subroutine force_assumed_shape
 
+  module mod
+    interface
+    subroutine bar(buffer, count)
+       $2, intent(in) :: buffer
+       integer, intent(in) :: count
+    end subroutine bar
+    end interface
+  end module
+
+  subroutine bogus(buffer, count)
+  use mod, only : bar
+  implicit none
+  $2, intent(in) :: buffer
+  integer, intent(in) :: count
+  call bar(buffer, count)
 ! Autoconf puts "end" after the last line
-  subroutine bogus
 ]]),
                     [msg=yes
                      ompi_fortran_ignore_tkr_predecl="$1"