blob: 6efc5d9a667d07415c1b88eafa8cd173c42b6075 (
plain)
1
2
3
4
5
6
7
8
9
10
|
! { dg-do compile }
! { dg-options -pedantic }
! PR fortran/9793
! larson@w6yx.stanford.edu
!
! For gfortran, see PR 13490
!
integer c
c = -2147483648_4 / (-1) ! { dg-error "too big for its kind" "" }
end
|