This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug fortran/24978] ICE in gfc_assign_data_value_range



------- Comment #29 from dominiq at lps dot ens dot fr  2010-05-01 12:59 -------
>Could you post the full test? I can't reproduce this?!

[macbook] lin/test% cat ../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90
SUBROUTINE data_init_matrix_invalid()
  ! full array initializer, re-initialize full array
  integer :: i(5,10)
  data       i   / 5*1, 5*2, 5*3, 5*4, 5*5, 5*6, 5*7, 5*8, 5*9, 5*10 /
  data       i   / 50 * 1 /
END SUBROUTINE
end
[macbook] lin/test% gfc -std=f95
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_1.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
[macbook] lin/test% cat ../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_2.f90
SUBROUTINE data_init_matrix_invalid()
  ! full array initializer, re-initialize full array
  integer :: i(10,5)
  data       i   / 10*1, 10*2, 10*3, 10*4, 10*5 /
  data       i   / 50 * 1 /
END SUBROUTINE
end
[macbook] lin/test% gfc -std=f95
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_2.f90
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_2.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_2.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_2.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_2.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)
../../../g95bench/win/f90/bug/pr24978_4_ma_i2_db_2.f90:5.25:

  data       i   / 50 * 1 /
                         1
Error: Extension: re-initialization of 'i' at (1)


-- 


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


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]