diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2017-02-24 10:54:00 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2017-02-24 10:54:00 +0000 |
| commit | 830815b9ae9bdfc4be1b944c24d5d9c209ed0741 (patch) | |
| tree | 418ce3e335f1f75c891d42f91afeede60ae41423 /gcc | |
| parent | 491527afb8bcf02fc91fbddc66b27a0dc25c2bd1 (diff) | |
| download | gcc-830815b9ae9bdfc4be1b944c24d5d9c209ed0741.zip gcc-830815b9ae9bdfc4be1b944c24d5d9c209ed0741.tar.gz gcc-830815b9ae9bdfc4be1b944c24d5d9c209ed0741.tar.bz2 | |
trans.c (gnat_to_gnu): Do not apply special handling of boolean rvalues to function calls.
* gcc-interface/trans.c (gnat_to_gnu): Do not apply special handling
of boolean rvalues to function calls.
From-SVN: r245706
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/gcc-interface/trans.c | 1 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index ffa4666..addb1cb 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,5 +1,10 @@ 2017-02-24 Eric Botcazou <ebotcazou@adacore.com> + * gcc-interface/trans.c (gnat_to_gnu): Do not apply special handling + of boolean rvalues to function calls. + +2017-02-24 Eric Botcazou <ebotcazou@adacore.com> + * gcc-interface/utils.c (fold_bit_position): New function. (rest_of_record_type_compilation): Call it instead of bit_position to compute the field position and remove the call to remove_conversions. diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index d38a0a9..0a7ddfc 100644 --- a/gcc/ada/gcc-interface/trans.c +++ b/gcc/ada/gcc-interface/trans.c @@ -7759,7 +7759,6 @@ gnat_to_gnu (Node_Id gnat_node) && (kind == N_Identifier || kind == N_Expanded_Name || kind == N_Explicit_Dereference - || kind == N_Function_Call || kind == N_Indexed_Component || kind == N_Selected_Component) && TREE_CODE (get_base_type (gnu_result_type)) == BOOLEAN_TYPE |