Skip to content

Commit 47bdf05

Browse files
vdonaldsonIcohedron
authored andcommitted
[flang] test fix (llvm#126251)
1 parent e539366 commit 47bdf05

File tree

2 files changed

+5
-3
lines changed

2 files changed

+5
-3
lines changed

flang/test/Evaluate/fold-ieee.f90

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -54,15 +54,15 @@ module m
5454
logical, parameter :: test_sq_all = ieee_support_sqrt()
5555
logical, parameter :: test_sq_4 = ieee_support_sqrt(1.)
5656
logical, parameter :: test_sq_8 = ieee_support_sqrt(1.d0)
57-
logical, parameter :: test_std_all = ieee_support_standard()
58-
logical, parameter :: test_std_4 = ieee_support_standard(1.)
59-
logical, parameter :: test_std_8 = ieee_support_standard(1.d0)
6057
logical, parameter :: test_sn_all = ieee_support_subnormal()
6158
logical, parameter :: test_sn_4 = ieee_support_subnormal(1.)
6259
logical, parameter :: test_sn_8 = ieee_support_subnormal(1.d0)
6360
#if __x86_64__
6461
logical, parameter :: test_uc_all = .not. ieee_support_underflow_control()
6562
logical, parameter :: test_uc_4 = ieee_support_underflow_control(1.)
6663
logical, parameter :: test_uc_8 = ieee_support_underflow_control(1.d0)
64+
logical, parameter :: test_std_all = ieee_support_standard()
65+
logical, parameter :: test_std_4 = ieee_support_standard(1.)
66+
logical, parameter :: test_std_8 = ieee_support_standard(1.d0)
6767
#endif
6868
end

flang/test/Evaluate/folding18.f90

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -51,13 +51,15 @@ module m
5151
.and. ieee_support_sqrt(1.0_8) &
5252
.and. ieee_support_sqrt(1.0_10) &
5353
.and. ieee_support_sqrt(1.0_16)
54+
#if __x86_64__
5455
logical, parameter :: test_ieee_support_standard = ieee_support_standard() &
5556
.and. ieee_support_standard(1.0_2) &
5657
.and. ieee_support_standard(1.0_3) &
5758
.and. ieee_support_standard(1.0_4) &
5859
.and. ieee_support_standard(1.0_8) &
5960
.and. ieee_support_standard(1.0_10) &
6061
.and. ieee_support_standard(1.0_16)
62+
#endif
6163
logical, parameter :: test_ieee_support_subnormal = ieee_support_subnormal() &
6264
.and. ieee_support_subnormal(1.0_2) &
6365
.and. ieee_support_subnormal(1.0_3) &

0 commit comments

Comments
 (0)