summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.fortran-torture/compile/parameter_1.f90
blob: 8921bcddcad4875d2b7daa3a52c7c63d8f980b8b (plain)
1
2
3
4
5
6
7
! legal
integer, parameter :: j  = huge(j)
integer i

   if (j /= huge(i)) call abort
end