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

            Bug ID: 82709
           Summary: f2008 complex%re and %im not yet implemented
           Product: gcc
           Version: 6.3.1
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: john.harper at vuw dot ac.nz
  Target Milestone: ---

IMHO This program is valid f2008 but gfortran won't compile it. Evidence:

cayley[~/Jfh] % cat cplx.f90
! Works with ifort -stand f95 but not gfortran -std=f2008 
  implicit none
  complex:: z = (1,2)
  print *,z%re
  print *,z%im
end program
cayley[~/Jfh] % /usr/bin/gfortran -std=f2008 cplx.f90 
cplx.f90:4:12:

   print *,z%re
            1
Error: Unexpected ‘%’ for nonderived-type variable ‘z’ at (1)
cplx.f90:5:12:

   print *,z%im
            1
Error: Unexpected ‘%’ for nonderived-type variable ‘z’ at (1)
cayley[~/Jfh] % /usr/bin/gfortran -v
Using built-in specs.
COLLECT_GCC=/usr/bin/gfortran
COLLECT_LTO_WRAPPER=/usr/lib/gcc/x86_64-pc-linux-gnu/6.3.1/lto-wrapper
Target: x86_64-pc-linux-gnu
Configured with: /build/gcc/src/gcc/configure --prefix=/usr --libdir=/usr/lib
--libexecdir=/usr/lib --mandir=/usr/share/man --infodir=/usr/share/info
--with-bugurl=https://bugs.archlinux.org/
--enable-languages=c,c++,ada,fortran,go,lto,objc,obj-c++ --enable-shared
--enable-threads=posix --enable-libmpx --with-system-zlib --with-isl
--enable-__cxa_atexit --disable-libunwind-exceptions --enable-clocale=gnu
--disable-libstdcxx-pch --disable-libssp --enable-gnu-unique-object
--enable-linker-build-id --enable-lto --enable-plugin
--enable-install-libiberty --with-linker-hash-style=gnu
--enable-gnu-indirect-function --disable-multilib --disable-werror
--enable-checking=release
Thread model: posix
gcc version 6.3.1 20170109 (GCC) 
cayley[~/Jfh] %

Reply via email to