[Bug fortran/37201] New: ICE

[francois dot jacq at irsn dot fr]

$ gfortran odcdir.f90 cdir.o
odcdir.f90: In function 'test':
odcdir.f90:16: internal compiler error: in gfc_conv_string_parameter, at
fortran/trans-expr.c:4009
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.

file : odcdir.f90

MODULE mod
  INTERFACE 
    FUNCTION cdir() BIND(C,name="cdir") RESULT(r)
      USE iso_c_binding
      CHARACTER(kind=C_CHAR) :: r
    END FUNCTION
  END INTERFACE
  CONTAINS
  function odcdir() RESULT(c)
    CHARACTER :: c
    c=cdir()
  end function
END MODULE
PROGRAM test
  USE mod
  WRITE(*,*) ICHAR(odcdir())
  WRITE(*,*) ICHAR(cdir())
END PROGRAM

file cdir.c

char cdir(void){return '/';}


-- 
           Summary: ICE
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: francois dot jacq at irsn dot fr
 GCC build triplet: GNU Fortran (GCC) 4.4.0 20080821 (experimental) [trunk
                    revision
  GCC host triplet: i686 GNU/Linux, kernel 2.6.22.1
GCC target triplet: 4.4.0


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