We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 92fc1eb commit cfeb8f2Copy full SHA for cfeb8f2
flang/test/Lower/Intrinsics/atan_real16.f90
@@ -6,15 +6,15 @@
6
function test_real16(x)
7
real(16) :: x, test_real16
8
test_real16 = atan(x)
9
-end function real16
+end function
10
11
! CHECK-LABEL: @_QPtest_real16
12
! CHECK: fir.call @_FortranAAtanF128({{.*}}){{.*}}: (f128) -> f128
13
14
function test_real16_2(y, x)
15
- real(16) :: y, x, test_real16
16
- test_real16 = atan(y, x)
17
-end function real16_2
+ real(16) :: y, x, test_real16_2
+ test_real16_2 = atan(y, x)
18
19
-! CHECK-LABEL: @_QPtest_real16
+! CHECK-LABEL: @_QPtest_real16_2
20
! CHECK: fir.call @_FortranAAtan2F128({{.*}}){{.*}}: (f128, f128) -> f128
0 commit comments