diff options
| author | Richard Kenner <kenner@adacore.com> | 2023-01-18 17:45:15 -0500 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2023-05-16 10:30:56 +0200 |
| commit | b92d0c4564a2d9b942bedad3dd1fb2887239020e (patch) | |
| tree | 8c2d0f53838dcbb2d405edbab312195a90ec4399 /gcc | |
| parent | 913794b1cb71cc7bba9850f8ed42c294d542fff4 (diff) | |
| download | gcc-b92d0c4564a2d9b942bedad3dd1fb2887239020e.zip gcc-b92d0c4564a2d9b942bedad3dd1fb2887239020e.tar.gz gcc-b92d0c4564a2d9b942bedad3dd1fb2887239020e.tar.bz2 | |
ada: Change Present_Expr field type to Uint
We want the field to be initialized to No_Uint because we want to be
able to test in GNAT LLVM whether we've already set it so we can be
sure we only set it once.
gcc/ada/
* gen_il-gen-gen_nodes.adb (Present_Expr): Type is now Uint.
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/gen_il-gen-gen_nodes.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/gen_il-gen-gen_nodes.adb b/gcc/ada/gen_il-gen-gen_nodes.adb index 389c9a0..44da1d1 100644 --- a/gcc/ada/gen_il-gen-gen_nodes.adb +++ b/gcc/ada/gen_il-gen-gen_nodes.adb @@ -1604,7 +1604,7 @@ begin -- Gen_IL.Gen.Gen_Nodes Sm (Dcheck_Function, Node_Id), Sm (Enclosing_Variant, Node_Id), Sm (Has_SP_Choice, Flag), - Sm (Present_Expr, Valid_Uint))); + Sm (Present_Expr, Uint))); Cc (N_Variant_Part, Node_Kind, (Sy (Name, Node_Id, Default_Empty), |