[flang] Handle dynamically optional argument in EXIT
authorJean Perier <jperier@nvidia.com>
Fri, 8 Apr 2022 13:51:32 +0000 (15:51 +0200)
committerJean Perier <jperier@nvidia.com>
Fri, 8 Apr 2022 13:51:44 +0000 (15:51 +0200)
commit4535bb9b80ce61aab89603b7fde6fe56e8f87121
tree86364bc5cce01395a505cb1d6cfe76c399da028e
parent7d2a1b6de4205dde613e83078314c13438f46578
[flang] Handle dynamically optional argument in EXIT

The actual argument passed to STATUS may be a dummy OPTIONAL or a
disassociated POINTER/unallocated ALLOCATABLE.

Differential Revision: https://reviews.llvm.org/D123380
flang/lib/Lower/IntrinsicCall.cpp
flang/test/Lower/Intrinsics/exit-2.f90 [new file with mode: 0644]