diff options
author | Arnaud Charlet <charlet@adacore.com> | 2020-12-23 10:40:30 +0100 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-05-03 05:28:23 -0400 |
commit | c695d23dde02fbc5c748c7182d223813a4bcab4d (patch) | |
tree | cb62b73ea2d23ec5619220eb8ed543685dc7888a /gcc | |
parent | 3fcdd5264de355acf01d30b7af6edd614080f1d3 (diff) | |
download | gcc-c695d23dde02fbc5c748c7182d223813a4bcab4d.zip gcc-c695d23dde02fbc5c748c7182d223813a4bcab4d.tar.gz gcc-c695d23dde02fbc5c748c7182d223813a4bcab4d.tar.bz2 |
[Ada] Remove confusing warning on type export
gcc/ada/
* sem_prag.adb (Set_Exported): Do not warn on exporting a type.
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/ada/sem_prag.adb | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb index 6e209d4..5192843 100644 --- a/gcc/ada/sem_prag.adb +++ b/gcc/ada/sem_prag.adb @@ -10934,10 +10934,6 @@ package body Sem_Prag is end if; end if; - if Warn_On_Export_Import and then Is_Type (E) then - Error_Msg_NE ("exporting a type has no effect?x?", Arg, E); - end if; - if Warn_On_Export_Import and Inside_A_Generic then Error_Msg_NE ("all instances of& will have the same external name?x?", |