diff options
author | Bob Duff <duff@adacore.com> | 2021-03-03 16:12:54 -0500 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-06-17 10:32:09 -0400 |
commit | f54fb769ec25976858e6bdea9c6a1beeb70f91fa (patch) | |
tree | 166ffd986b9f22a55ed672686760f0aa1c4f2c26 /gcc/ada/sinfo-cn.adb | |
parent | 1b96f017cd4c6eb36afe95c7e7683928274c47fc (diff) | |
download | gcc-f54fb769ec25976858e6bdea9c6a1beeb70f91fa.zip gcc-f54fb769ec25976858e6bdea9c6a1beeb70f91fa.tar.gz gcc-f54fb769ec25976858e6bdea9c6a1beeb70f91fa.tar.bz2 |
[Ada] Fix varsize node name conflict
gcc/ada/
* gen_il-gen.adb, gen_il-internals.ads: Generate field
enumeration literals with "F_" prefix. Update all generated
references accordingly.
* atree.adb, einfo-utils.adb, sem_ch3.adb, sem_ch5.adb,
sem_ch6.adb, sem_ch8.adb, sinfo-cn.adb, sinfo-utils.adb,
sinfo-utils.ads, treepr.adb: Add "F_" prefix to all uses of the
field enumeration literals.
Diffstat (limited to 'gcc/ada/sinfo-cn.adb')
-rw-r--r-- | gcc/ada/sinfo-cn.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/sinfo-cn.adb b/gcc/ada/sinfo-cn.adb index b4473c1..9a9af9b 100644 --- a/gcc/ada/sinfo-cn.adb +++ b/gcc/ada/sinfo-cn.adb @@ -45,7 +45,7 @@ package body Sinfo.CN is (N : Node_Id) is begin - Reinit_Field_To_Zero (N, Char_Literal_Value); + Reinit_Field_To_Zero (N, F_Char_Literal_Value); Extend_Node (N); end Change_Character_Literal_To_Defining_Character_Literal; @@ -130,7 +130,7 @@ package body Sinfo.CN is (N : Node_Id) is begin - Reinit_Field_To_Zero (N, Strval); + Reinit_Field_To_Zero (N, F_Strval); Extend_Node (N); end Change_Operator_Symbol_To_Defining_Operator_Symbol; @@ -140,7 +140,7 @@ package body Sinfo.CN is procedure Change_Operator_Symbol_To_String_Literal (N : Node_Id) is begin - Reinit_Field_To_Zero (N, Chars); + Reinit_Field_To_Zero (N, F_Chars); Set_Entity (N, Empty); Mutate_Nkind (N, N_String_Literal); end Change_Operator_Symbol_To_String_Literal; |