[flang-commits] [flang] [flang] Add ETIME runtime and lowering intrinsics implementation (PR #90578)

[Tom Eccles via flang-commits]

================
@@ -0,0 +1,21 @@
+! RUN: %python %S/test_errors.py %s %flang_fc1 -pedantic
+! Tests for the ETIME intrinsics
+
+subroutine bad_kind_error(values, time)
+  REAL(KIND=8), DIMENSION(2) :: values
+  REAL(KIND=8) :: time
+  !ERROR: Actual argument for 'values=' has bad type or kind 'REAL(8)'
----------------
tblah wrote:

Why did you choose to disallow kinds != 4? The gfortran definition of the intrinsic doesn't appear to mention needing a particular kind

https://github.com/llvm/llvm-project/pull/90578