[Bug fortran/66328] Wrong initialization of derived-type DATA

["physiker at toast2 dot net" <gcc-bugzilla at gcc dot gnu dot org>]

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

physiker at toast2 dot net changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |physiker at toast2 dot net

--- Comment #1 from physiker at toast2 dot net ---
It seems that the bug is fixed. When the code is compiled with gfortran 6.1,
the binary produces the expected output when run (see below).

bash-3.2$  LANG=C gfortran-fsf-6 -v ddata.f90
Driving: gfortran-fsf-6 -v ddata.f90 -mmacosx-version-min=10.9.4 -l gfortran
-shared-libgcc
Using built-in specs.
COLLECT_GCC=gfortran-fsf-6
COLLECT_LTO_WRAPPER=/sw/lib/gcc6/libexec/gcc/x86_64-apple-darwin13.4.0/6.1.0/lto-wrapper
Target: x86_64-apple-darwin13.4.0
Configured with: ../gcc-6.1.0/configure --prefix=/sw --prefix=/sw/lib/gcc6
--mandir=/sw/share/man --infodir=/sw/lib/gcc6/info
--enable-languages=c,c++,fortran,lto,objc,obj-c++,java --with-gmp=/sw
--with-libiconv-prefix=/sw --with-isl=/sw --with-mpc=/sw --with-system-zlib
--program-suffix=-fsf-6
Thread model: posix
gcc version 6.1.0 (GCC) 
COLLECT_GCC_OPTIONS='-v' '-mmacosx-version-min=10.9.4' '-shared-libgcc'
'-mtune=core2'
 /sw/lib/gcc6/libexec/gcc/x86_64-apple-darwin13.4.0/6.1.0/f951 ddata.f90 -fPIC
-quiet -dumpbase ddata.f90 -mmacosx-version-min=10.9.4 -mtune=core2 -auxbase
ddata -version -fintrinsic-modules-path
/sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/6.1.0/finclude -o
/var/folders/97/4qnhjhtn25s86s9hkz0h37_m0000gn/T//ccxnGIeX.s
GNU Fortran (GCC) version 6.1.0 (x86_64-apple-darwin13.4.0)
        compiled by GNU C version 6.1.0, GMP version 6.1.0, MPFR version 3.1.4,
MPC version 1.0.3, isl version 0.15
GGC heuristics: --param ggc-min-expand=100 --param ggc-min-heapsize=131072
GNU Fortran2008 (GCC) version 6.1.0 (x86_64-apple-darwin13.4.0)
        compiled by GNU C version 6.1.0, GMP version 6.1.0, MPFR version 3.1.4,
MPC version 1.0.3, isl version 0.15
GGC heuristics: --param ggc-min-expand=100 --param ggc-min-heapsize=131072
COLLECT_GCC_OPTIONS='-v' '-mmacosx-version-min=10.9.4' '-shared-libgcc'
'-mtune=core2'
 as -arch x86_64 -force_cpusubtype_ALL -o
/var/folders/97/4qnhjhtn25s86s9hkz0h37_m0000gn/T//ccpWyVcF.o
/var/folders/97/4qnhjhtn25s86s9hkz0h37_m0000gn/T//ccxnGIeX.s
Reading specs from
/sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/6.1.0/../../../libgfortran.spec
rename spec lib to liborig
COLLECT_GCC_OPTIONS='-v' '-mmacosx-version-min=10.9.4' '-shared-libgcc'
'-mtune=core2'
COMPILER_PATH=/sw/lib/gcc6/libexec/gcc/x86_64-apple-darwin13.4.0/6.1.0/:/sw/lib/gcc6/libexec/gcc/x86_64-apple-darwin13.4.0/6.1.0/:/sw/lib/gcc6/libexec/gcc/x86_64-apple-darwin13.4.0/:/sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/6.1.0/:/sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/
LIBRARY_PATH=/sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/6.1.0/:/sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/6.1.0/../../../
COLLECT_GCC_OPTIONS='-v' '-mmacosx-version-min=10.9.4' '-shared-libgcc'
'-mtune=core2'
 /sw/lib/gcc6/libexec/gcc/x86_64-apple-darwin13.4.0/6.1.0/collect2 -dynamic
-arch x86_64 -macosx_version_min 10.9.4 -weak_reference_mismatches non-weak -o
a.out -L/sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/6.1.0
-L/sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/6.1.0/../../..
/var/folders/97/4qnhjhtn25s86s9hkz0h37_m0000gn/T//ccpWyVcF.o -lgfortran
-no_compact_unwind -lSystem -lgcc_ext.10.5 -lgcc -lquadmath -lm -lgcc_ext.10.5
-lgcc -lSystem -v
collect2 version 6.1.0
/usr/bin/ld -dynamic -arch x86_64 -macosx_version_min 10.9.4
-weak_reference_mismatches non-weak -o a.out
-L/sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/6.1.0
-L/sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/6.1.0/../../..
/var/folders/97/4qnhjhtn25s86s9hkz0h37_m0000gn/T//ccpWyVcF.o -lgfortran
-no_compact_unwind -lSystem -lgcc_ext.10.5 -lgcc -lquadmath -lm -lgcc_ext.10.5
-lgcc -lSystem -v
@(#)PROGRAM:ld  PROJECT:ld64-241.9
configured to support archs: armv6 armv7 armv7s arm64 i386 x86_64 x86_64h
armv6m armv7m armv7em
Library search paths:
        /sw/lib/gcc6/lib/gcc/x86_64-apple-darwin13.4.0/6.1.0
        /sw/lib/gcc6/lib
        /usr/lib
        /usr/local/lib
Framework search paths:
        /Library/Frameworks/
        /System/Library/Frameworks/
 /usr/bin/nm -n /var/folders/97/4qnhjhtn25s86s9hkz0h37_m0000gn/T//ccpWyVcF.o
bash-3.2$ ./a.out
   1.00000000       1.00000000    
   1.00000000       1.00000000    
bash-3.2$