diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-07-01 06:27:57 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-07-01 06:27:57 +0200 |
commit | 6e7525efaa81ddf6ac9c27525c16e1a7701cd3f4 (patch) | |
tree | a7a2899e05b72efad3c99359e8abc2978597698a /src/vhdl/vhdl-sem_names.adb | |
parent | d49f9d7ddb86131c64524e8c1a9dc9d923b19dc6 (diff) | |
download | ghdl-6e7525efaa81ddf6ac9c27525c16e1a7701cd3f4.tar.gz ghdl-6e7525efaa81ddf6ac9c27525c16e1a7701cd3f4.tar.bz2 ghdl-6e7525efaa81ddf6ac9c27525c16e1a7701cd3f4.zip |
vhdl: improve error message.
Diffstat (limited to 'src/vhdl/vhdl-sem_names.adb')
-rw-r--r-- | src/vhdl/vhdl-sem_names.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/vhdl/vhdl-sem_names.adb b/src/vhdl/vhdl-sem_names.adb index b11fe891c..35516f6f0 100644 --- a/src/vhdl/vhdl-sem_names.adb +++ b/src/vhdl/vhdl-sem_names.adb @@ -1377,8 +1377,7 @@ package body Vhdl.Sem_Names is if not Are_Types_Closely_Related (Conv_Type, Get_Type (Expr)) then -- FIXME: should explain why the types are not closely related. Error_Msg_Sem - (+Conv, - "conversion not allowed between not closely related types"); + (+Conv, "conversion allowed only between closely related types"); -- Avoid error storm in evaluation. Set_Expr_Staticness (Conv, None); else |