[flang-commits] [flang] cfeb8f2 - [flang] Fix broken atan_real16 test (#98499)

via flang-commits flang-commits at lists.llvm.org
Thu Jul 11 14:17:36 PDT 2024


Author: Tarun Prabhu
Date: 2024-07-11T15:17:33-06:00
New Revision: cfeb8f20b3830f88fd1cd95fe4a2426f5f885450

URL: https://github.com/llvm/llvm-project/commit/cfeb8f20b3830f88fd1cd95fe4a2426f5f885450
DIFF: https://github.com/llvm/llvm-project/commit/cfeb8f20b3830f88fd1cd95fe4a2426f5f885450.diff

LOG: [flang] Fix broken atan_real16 test (#98499)

The names in the `end function` were incorrect. Those have been removed.

Added: 
    

Modified: 
    flang/test/Lower/Intrinsics/atan_real16.f90

Removed: 
    


################################################################################
diff  --git a/flang/test/Lower/Intrinsics/atan_real16.f90 b/flang/test/Lower/Intrinsics/atan_real16.f90
index 3ae037307c32b..2bad58cf35f77 100644
--- a/flang/test/Lower/Intrinsics/atan_real16.f90
+++ b/flang/test/Lower/Intrinsics/atan_real16.f90
@@ -6,15 +6,15 @@
 function test_real16(x)
   real(16) :: x, test_real16
   test_real16 = atan(x)
-end function real16
+end function
 
 ! CHECK-LABEL: @_QPtest_real16
 ! CHECK: fir.call @_FortranAAtanF128({{.*}}){{.*}}: (f128) -> f128
 
 function test_real16_2(y, x)
-  real(16) :: y, x, test_real16
-  test_real16 = atan(y, x)
-end function real16_2
+  real(16) :: y, x, test_real16_2
+  test_real16_2 = atan(y, x)
+end function
 
-! CHECK-LABEL: @_QPtest_real16
+! CHECK-LABEL: @_QPtest_real16_2
 ! CHECK: fir.call @_FortranAAtan2F128({{.*}}){{.*}}: (f128, f128) -> f128


        


More information about the flang-commits mailing list