blob: c6d501b79922bbc8982597f6cc3d2659d0cd2dd8 [file] [log] [blame]
! legal
integer, parameter :: j = huge(j)
integer i
if (j /= huge(i)) STOP 1
end