------- Comment #2 from dfranke at gcc dot gnu dot org  2007-12-23 18:32 -------
$> cat pr34556.f90
integer :: a(2,2)
a = reshape( (/ max((/ 1,2 /), (/ 3,4 /)), (/4,5/) /), (/2,2/))
end

$> gfortran-svn pr34556.f90
pr34556.f90: In function 'MAIN__':
pr34556.f90:1: internal compiler error: Intrinsic function (164) not recognized
Please submit a full bug report,


(gdb) bt
#0  gfc_conv_intrinsic_lib_function (se=0xbff44e60, expr=0x89b8ad0) at
../../../gcc/gcc/fortran/trans-intrinsic.c:714
#1  0x080fc443 in gfc_conv_intrinsic_function (se=0xbff44e60, expr=0x89b8ad0)
at ../../../gcc/gcc/fortran/trans-intrinsic.c:4140
#2  0x080eed87 in gfc_conv_function_expr (se=0xbff44e60, expr=0xa4) at
../../../gcc/gcc/fortran/trans-expr.c:3033
#3  0x080ef491 in gfc_conv_expr (se=0xbff44e60, expr=0x89b8ad0) at
../../../gcc/gcc/fortran/trans-expr.c:3537
#4  0x080d8acf in gfc_add_loop_ss_code (loop=0xbff44fa4, ss=0x89b9820,
subscript=0 '\0') at ../../../gcc/gcc/fortran/trans-array.c:1828
#5  0x080d9874 in gfc_conv_loop_setup (loop=0xbff44fa4) at
../../../gcc/gcc/fortran/trans-array.c:3385
#6  0x080f019e in gfc_trans_assignment_1 (expr1=0x89b8458, expr2=0x89b8ad0,
init_flag=0 '\0') at ../../../gcc/gcc/fortran/trans-expr.c:4258
#7  0x080f075c in gfc_trans_assignment (expr1=0x89b8458, expr2=0x89b8ad0,
init_flag=32 ' ') at ../../../gcc/gcc/fortran/trans-expr.c:4434
#8  0x080f12f1 in gfc_trans_assign (code=0x89b96f8) at
../../../gcc/gcc/fortran/trans-expr.c:4446
#9  0x080cfbc0 in gfc_trans_code (code=0x89b96f8) at
../../../gcc/gcc/fortran/trans.c:994
#10 0x080e78c2 in gfc_generate_function_code (ns=0x89b7b20) at
../../../gcc/gcc/fortran/trans-decl.c:3263
#11 0x0809ee35 in gfc_parse_file () at ../../../gcc/gcc/fortran/parse.c:3396
#12 0x080c86b5 in gfc_be_parse_file (set_yydebug=0) at
../../../gcc/gcc/fortran/f95-lang.c:260
#13 0x0836c0f4 in toplev_main (argc=2, argv=0xbff454e4) at
../../../gcc/gcc/toplev.c:1042
#14 0x0811462f in main (argc=0, argv=0x89b8ad0) at ../../../gcc/gcc/main.c:35

(gdb) print id
$7 = GFC_ISYM_RESHAPE

(gdb) print *m
$8 = {id = GFC_ISYM_NONE, code_r4 = END_BUILTINS, code_r8 = END_BUILTINS,
code_r10 = END_BUILTINS, code_r16 = END_BUILTINS, code_c4 = END_BUILTINS,
  code_c8 = END_BUILTINS, code_c10 = END_BUILTINS, code_c16 = END_BUILTINS,
libm_name = 0 '\0', complex_available = 0 '\0', is_constant = 1 '\001',
  name = 0x0, real4_decl = 0x0, real8_decl = 0x0, real10_decl = 0x0,
real16_decl = 0x0, complex4_decl = 0x0, complex8_decl = 0x0, complex10_decl =
0x0,
  complex16_decl = 0x0}


-- 

dfranke at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code


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

Reply via email to