diff options
| -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 |