http://sourceware.org/ml/gdb-patches/2016-01/msg00135.html
Subject: Re: [PATCH 0/6] fortran: multi-dimensional subarrays with strides


--vkogqOf2sHV7VnPd
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline

On Thu, 03 Dec 2015 21:51:19 +0100, Jan Kratochvil wrote:
> Just I see - reproducible with FSF GDB trunk - one new:
> 	FAIL: gdb.fortran/static-arrays.exp: print ar3(:2,:2,:2)
> happening on x86_64 in -m32 target mode and on i686 native host.
> It PASSes in the most common case of native x86_64.  Tested on Fedora 23.
>  print ar3(:2,:2,:2)^M
> -$52 = (( ( 111, 211) ( 121, 221) ) ( ( 112, 212) ( 122, 222) ) )^M
> -(gdb) PASS: gdb.fortran/static-arrays.exp: print ar3(:2,:2,:2)
> +$52 = (( ( 1221, 211) ( 121, 221) ) ( ( 112, 212) ( 122, 222) ) )^M
> +(gdb) FAIL: gdb.fortran/static-arrays.exp: print ar3(:2,:2,:2)

That was easier than I expected:

gfortran -fcheck=bounds
->
At line 44 of file gdb.fortran/static-arrays.f90
Fortran runtime error: Index '11' of dimension 1 of array 'ar4' above upper bound of 10

There is:
	  integer, dimension(10,-7:3, -15:-5) :: ar4
+
	  do i = 1, 11, 1


Jan

--vkogqOf2sHV7VnPd
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline; filename=1

--- gdb-7.10.50.20160106/gdb/testsuite/gdb.fortran/static-arrays.f90-orig	2016-01-08 19:19:18.421828196 +0100
+++ gdb-7.10.50.20160106/gdb/testsuite/gdb.fortran/static-arrays.f90	2016-01-08 19:41:09.778142683 +0100
@@ -38,7 +38,7 @@ subroutine sub
     end do
   end do
 
-  do i = 1, 11, 1
+  do i = 1, 10, 1
     do j = -7, 3, 1
       do k = -15, -5, 1
         ar4(i,j,k) = i*100 + (j+8)*10 + (k+16)

--vkogqOf2sHV7VnPd--