Skip to content

Commit 90b9197

Browse files
author
Mark Danial
committed
only test real 10 folding on x86_64
1 parent a79a83f commit 90b9197

File tree

1 file changed

+4
-0
lines changed

1 file changed

+4
-0
lines changed

flang/test/Evaluate/fold-nearest.f90

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -14,7 +14,9 @@ module m1
1414
logical, parameter :: test_6 = nearest(-inf, -1.) == -inf
1515
logical, parameter :: test_7 = nearest(1.9999999, 1.) == 2.
1616
logical, parameter :: test_8 = nearest(2., -1.) == 1.9999999
17+
#if __x86_64__
1718
logical, parameter :: test_9 = nearest(1.9999999999999999999_10, 1.) == 2._10
19+
#endif
1820
logical, parameter :: test_10 = nearest(-1., 1.) == -.99999994
1921
logical, parameter :: test_11 = nearest(-1., -2.) == -1.0000001
2022
real, parameter :: negZero = sign(0., -1.)
@@ -42,7 +44,9 @@ module m2
4244
logical, parameter :: test_8 = ieee_next_after(-inf, -1.) == -inf
4345
logical, parameter :: test_9 = ieee_next_after(1.9999999, 3.) == 2.
4446
logical, parameter :: test_10 = ieee_next_after(2., 1.) == 1.9999999
47+
#if __x86_64__
4548
logical, parameter :: test_11 = ieee_next_after(1.9999999999999999999_10, 3.) == 2._10
49+
#endif
4650
logical, parameter :: test_12 = ieee_next_after(1., 1.) == 1.
4751
!WARN: warning: invalid argument on division
4852
real, parameter :: nan = 0. / 0.

0 commit comments

Comments
 (0)