[Bug fortran/38726] [4.3/4.4 Regression] gfortran.dg/elemental_subroutine_7.f90 fail on Linux/ia64

2009-01-06 Thread mikael at gcc dot gnu dot org 


--- Comment #9 from mikael at gcc dot gnu dot org  2009-01-06 13:45 ---
Looks like it's fixed now.
Thanks for the report.
Closing.


-- 

mikael at gcc dot gnu dot org changed:

   What|Removed |Added

 Status|NEW |RESOLVED
 Resolution||FIXED
   Target Milestone|--- |4.4.0


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38726

[Bug fortran/38726] [4.3/4.4 Regression] gfortran.dg/elemental_subroutine_7.f90 fail on Linux/ia64

2009-01-05 Thread mikael at gcc dot gnu dot org 


--- Comment #8 from mikael at gcc dot gnu dot org  2009-01-05 18:44 ---
Subject: Bug 38726

Author: mikael
Date: Mon Jan  5 18:44:09 2009
New Revision: 143084

URL: http://gcc.gnu.org/viewcvs?root=gccview=revrev=143084
Log:
2009-01-05  Mikael Morin  mikael.mo...@tele2.fr

PR fortran/38669
PR fortran/38726
* gfortran.dg/elemental_subroutine_7.f90: 
Fix p values so that it can be used as vector subscript.


Modified:
trunk/gcc/testsuite/ChangeLog
trunk/gcc/testsuite/gfortran.dg/elemental_subroutine_7.f90


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38726

[Bug fortran/38726] [4.3/4.4 Regression] gfortran.dg/elemental_subroutine_7.f90 fail on Linux/ia64

2009-01-05 Thread mikael at gcc dot gnu dot org 


--- Comment #7 from mikael at gcc dot gnu dot org  2009-01-05 15:08 ---
(In reply to comment #6)
 If compiled with -fbounds-check, the executable yields:
 
 At line 29 of file
 /opt/gcc/_gcc_clean/gcc/testsuite/gfortran.dg/elemental_subroutine_7.f90
 Fortran runtime error: Array reference out of bounds for array 'p', lower 
 bound
 of dimension 1 exceeded(-2  1)
 
 The problem comes from 
 
 ...
   p = 20 * r - 10
 ...
   call tq_tvgh (q(k_lev:), (p(p(k_lev:
   if (any (p(p) /= q)) call abort
 
 where min(p)=-10, outside the bounds of p(1:42).
 
 If I use '  p = 41 * r + 1', the test passes.
 
Yes, of course. Stupid me.
I started with the random thing, and I added the vector subscript later.
Thanks Dominique.


-- 

mikael at gcc dot gnu dot org changed:

   What|Removed |Added

   Target Milestone|4.3.3   |---


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38726

[Bug fortran/38726] [4.3/4.4 Regression] gfortran.dg/elemental_subroutine_7.f90 fail on Linux/ia64

2009-01-05 Thread dominiq at lps dot ens dot fr 


--- Comment #6 from dominiq at lps dot ens dot fr  2009-01-05 14:47 ---
If compiled with -fbounds-check, the executable yields:

At line 29 of file
/opt/gcc/_gcc_clean/gcc/testsuite/gfortran.dg/elemental_subroutine_7.f90
Fortran runtime error: Array reference out of bounds for array 'p', lower bound
of dimension 1 exceeded(-2  1)

The problem comes from 

...
  p = 20 * r - 10
...
  call tq_tvgh (q(k_lev:), (p(p(k_lev:
  if (any (p(p) /= q)) call abort

where min(p)=-10, outside the bounds of p(1:42).

If I use '  p = 41 * r + 1', the test passes.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38726

[Bug fortran/38726] [4.3/4.4 Regression] gfortran.dg/elemental_subroutine_7.f90 fail on Linux/ia64

2009-01-05 Thread tkoenig at gcc dot gnu dot org 


--- Comment #5 from tkoenig at gcc dot gnu dot org  2009-01-05 14:24 ---
Marking as regression according to Dominique's comment.


-- 

tkoenig at gcc dot gnu dot org changed:

   What|Removed |Added

  Known to fail||4.3.2 4.4.0
  Known to work||4.2.3
Summary|gfortran.dg/elemental_subrou|[4.3/4.4 Regression]
   |tine_7.f90 fail on  |gfortran.dg/elemental_subrou
   |Linux/ia64  |tine_7.f90 fail on
   ||Linux/ia64
   Target Milestone|--- |4.3.3


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=38726