aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-sem.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2022-09-28 06:31:47 +0200
committerTristan Gingold <tgingold@free.fr>2022-09-28 06:31:47 +0200
commit9f6bcc1bd1ecf9641df73925df14da793c544fe7 (patch)
tree6c81c4307213bd4c70e7c42d5719bd88952d5216 /src/vhdl/vhdl-sem.adb
parent30d1158bba72f3dc39b7ad669258869f8eef3b65 (diff)
downloadghdl-9f6bcc1bd1ecf9641df73925df14da793c544fe7.tar.gz
ghdl-9f6bcc1bd1ecf9641df73925df14da793c544fe7.tar.bz2
ghdl-9f6bcc1bd1ecf9641df73925df14da793c544fe7.zip
vhdl-sem: avoid a crash after error. Fix #2201
Diffstat (limited to 'src/vhdl/vhdl-sem.adb')
-rw-r--r--src/vhdl/vhdl-sem.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-sem.adb b/src/vhdl/vhdl-sem.adb
index 1389cebb1..4273e447a 100644
--- a/src/vhdl/vhdl-sem.adb
+++ b/src/vhdl/vhdl-sem.adb
@@ -1074,6 +1074,7 @@ package body Vhdl.Sem is
then
Error_Msg_Sem
(+Block_Conf, "corresponding component not fully bound");
+ return;
end if;
Block_Spec := Get_Block_Specification (Block_Conf);