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

            Bug ID: 61179
           Summary: Can not compile "type is(double complex)"
           Product: gcc
           Version: 4.10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: mrestelli at gmail dot com

Hi,
   I can not compile the following (legal, I think) code:

module m
 implicit none
contains

 subroutine test(x)
  class(*), intent(in) :: x  
   select type(x)
    type is(complex)
     write(*,*) "complex"
    type is(double complex)
     write(*,*) "double complex"
   end select
 end subroutine test

end module m


$ gfortran -c dc.f90 
dc.f90:13.12:

    type is(double complex)
            1
Error: Syntax error in TYPE IS specification at (1)


$ gfortran --version
GNU Fortran (GCC) 4.10.0 20140508 (experimental)

Reply via email to