[Ada] Fix type mismatch warnings during LTO bootstrap #5
commitd40dc31924972f90cef920a8f76b3042aefc065d
authorEric Botcazou <ebotcazou@adacore.com>
Wed, 17 Feb 2021 09:27:41 +0000 (17 10:27 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 7 May 2021 09:29:16 +0000 (7 05:29 -0400)
treebeee94959a474e5a30bcfd7be062f95634c4828b
parentd3ab01f64a7db48239e41eea6740892cb3167dfd
[Ada] Fix type mismatch warnings during LTO bootstrap #5

gcc/ada/

* raise-gcc.c (__gnat_others_value): Remove const qualifier.
(__gnat_all_others_value): Likewise.
(__gnat_unhandled_others_value): Likewise.
(GNAT_OTHERS): Cast to Exception_Id instead of _Unwind_Ptr.
(GNAT_ALL_OTHERS): Likewise.
(GNAT_UNHANDLED_OTHERS): Likewise.
(Is_Handled_By_Others): Change parameter type to Exception_Id.
(Language_For): Likewise.
(Foreign_Data_For): Likewise.
(is_handled_by): Likewise.  Adjust throughout, remove redundant
line and fix indentation.
* libgnat/a-exexpr.adb (Is_Handled_By_Others): Remove pragma and
useless qualification from parameter type.
(Foreign_Data_For): Likewise.
(Language_For): Likewise.
gcc/ada/libgnat/a-exexpr.adb
gcc/ada/raise-gcc.c