diff options
author | Tristan Gingold <tgingold@free.fr> | 2021-09-30 21:58:53 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2021-09-30 21:58:53 +0200 |
commit | b354560f68b56701874d16a9d1c5ee69394a59ac (patch) | |
tree | 3d4fb26f2d49b75f4327e21ffff6bd2f6d687c21 /src/vhdl/vhdl-sem_decls.adb | |
parent | c26973e620349e8ceb87b22c89c92ae82b8a75f9 (diff) | |
download | ghdl-b354560f68b56701874d16a9d1c5ee69394a59ac.tar.gz ghdl-b354560f68b56701874d16a9d1c5ee69394a59ac.tar.bz2 ghdl-b354560f68b56701874d16a9d1c5ee69394a59ac.zip |
vhdl: warns on unused component declarations
Diffstat (limited to 'src/vhdl/vhdl-sem_decls.adb')
-rw-r--r-- | src/vhdl/vhdl-sem_decls.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-sem_decls.adb b/src/vhdl/vhdl-sem_decls.adb index 19fd36b75..f79f0def0 100644 --- a/src/vhdl/vhdl-sem_decls.adb +++ b/src/vhdl/vhdl-sem_decls.adb @@ -2528,7 +2528,8 @@ package body Vhdl.Sem_Decls is "%n is never referenced", +El); end if; when Iir_Kind_Signal_Declaration - | Iir_Kind_Variable_Declaration => + | Iir_Kind_Variable_Declaration + | Iir_Kind_Component_Declaration => if not Get_Use_Flag (El) then Warning_Msg_Sem (Warnid_Unused, +El, "%n is never referenced", +El); |