blob: 9f9d5fc0b683edac939ce7a76be3f78cf4760be9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
# { dg-options "-fstropping=upper" } #
# Environment enquiries for SIZETY REALs #
BEGIN ASSERT (max real /= 0.0);
ASSERT (long max real >= LENG max real);
ASSERT (long long max real >= LENG long max real);
ASSERT (min real /= 0.0);
ASSERT (long min real <= LENG min real);
ASSERT (long long min real <= LENG long min real);
ASSERT (small real > 0.0);
ASSERT (long small real > LONG 0.0);
ASSERT (long long small real > LONG LONG 0.0)
END
|
