| commit | 0870dec2cbd94a3d061b39dcc453620aa45e296f | |
| author | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Tue, 5 Sep 2017 08:54:14 +0000 (5 08:54 +0000) | ||
| committer | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Tue, 5 Sep 2017 08:54:14 +0000 (5 08:54 +0000) | ||
| tree | 684b70e6fa1324bfcc46054aefb1c77695912f6d | treesnapshot (tar.gz zip) |
| parent | f7c0889d898bb3df89e45c7858919db4398f9e00 | commitdiff |
* gcc-interface/trans.c (adjust_for_implicit_deref): New function.
(gnat_to_gnu) <N_Explicit_Dereference>: Translate result type first.
(N_Indexed_Component): Invoke adjust_for_implicit_deref on the prefix.
(N_Slice): Likewise.
(N_Selected_Component): Likewise. Do not try again to translate it.
(N_Free_Statement): Invoke adjust_for_implicit_deref on the expression.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@251699 138bc75d-0d04-0410-961f-82ee72b054a4
(gnat_to_gnu) <N_Explicit_Dereference>: Translate result type first.
(N_Indexed_Component): Invoke adjust_for_implicit_deref on the prefix.
(N_Slice): Likewise.
(N_Selected_Component): Likewise. Do not try again to translate it.
(N_Free_Statement): Invoke adjust_for_implicit_deref on the expression.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@251699 138bc75d-0d04-0410-961f-82ee72b054a4
| gcc/ada/ChangeLog | diffblobblamehistory | |
| gcc/ada/gcc-interface/trans.c | diffblobblamehistory | |
| gcc/testsuite/ChangeLog | diffblobblamehistory | |
| gcc/testsuite/gnat.dg/taft_type4.adb | [new file with mode: 0644] | blob |
| gcc/testsuite/gnat.dg/taft_type4_pkg.adb | [new file with mode: 0644] | blob |
| gcc/testsuite/gnat.dg/taft_type4_pkg.ads | [new file with mode: 0644] | blob |