[Bug fortran/45794] [4.6 Regression] ICE: Segmentation fault in gfc_conv_procedure_call

[burnus at gcc dot gnu.org]

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

Tobias Burnus <burnus at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
      Known to work|                            |4.5.0
           Keywords|                            |ice-on-valid-code
   Last reconfirmed|                            |2010.09.25 19:08:10
               date|                            |
                 CC|                            |burnus at gcc dot gnu.org
     Ever Confirmed|0                           |1
            Summary|internal compiler error:    |[4.6 Regression] ICE:
                   |Segmentation fault          |Segmentation fault in
                   |                            |gfc_conv_procedure_call
   Target Milestone|---                         |4.6.0
      Known to fail|                            |4.6.0

--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> 2010-09-25 19:08:10 UTC ---
Fails with 4.6.0 Rev. 163668 and 164548
Works with 4.5.0

==16264== Invalid read of size 4
==16264==    at 0x57F655: gfc_conv_procedure_call (trans-expr.c:3119)
==16264==    by 0x582FD8: gfc_conv_intrinsic_funcall (trans-intrinsic.c:1844)
==16264==    by 0x58D423: gfc_conv_intrinsic_function (trans-intrinsic.c:5595)
==16264==    by 0x581642: gfc_conv_function_expr (trans-expr.c:3914)
==16264==    by 0x582534: gfc_trans_assignment (trans-expr.c:5370)
==16264==    by 0x558B45: trans_code (trans.c:1119)

Breakpoint 1, gfc_conv_procedure_call (se=0x7fffffffd3f0, sym=0x144c350,
args=0x13f7d80, expr=0x144baf0, append_args=0x0)
    at fortran/trans-expr.c:3119
3119                       && (fsym == NULL || fsym->as->type ==
AS_ASSUMED_SHAPE
(gdb) p fsym
$1 = (gfc_symbol *) 0x1449580
(gdb) p fsym->name
$2 = 0x2aaaad4fcf40 "mask"
(gdb) p fsym->as
$3 = (gfc_array_spec *) 0x0
(gdb) p fsym->attr.dimension 
$4 = 0