[Bug fortran/13251] New: wrong error: character kind=0 not available

["dann at godzilla dot ics dot uci dot edu" <gcc-bugzilla at gcc dot gnu dot org>]

With: gcc version 3.5-tree-ssa 20031130 (merged 20031123)


mymod.f90:
      MODULE  mymod
                                                                        
      TYPE :: mymod_type                                                
        CHARACTER(32)            MYFIELD
      END TYPE                                                          
                                                                        
      TYPE (mymod_type), DIMENSION(:), ALLOCATABLE :: MYMOD_VALUE
                                                                        
      END MODULE mymod

test.f90:

SUBROUTINE MYSUB (MYARG)
  USE mymod
  K = INDEX(MYMOD_VALUE(1)%MYFIELD(1:32)," ")
  RETURN
END SUBROUTINE MYSUB



gfortran -c test.f90
test.f90: In function `mysub':

test.f90:3: fatal error: character kind=0 not available
compilation terminated.

Intel's compiler compiles the above code.

Code like this appears in SPEC2000

-- 
           Summary: wrong error: character kind=0 not available
           Product: gcc
           Version: tree-ssa
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: dann at godzilla dot ics dot uci dot edu
                CC: gcc-bugs at gcc dot gnu dot org
 GCC build triplet: i686-pc-linux-gnu
  GCC host triplet: i686-pc-linux-gnu
GCC target triplet: i686-pc-linux-gnu


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=13251