aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/g77/20030326-1.f
blob: 2f44a405872807a771887f161315fa14ec0b194f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
C { dg-do compile }
C      PR fortran/9793
C      larson@w6yx.stanford.edu
C
       integer a, b, c

       c = -2147483648 / -1 ! { dg-warning "outside symmetric range" "" }

       a = 1
       b = 0
       c = a / b

       print *, c

       end