diff options
| author | Tristan Gingold <tgingold@free.fr> | 2021-07-28 22:09:45 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2021-07-28 22:09:45 +0200 |
| commit | 5d6232f08fb5597aa3833f69e52ecbb4be250071 (patch) | |
| tree | 9af73777a8f85c6130d40bcd43c97a9090f865ac /src/vhdl/vhdl-parse.adb | |
| parent | 51d8774fcd5ddd099aa2e28644711be083057751 (diff) | |
| download | ghdl-5d6232f08fb5597aa3833f69e52ecbb4be250071.tar.gz ghdl-5d6232f08fb5597aa3833f69e52ecbb4be250071.tar.bz2 ghdl-5d6232f08fb5597aa3833f69e52ecbb4be250071.zip | |
vhdl: move check on instantiation name from sem to parse.
Fix #1823
Diffstat (limited to 'src/vhdl/vhdl-parse.adb')
| -rw-r--r-- | src/vhdl/vhdl-parse.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-parse.adb b/src/vhdl/vhdl-parse.adb index e958b8f09..726e8e1f4 100644 --- a/src/vhdl/vhdl-parse.adb +++ b/src/vhdl/vhdl-parse.adb @@ -9617,6 +9617,9 @@ package body Vhdl.Parse is return Res; when Tok_Generic | Tok_Port => -- or a component instantiation. + if Get_Kind (Target) not in Iir_Kinds_Denoting_Name then + Error_Msg_Parse (+Target, "component name expected"); + end if; return Parse_Component_Instantiation (Target); when others => -- Catch PSL clock declaration. Within comments, this is the |