------- Comment #2 from ubizjak at gmail dot com  2007-09-03 20:07 -------
Confirmed on x86_64 (-O0), RECORD_TYPE is entering fold_convert() from
gfc_trans_scalar_assign():

(gdb) bt
#0  fancy_abort (file=0xb322f0 "../../gcc-svn/trunk/gcc/fold-const.c",
line=2626, 
    function=0xb321d2 "fold_convert") at
../../gcc-svn/trunk/gcc/diagnostic.c:654
#1  0x00000000005c6eec in fold_convert (type=0x2aaaae2d0340,
arg=0x2aaaadff54b0)
    at ../../gcc-svn/trunk/gcc/fold-const.c:2626
#2  0x0000000000492f0e in gfc_trans_scalar_assign (lse=0x7fff3ff81120,
rse=0x7fff3ff810d0, ts=
      {type = BT_DERIVED, kind = 0, derived = 0xf97230, cl = 0x0, is_c_interop
= 0, is_iso_c = 0, f90_type = BT_UNKNOWN}, l_is_temp=0 '\0', r_is_var=0 '\0')
at ../../gcc-svn/trunk/gcc/fortran/trans-expr.c:3609
#3  0x0000000000496ca5 in gfc_trans_assignment_1 (expr1=0xf97130,
expr2=0xf97700, init_flag=0 '\0')
    at ../../gcc-svn/trunk/gcc/fortran/trans-expr.c:4011
#4  0x0000000000496dbc in gfc_trans_assignment (expr1=0xf97130, expr2=0xf97700,
init_flag=210 '�')
    at ../../gcc-svn/trunk/gcc/fortran/trans-expr.c:4152
#5  0x000000000047b116 in gfc_trans_code (code=0xf986c0) at
../../gcc-svn/trunk/gcc/fortran/trans.c:970
#6  0x000000000048fc73 in gfc_generate_function_code (ns=0xf960e0)
    at ../../gcc-svn/trunk/gcc/fortran/trans-decl.c:3258


(gdb) up
#1  0x00000000005c6eec in fold_convert (type=0x2aaaae2d0340,
arg=0x2aaaadff54b0)
    at ../../gcc-svn/trunk/gcc/fold-const.c:2626
2626          gcc_unreachable ();
(gdb) p debug_tree (type)
 <record_type 0x2aaaae2d0340 a_type SF
    size <integer_cst 0x2aaaadff1a50 type <integer_type 0x2aaaadffe0d0
bit_size_type> constant invariant 32>
    unit size <integer_cst 0x2aaaadff16c0 type <integer_type 0x2aaaadffe000>
constant invariant 4>
    align 32 symtab 0 alias set -1 canonical type 0x2aaaae2d0340
    fields <field_decl 0x2aaaae2cbe70 comp
        type <real_type 0x2aaaae00a5b0 real4 SF size <integer_cst
0x2aaaadff1a50 32> unit size <integer_cst 0x2aaaadff16c0 4>
            align 32 symtab 0 alias set -1 canonical type 0x2aaaae00a5b0
precision 32
            pointer_to_this <pointer_type 0x2aaaae00a820>>
        SF file c.f90 line 1 size <integer_cst 0x2aaaadff1a50 32> unit size
<integer_cst 0x2aaaadff16c0 4>
        align 32 offset_align 128
        offset <integer_cst 0x2aaaadff16f0 constant invariant 0>
        bit offset <integer_cst 0x2aaaadff1f30 constant invariant 0> context
<record_type 0x2aaaae2d0340 a_type>>
    chain <type_decl 0x2aaaae2d0410 D.1372>>


-- 

ubizjak at gmail dot com changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2007-09-03 20:07:11
               date|                            |


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

Reply via email to