diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2023-02-22 17:22:11 +0100 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2023-05-30 09:12:18 +0200 |
| commit | e2c9982eef42bc6421c7e9539983a743c7f7a13a (patch) | |
| tree | d082031430c751be9d208ce4d26a591860c1f72d /gcc/ada/gcc-interface/utils.cc | |
| parent | f60d3abea1106dca6565bb390eabfe19c84e2f40 (diff) | |
| download | gcc-e2c9982eef42bc6421c7e9539983a743c7f7a13a.zip gcc-e2c9982eef42bc6421c7e9539983a743c7f7a13a.tar.gz gcc-e2c9982eef42bc6421c7e9539983a743c7f7a13a.tar.bz2 | |
ada: Minor generic tweaks left and and right
No functional changes.
gcc/ada/
* gcc-interface/decl.cc (gnat_to_gnu_entity) <E_Variable>: Replace
integer_zero_node with null_pointer_node for pointer types.
* gcc-interface/trans.cc (gnat_gimplify_expr) <NULL_EXPR>: Likewise.
* gcc-interface/utils.cc (maybe_pad_type): Do not attempt to make a
packable type from a fat pointer type.
* gcc-interface/utils2.cc (build_atomic_load): Use a local variable.
(build_atomic_store): Likewise.
Diffstat (limited to 'gcc/ada/gcc-interface/utils.cc')
| -rw-r--r-- | gcc/ada/gcc-interface/utils.cc | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/gcc-interface/utils.cc b/gcc/ada/gcc-interface/utils.cc index 337b552..8f1861b 100644 --- a/gcc/ada/gcc-interface/utils.cc +++ b/gcc/ada/gcc-interface/utils.cc @@ -1562,6 +1562,7 @@ maybe_pad_type (tree type, tree size, unsigned int align, at the RTL level when the stand-alone object is accessed as a whole. */ if (align > 0 && RECORD_OR_UNION_TYPE_P (type) + && !TYPE_IS_FAT_POINTER_P (type) && TYPE_MODE (type) == BLKmode && !TYPE_BY_REFERENCE_P (type) && TREE_CODE (orig_size) == INTEGER_CST |