[Bug fortran/89866] [8 Regression] [F08] wrong-code problem with POINTER, INTENT(IN) argument

2019-03-30 Thread tkoenig at gcc dot gnu.org 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89866

Thomas Koenig  changed:

   What|Removed |Added

 Status|NEW |RESOLVED
 Resolution|--- |FIXED

--- Comment #7 from Thomas Koenig  ---
So, fixed.

Thanks for the bug report!

[Bug fortran/89866] [8 Regression] [F08] wrong-code problem with POINTER, INTENT(IN) argument

2019-03-30 Thread tkoenig at gcc dot gnu.org 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89866

--- Comment #6 from Thomas Koenig  ---
Author: tkoenig
Date: Sat Mar 30 13:45:47 2019
New Revision: 270035

URL: https://gcc.gnu.org/viewcvs?rev=270035=gcc=rev
Log:
2019-03-30  Thomas Koenig  

PR fortran/89866
* gfortran.dg/pointer_intent_8.f90: New test.


Added:
branches/gcc-8-branch/gcc/testsuite/gfortran.dg/pointer_intent_8.f90
Modified:
branches/gcc-8-branch/gcc/testsuite/ChangeLog

[Bug fortran/89866] [8 Regression] [F08] wrong-code problem with POINTER, INTENT(IN) argument

2019-03-30 Thread tkoenig at gcc dot gnu.org 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89866

--- Comment #5 from Thomas Koenig  ---
Author: tkoenig
Date: Sat Mar 30 13:41:10 2019
New Revision: 270034

URL: https://gcc.gnu.org/viewcvs?rev=270034=gcc=rev
Log:
2019-03-30  Thomas Koenig  

PR fortran/89866
* gfortran.dg/pointer_intent_8.f90: New test.


Added:
trunk/gcc/testsuite/gfortran.dg/pointer_intent_8.f90
Modified:
trunk/gcc/testsuite/ChangeLog

[Bug fortran/89866] [8 Regression] [F08] wrong-code problem with POINTER, INTENT(IN) argument

2019-03-30 Thread tkoenig at gcc dot gnu.org 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89866

Thomas Koenig  changed:

   What|Removed |Added

 CC||tkoenig at gcc dot gnu.org

--- Comment #4 from Thomas Koenig  ---
I see correct execution with 8.3.1 20190310, so I assume this has
been fixed in the meantime.

I will commit a test case so this does not regress.

[Bug fortran/89866] [8 Regression] [F08] wrong-code problem with POINTER, INTENT(IN) argument

2019-03-30 Thread dominiq at lps dot ens.fr 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89866

--- Comment #3 from Dominique d'Humieres  ---
This has been fixed between revisions r264810 (2018-10-03, wrong code) 
and r264951 (2018-10-09, OK) and the fix has not been back ported 
to the GCC8 branch).

I did not find any obvious commit in this range.

On the GCC8 branch I see the expected output up to r251946, but a segfault at
runtime for r251980 (2017-09-11), likely r251949. AFAICT the wrong code issue
appeared at revision r257065.

[Bug fortran/89866] [8 Regression] [F08] wrong-code problem with POINTER, INTENT(IN) argument

2019-03-28 Thread janus at gcc dot gnu.org 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89866

janus at gcc dot gnu.org changed:

   What|Removed |Added

 Status|UNCONFIRMED |NEW
   Last reconfirmed||2019-03-28
 CC||janus at gcc dot gnu.org
  Known to work||5.5.0, 6.5.0, 7.3.0, 9.0
 Blocks||39627
Summary|POINTER |[8 Regression] [F08]
   ||wrong-code problem with
   ||POINTER, INTENT(IN)
   ||argument
 Ever confirmed|0   |1
  Known to fail||8.2.0

--- Comment #2 from janus at gcc dot gnu.org ---
I can confirm this problem. Reduced test case:


PROGRAM testfortran2
  IMPLICIT NONE

  INTEGER, DIMENSION(10), TARGET :: i4array

  i4array = (/ 1,2,3,4,5,6,7,8,9,10 /)

  call InRef(i4array)

CONTAINS

  subroutine InRef(v)
INTEGER, DIMENSION(:), POINTER, INTENT(in) :: v
INTEGER :: i
DO i=1, SIZE(v,1)
  WRITE(*,*) v(i)
END DO
  END subroutine

END


This gives the correct output with all gfortran versions I tried (including
trunk and 7.3), except 8.2, which prints:

   1
   1
   1
   1
   1
   1
   1
   1
   1
   1

Note that the test case is invalid in Fortran 2003:

8 |   call InRef(i4array)
  | 1
Error: Fortran 2008: Non-pointer actual argument at (1) to pointer dummy ‘v’


Referenced Bugs:

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=39627
[Bug 39627] [meta-bug] Fortran 2008 support