[flang] Use input type to recover the type desc when emboxing
authorValentin Clement <clementval@gmail.com>
Tue, 24 Jan 2023 13:46:11 +0000 (14:46 +0100)
committerValentin Clement <clementval@gmail.com>
Tue, 24 Jan 2023 13:46:31 +0000 (14:46 +0100)
commitc97d3e5f68af48936cecfecf0d6d7070e3ac7953
tree1ed59882ef3b307a8f1ec2281cb3e4b9f2443fb6
parentf55bfde5f1b2bd65675fd2378bafa7caf771f3a9
[flang] Use input type to recover the type desc when emboxing

When emboxing to a polymorphic entity without a type source box,
the type desc address must be retrived from the input type and
not from the box type.

Reviewed By: jeanPerier

Differential Revision: https://reviews.llvm.org/D142435
flang/lib/Optimizer/CodeGen/CodeGen.cpp
flang/test/Fir/polymorphic.fir