[Bug fortran/25681] ICE with len of array of derived type

["fxcoudert at gcc dot gnu dot org" <gcc-bugzilla@gcc.gnu.org>]

------- Comment #4 from fxcoudert at gcc dot gnu dot org  2006-02-06 18:30 -------
Here is the backtrace for this bug:

Program received signal SIGSEGV, Segmentation fault.
0x080a4583 in gfc_conv_scalarized_array_ref (se=0xbfaf2924, ar=0x86f5d0c)
    at ../../../trunk/gcc/fortran/trans-array.c:1885
1885        n = se->loop->order[0];
(gdb) where
#0  0x080a4583 in gfc_conv_scalarized_array_ref (se=0xbfaf2924, ar=0x86f5d0c)
    at ../../../trunk/gcc/fortran/trans-array.c:1885
#1  0x080a4dfd in gfc_conv_array_ref (se=0xbfaf2924, ar=0x86f5d0c)
    at ../../../trunk/gcc/fortran/trans-array.c:1929
#2  0x080b2d87 in gfc_conv_expr (se=0xbfaf2924, expr=0x86f5cb0)
    at ../../../trunk/gcc/fortran/trans-expr.c:429
#3  0x080ba1df in gfc_conv_intrinsic_len (se=0xbfaf302c, expr=Variable "expr"
is not available.
)
    at ../../../trunk/gcc/fortran/trans-intrinsic.c:2113
#4  0x080b61bf in gfc_conv_function_expr (se=0xbfaf302c, expr=Variable "expr"
is not available.
)
    at ../../../trunk/gcc/fortran/trans-expr.c:2251
#5  0x080b26b9 in gfc_conv_expr (se=0xbfaf302c, expr=0x86f5bd8)
    at ../../../trunk/gcc/fortran/trans-expr.c:2614
#6  0x080b6a6a in gfc_trans_assignment (expr1=0x86f5968, expr2=0x86f5bd8)
    at ../../../trunk/gcc/fortran/trans-expr.c:3053
#7  0x080b6d09 in gfc_trans_assign (code=0x86f5ea8)
    at ../../../trunk/gcc/fortran/trans-expr.c:3115
#8  0x0809ffd8 in gfc_trans_code (code=0x86f5ea8)
    at ../../../trunk/gcc/fortran/trans.c:455
#9  0x080b0732 in gfc_generate_function_code (ns=0x86f4ef8)
    at ../../../trunk/gcc/fortran/trans-decl.c:2639
#10 0x08082ead in gfc_parse_file () at ../../../trunk/gcc/fortran/parse.c:2686
#11 0x0809f15d in gfc_be_parse_file (set_yydebug=0)
    at ../../../trunk/gcc/fortran/f95-lang.c:287


A more reduced testcase is:

  TYPE T
    CHARACTER(LEN=80) :: S(1)
  END TYPE T
  TYPE(T), POINTER :: TT
  PRINT *, LEN(TT % S)
  END


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Last reconfirmed|2006-01-27 20:48:30         |2006-02-06 18:30:57
               date|                            |


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