[flang][hlfir] Support TYPE(*) actual argument in intrinsic procedures
authorJean Perier <jperier@nvidia.com>
Wed, 5 Apr 2023 08:04:29 +0000 (10:04 +0200)
committerJean Perier <jperier@nvidia.com>
Wed, 5 Apr 2023 08:06:07 +0000 (10:06 +0200)
commit32983aa0f1c503ff531a70392b2cb40f6eb82037
tree0d78046ec7a33454187e76f6f63c4fb116b8372e
parent712dfec1781db8aa92782b98cac5517db548b7f9
[flang][hlfir] Support TYPE(*) actual argument in intrinsic procedures

Similar to https://reviews.llvm.org/D147487.
TYPE(*) evaluate::ActualArgument wraps a symbol instead of an
expression. This requires special handling, which is limited because
C710 restrict the intrinsics in which TYPE(*) may appear as arguments
(there is for instance no need to deal with dynamic presence aspects).

Differential Revision: https://reviews.llvm.org/D147513
flang/lib/Lower/ConvertCall.cpp
flang/test/Lower/HLFIR/intrinsic-assumed-type.f90 [new file with mode: 0644]