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/decl.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/decl.cc')
| -rw-r--r-- | gcc/ada/gcc-interface/decl.cc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/gcc-interface/decl.cc b/gcc/ada/gcc-interface/decl.cc index 53a1124..456fe53 100644 --- a/gcc/ada/gcc-interface/decl.cc +++ b/gcc/ada/gcc-interface/decl.cc @@ -1212,7 +1212,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, bool definition) && (POINTER_TYPE_P (gnu_type) || TYPE_IS_FAT_POINTER_P (gnu_type)) && !gnu_expr && !Is_Imported (gnat_entity)) - gnu_expr = integer_zero_node; + gnu_expr = null_pointer_node; /* If we are defining the object and it has an Address clause, we must either get the address expression from the saved GCC tree for the |