summaryrefslogtreecommitdiff
path: root/flang/module
diff options
context:
space:
mode:
authorPeter Klausler <pklausler@nvidia.com>2023-04-21 10:03:17 -0700
committerPeter Klausler <pklausler@nvidia.com>2023-05-08 15:58:09 -0700
commita88cee1fd06dd633fc6551d242c55f4235d4862d (patch)
treeaa5d3dce880ab5fc28ab3f1e3eec7fe651c467df /flang/module
parent5da7f30f24c4620c4f4425206fbdd0921d333dc0 (diff)
downloadllvm-a88cee1fd06dd633fc6551d242c55f4235d4862d.tar.gz
[flang] Semantics for ISO_C_BINDING's C_LOC()
Make __builtin_c_loc() into an intrinsic function and verify the special semantic requirements on its actual arguments. Differential Revision: https://reviews.llvm.org/D149988
Diffstat (limited to 'flang/module')
-rw-r--r--flang/module/__fortran_builtins.f903
1 files changed, 1 insertions, 2 deletions
diff --git a/flang/module/__fortran_builtins.f90 b/flang/module/__fortran_builtins.f90
index a22aa4699f7a..1dee77e3c10c 100644
--- a/flang/module/__fortran_builtins.f90
+++ b/flang/module/__fortran_builtins.f90
@@ -12,6 +12,7 @@
! standard names of the procedures.
module __Fortran_builtins
+ intrinsic :: __builtin_c_loc
intrinsic :: __builtin_c_f_pointer
intrinsic :: sizeof ! extension
@@ -42,8 +43,6 @@ module __Fortran_builtins
integer, parameter :: __builtin_atomic_int_kind = selected_int_kind(18)
integer, parameter :: __builtin_atomic_logical_kind = __builtin_atomic_int_kind
- procedure(type(__builtin_c_ptr)) :: __builtin_c_loc
-
intrinsic :: __builtin_ieee_is_nan, __builtin_ieee_is_negative, &
__builtin_ieee_is_normal
intrinsic :: __builtin_ieee_next_after, __builtin_ieee_next_down, &