diff options
| -rw-r--r-- | src/vhdl/vhdl-parse.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/vhdl-parse.adb b/src/vhdl/vhdl-parse.adb index 9fac0b71f..0dbb227e9 100644 --- a/src/vhdl/vhdl-parse.adb +++ b/src/vhdl/vhdl-parse.adb @@ -6232,7 +6232,8 @@ package body Vhdl.Parse is | Tok_Double_Less => Res := Parse_Name (Allow_Indexes => True); if Res /= Null_Iir - and then Get_Kind (Res) = Iir_Kind_Signature then + and then Get_Kind (Res) = Iir_Kind_Signature + then Error_Msg_Parse (+Res, "signature not allowed in expression"); return Get_Signature_Prefix (Res); else |