diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2021-01-28 12:40:18 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-05-07 05:29:14 -0400 |
| commit | a6d3b4990f9db77e2f6f7fa15d17b22ecea46e74 (patch) | |
| tree | 8568dee243a782cf09bb3a84035cbf06ca83b4e2 /gcc/ada/fe.h | |
| parent | d6de75d526bf5958fe9e66195dc0bf1c458e9b06 (diff) | |
| download | gcc-a6d3b4990f9db77e2f6f7fa15d17b22ecea46e74.zip gcc-a6d3b4990f9db77e2f6f7fa15d17b22ecea46e74.tar.gz gcc-a6d3b4990f9db77e2f6f7fa15d17b22ecea46e74.tar.bz2 | |
[Ada] Fix type mismatch warnings during LTO bootstrap #3
gcc/ada/
* atree.h (Slots_Ptr): Change pointed-to type to any_slot.
* fe.h (Get_RT_Exception_Name): Change type of parameter.
* namet.ads (Name_Entry): Mark non-boolean components as aliased,
reorder the boolean components and add an explicit Spare component.
* namet.adb (Name_Enter): Adjust aggregate accordingly.
(Name_Find): Likewise.
(Reinitialize): Likewise.
* namet.h (struct Name_Entry): Adjust accordingly.
(Names_Ptr): Use correct type.
(Name_Chars_Ptr): Likewise.
(Get_Name_String): Fix declaration and adjust to above changes.
* types.ads (RT_Exception_Code): Add pragma Convention C.
* types.h (Column_Number_Type): Fix original type.
(slot): Rename union type to...
(any_slot): ...this and adjust assertion accordingly.
(RT_Exception_Code): New enumeration type.
* uintp.ads (Uint_Entry): Mark components as aliased.
* uintp.h (Uints_Ptr): Use correct type.
(Udigits_Ptr): Likewise.
* gcc-interface/gigi.h (gigi): Adjust name and type of parameter.
* gcc-interface/cuintp.c (UI_To_gnu): Adjust references to Uints_Ptr
and Udigits_Ptr.
* gcc-interface/trans.c (Slots_Ptr): Adjust pointed-to type.
(gigi): Adjust type of parameter.
(build_raise_check): Add cast in call to Get_RT_Exception_Name.
Diffstat (limited to 'gcc/ada/fe.h')
| -rw-r--r-- | gcc/ada/fe.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/fe.h b/gcc/ada/fe.h index 851e4b3..ec2956b 100644 --- a/gcc/ada/fe.h +++ b/gcc/ada/fe.h @@ -122,7 +122,7 @@ extern Uint Error_Msg_Uint_2; extern Entity_Id Get_Local_Raise_Call_Entity (void); extern Entity_Id Get_RT_Exception_Entity (int); -extern void Get_RT_Exception_Name (int); +extern void Get_RT_Exception_Name (enum RT_Exception_Code); extern void Warn_If_No_Local_Raise (int); /* exp_code: */ |