[Bug fortran/63152] New: needless initialization of local pointer arrays.

[Bug fortran/63152] New: needless initialization of local pointer arrays.

[Joost.VandeVondele at mat dot ethz.ch]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=63152

            Bug ID: 63152
           Summary: needless initialization of local pointer arrays.
           Product: gcc
           Version: 5.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: Joost.VandeVondele at mat dot ethz.ch

I've noticed that for this code:

 SUBROUTINE S1()
   INTEGER, POINTER, DIMENSION(:) :: v
   INTERFACE
    SUBROUTINE foo(v)
       INTEGER, POINTER, DIMENSION(:) :: v
    END SUBROUTINE
   END INTERFACE
   CALL foo(v)
 END SUBROUTINE S1

gfortran initializes the pointer (to zero) even if '-fno-init-local-zero' :

s1 ()
{
  struct array1_integer(kind=4) v;

  v.data = 0B;
  foo (&v);
}

I don't think this is mandated (other compilers don't)

I'm working on a patch.

[Bug fortran/63152] needless initialization of local pointer arrays.

[Joost.VandeVondele at mat dot ethz.ch]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=63152

Joost VandeVondele <Joost.VandeVondele at mat dot ethz.ch> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2014-09-03
                 CC|                            |Joost.VandeVondele at mat dot ethz
                   |                            |.ch
           Assignee|unassigned at gcc dot gnu.org      |Joost.VandeVondele at mat dot ethz
                   |                            |.ch
     Ever confirmed|0                           |1

--- Comment #1 from Joost VandeVondele <Joost.VandeVondele at mat dot ethz.ch> ---
working on a patch.

[Bug fortran/63152] needless initialization of local pointer arrays.

[Joost.VandeVondele at mat dot ethz.ch]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=63152

Joost VandeVondele <Joost.VandeVondele at mat dot ethz.ch> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                URL|                            |https://gcc.gnu.org/ml/fort
                   |                            |ran/2014-09/msg00016.html

--- Comment #2 from Joost VandeVondele <Joost.VandeVondele at mat dot ethz.ch> ---
WIP patch at URL

[Bug fortran/63152] needless initialization of local pointer arrays.

[vondele at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=63152

--- Comment #3 from vondele at gcc dot gnu.org ---
Author: vondele
Date: Fri Sep 19 10:28:00 2014
New Revision: 215387

URL: https://gcc.gnu.org/viewcvs?rev=215387&root=gcc&view=rev
Log:
2014-09-19  Joost VandeVondele  <vondele@gcc.gnu.org>

    PR fortran/63152
    * trans-array.c (gfc_trans_deferred_array): Only nullify allocatables.

2014-09-19  Joost VandeVondele  <vondele@gcc.gnu.org>

    PR fortran/63152
    * gfortran.dg/auto_char_dummy_array_1.f90: Fix undefined behavior.
    * gfortran.dg/pr63152.f90: New test.


Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-array.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/auto_char_dummy_array_1.f90

[Bug fortran/63152] needless initialization of local pointer arrays.

[Joost.VandeVondele at mat dot ethz.ch]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=63152

Joost VandeVondele <Joost.VandeVondele at mat dot ethz.ch> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|---                         |FIXED

--- Comment #4 from Joost VandeVondele <Joost.VandeVondele at mat dot ethz.ch> ---
fixed.