diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2021-01-27 07:58:17 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-05-07 05:29:12 -0400 |
| commit | b0ba442b047dcffd54055c9d0ab591d020a284d8 (patch) | |
| tree | 73ee9b31d437834c86704d92aa6db0b77faf2811 /gcc/ada/gcc-interface | |
| parent | 730c196aab01296486d21c90ffac2d9f6a338422 (diff) | |
| download | gcc-b0ba442b047dcffd54055c9d0ab591d020a284d8.zip gcc-b0ba442b047dcffd54055c9d0ab591d020a284d8.tar.gz gcc-b0ba442b047dcffd54055c9d0ab591d020a284d8.tar.bz2 | |
[Ada] Fix type mismatch warnings during LTO bootstrap #1
gcc/ada/
* errout.ads (Set_Identifier_Casing): Add pragma Convention C.
* eval_fat.ads (Rounding_Mode): Likewise.
(Machine): Add WARNING comment line.
* exp_code.ads (Clobber_Get_Next): Add pragma Convention C.
* fe.h (Compiler_Abort): Fix return type.
(Set_Identifier_Casing): Change type of parameters.
(Clobber_Get_Next): Change return type.
* gcc-interface/trans.c (gnat_to_gnu) <N_Code_Statement>: Add cast.
Diffstat (limited to 'gcc/ada/gcc-interface')
| -rw-r--r-- | gcc/ada/gcc-interface/trans.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/gcc-interface/trans.c b/gcc/ada/gcc-interface/trans.c index 61a9d61..719cdec 100644 --- a/gcc/ada/gcc-interface/trans.c +++ b/gcc/ada/gcc-interface/trans.c @@ -7993,7 +7993,7 @@ gnat_to_gnu (Node_Id gnat_node) } Clobber_Setup (gnat_node); - while ((clobber = Clobber_Get_Next ())) + while ((clobber = (char *) Clobber_Get_Next ())) gnu_clobbers = tree_cons (NULL_TREE, build_string (strlen (clobber) + 1, clobber), |