[flang] Diagnostic for shape argument in c_f_pointer
authorQihan Cai <qcai8733@uni.sydney.edu.au>
Sat, 26 Nov 2022 10:46:29 +0000 (21:46 +1100)
committerQihan Cai <qcai8733@uni.sydney.edu.au>
Mon, 5 Dec 2022 03:09:04 +0000 (14:09 +1100)
commitd9df5bb8cf1971fac165a718cef2d435b71bab4b
treeadfc85a29d0758e672725c5d39c5495a0f1caf34
parent47ff3042e79b37bbfc19617836cfba1dbbdfec38
[flang] Diagnostic for shape argument in c_f_pointer

Fix #59177, add check for dimensionality for shape argument against rank of FPTR argument in c_f_pointer

Reviewed By: peixin

Differential Revision: https://reviews.llvm.org/D138743
flang/lib/Evaluate/intrinsics.cpp
flang/test/Semantics/c_f_pointer.f90